作者:lcx
来源:vbs小铺

 //将常用的vbs下载者改成js版了。本来想用jsc.exe编译,可是不成功。jsc.exe不认WScript //use: cscript this.js http://www.xxx.com/xxx.exe c:\xxx.exe
var objArgs = WScript.Arguments;      
var sGet=new ActiveXObject("ADODB.Stream");       
var xGet = false;       
try {       
xGet = new XMLHttpRequest();       
}       
catch (trymicrosoft) {       
try {       
    xGet = new ActiveXObject("Msxml2.XMLHTTP");       
}       
catch (othermicrosoft) {       
    try {       
      xGet = new ActiveXObject("Microsoft.XMLHTTP");       
    }       
catch (failed) {       
      xGet = false;       
    }       
}       
} xGet.Open ("GET",objArgs(0).toLowerCase(),0);      
xGet.Send();       
sGet.Mode=3;       
sGet.Type=1;       
sGet.Open();       
sGet.Write (xGet.ResponseBody);       
sGet.SaveToFile (objArgs(1).toLowerCase(),2);

代码中的链接: