JScript脚本实现下载

var  objArgs = WScript.Arguments;
var  sGet = new  ActiveXObject( " ADODB.Stream " );
var  xGet = null ;
try {
    xGet = new  XMLHttpRequest();
} catch (e){
     try {
        xGet = new  ActiveXObject( " Msxml2.XMLHTTP " );
    } catch (ex){
         try {
            xGet = new  ActiveXObject( " Microsoft.XMLHTTP " );
        } catch (e3){
            xGet = null ;
        }
    }
}
if (xGet  !=   null ){
    xGet.Open( " GET " , " http://localhost/aplan/mycalc.exe " , 0 );
    xGet.Send();
    sGet.Mode = 3 ;
    sGet.Type = 1 ;
    sGet.Open();
    sGet.Write(xGet.ResponseBody);
    sGet.SaveToFile( " D:\\haha.exe " , 2 );
}

转载于:https://www.cnblogs.com/cmleung/archive/2009/10/29/1591884.html