VB6一行代码下载文件(Post，基于Curl库)
haoteby 2024-11-23 16:14 18 浏览
VB6一行代码下载文件（Post，基于Curl库）
HTTPClient_DownFile_ByPost
说明
基于Curl库,用Post方法下载文件。
支持http和https协议。
支持返回响应头
支持设置超时时间
支持重定向
参数
URL:网址，支持http和https
PostDatas:请求内容
SaveFilePath:文件保存路径
RequestHeaders:向网址发起的请求头
ResponseHeaders:请求后得到的响应头
IsUTF8:是否是UTF8编码。0-非UTF8编码，1-UTF8字符
ConnectTimeOut:连接超时时间，单位秒
TimeOut:总超时时间，单位秒
PostDataAutoEncode:是否自动编码请求内容。比如IsUTF8=1时，自动将Ansi请求字符转码为UTF8字符
RedirectNumber:允许重定向次数
引用
Public Declare Function HTTPClient_DownFile_ByPost Lib "VB6Net.dll" (ByRef URL As String, ByRef PostDatas As String, ByRef SaveFilePath As String, Optional ByRef RequestHeaders As String = "", Optional ByRef ResponseHeaders As String = "", Optional ByVal IsUTF8 As Integer = 1, Optional ByVal ConnectTimeOut As Integer = 5, Optional ByVal TimeOut As Integer = 60, Optional ByVal PostDataAutoEncode As Integer = 1, Optional ByVal RedirectNumber As Integer = 1) As String
示例
Text2.text=HTTPClient_DownFile_ByPost("https://xxxxxx/api/login", "{""account"": ""123456@123.com"",""password"": ""123456""}", App.Path & "\LoginResult.txt")
示例工程
txtLog.Text = "下载文件" & vbCrLf & HTTPClient_DownFile_ByPost("https://xxxxxx/api/login", "{""account"": ""123456@123.com"",""password"": ""123456""}", App.Path & "\LoginResult.txt")
运行结果
相关推荐
- Chrome OS 41 用 Freon 取代 X11_chrome os atom
-
在刚发布的ChromeOS41里，除了常规的Wi-Fi稳定性提升（几乎所有系统的changelog里都会包含这一项）、访客模式壁纸等之外，还存在底层改变。这一更新中Google移除...
- 苹果iPad Pro再曝光 有望今年六月发布
-
自进入2015年以后，有关大屏iPad的消息便一直不绝于耳，之前就有不少媒体猜想这款全新的平板电脑将会在三月发布，不过可惜的是我么只在那次发布会上看到了MacBookPro。近日@Ubuntu团队便...
- 雷卯针对香橙派Orange Pi 5 Max开发板防雷防静电方案
-
一、应用场景高端平板、边缘计算、人工智能、云计算、AR/VR、智能安防、智能家居、Linux桌面计算机、Linux网络服务器、Android平板、Android游戏机...
- Ubuntu Server无法更新问题解决_ubuntu server not found
-
上周老家的一台运行UbuntuServer的盒子无法连接上了，中秋这两天回来打开，顺手更新一下发现更新报错。提示`E:Releasefileforhttps://mirrors.aliyun...
- 虚幻引擎5正式版发布:古墓丽影&巫师新作采用、新一代实时渲染
-
机器之心报道编辑：杜伟、陈萍虚幻引擎5的目标是「助力各种规模的团队在视觉领域和互动领域挑战极限，施展无限潜能」。...
- AMD Milan-X双路霄龙7773X平台基准测试曝光 CPU缓存总量超1.5GB
-
OpenBenchmarking基准测试数据库刚刚曝光了AMDMilan-X双路霄龙7773X平台的跑分成绩，虽然很快就被撤下，但我们还是知晓了高达1.6GB的总CPU缓存。早些时...
- 全网最新的Dify(1.7.2)私有化离线部署教程(ARM架构)
-
Hello，大家好！近期工作中有涉及到Dify私有化离线部署，特别是针对于一些国产设备。因此特别整理了该教程，实测有效！有需要的小伙伴可以参考下！本文主要针对Dify1.7.2最新版本+国产操作系...
- 在ubuntu下新建asp.net core项目_创建ubuntu
-
本文一步步讲述在ubuntu下用visualstudiocode创建asp.netcore项目的过程。step1：环境操作系统：virtualbox下安装的lubuntu。请不要开启“硬件...
-
- 在晶晨A311D2处理器上进行Linux硬件视频编码
-
在KhadasVIM4AmogicA311D2SBC上，我更多的时间是在使用Ubuntu22.04。它的总体性能还不错，只不过缺少3D图形加速和硬件视...
-
2025-08-26 17:22 haoteby
- Nacos3.0重磅来袭!全面拥抱AI，单机及集群模式安装详细教程!
-
之前和大家分享过JDK17的多版本管理及详细安装过程，然后在项目升级完jdk17后又发现之前的注册和配置中心nacos又用不了，原因是之前的nacos1.3版本的，版本太老了，已经无法适配当前新的JD...
- 电影质量级渲染来了!虚幻引擎5.3正式发布:已开放下载
-
快科技9月8日消息，日前，Unrealengine正式发布了虚幻引擎5.3，带来了大量全方位的改进。...
- 2025如何选购办公电脑?极摩客mini主机英特尔系列选购指南
-
当下，迷你主机的性能越来越强，品类也越来越多。但是CPU是不变的，基本都是AMD和英特尔的。有一个小伙伴在评论区提问，我应该如何在众多机器中选购一台符合自己的迷你主机呢？那今天我们优先把我们的系列，分...
- ubuntu 20.04+RTX4060 Ti+CUDA 11.7+cudnn
-
ububtu添加国内源sudocp/etc/apt/sources.list/etc/apt/sources.list.backupsudovim/etc/apt/sources.lis...
- Linux Mint 18将重新基于Ubuntu 16.04 带来更好硬件支持
-
项目负责人ClementLefebvre在本月6日披露了关于LinuxMint18“Sarah”操作系统的大量信息，包括带来全新扁平化体验的Mint-Y主题。而现在，这款将于年底之前上线的操作...