神马文学网用VBA代码下载网络上的文件
来源：百度文库 编辑：神马文学网 时间：2024/04/28 00:55:14
前几天与MVP老K一起讨论如何从网络中下载一个文件到本机,现将代码帖上来与大家分享.另外我看到张志前段时间需要这个代码,不知道现在仍需要.代码适用于VBA，VB，VBS。
Dim H, S
Set H = CreateObject("Microsoft.XMLHTTP")
H.Open "GET", "http://www.yt-e.com/a.exe", False?? '网络中的文件URL
H.send
Set S = CreateObject("ADODB.Stream")
S.Type = 1
S.Open
S.write H.Responsebody
S.savetofile "c:\a.exe", 2? '本地保存文件名
S.Close
Dim H, S
Set H = CreateObject("Microsoft.XMLHTTP")
H.Open "GET", "http://www.yt-e.com/a.exe", False?? '网络中的文件URL
H.send
Set S = CreateObject("ADODB.Stream")
S.Type = 1
S.Open
S.write H.Responsebody
S.savetofile "c:\a.exe", 2? '本地保存文件名
S.Close
用VBA代码下载网络上的文件
用VBA代码下载网络上的文件
怎样把从网络上下载的图片文件存放在自己的QQ表情里？
怎样把从网络上下载的图片文件存放在自己的QQ表情里？/
Excel VBA编程的常用代码
超管用的VBA一句话代码
Excel VBA编程的常用代码2
用Java制作网络文件下载系统（chinajava）
VBA(上)
vba文件操作二
VBA自学收集代码
文件的下载
150行VBA代码的outlook rss插件
VB或VBA代码转HTML的加载宏
150行VBA代码的outlook rss插件
//wpx98/上传分享 我的在线电脑 | 网络电脑 | 互联网文件中心 | 网盘下载 |...
//21crh/上传分享 我的在线电脑 | 网络电脑 | 互联网文件中心 | 网盘下载 |...
服务器文件信息偷窥下载程序 示例代码
服务器文件信息偷窥下载程序 示例代码
VBA语法基础(上)
VBA语法基础(上)
用commons.fileupload实现文件的上传和下载
vba如何实现将一个EXCEL文件中(关闭的文件)的SHEET页复制到当前的EXCEL中
添加播放文件的代码 新浪博客