页面导航: 首页网络编程JavaScript应用技巧 → 正文内容

xmlHTTP实例

发布:dxy 字体:[增加 减小] 类型:转载
其实也没有什么特别的地方,主要是看了微软VBA对象手册,发现可以直接用adodbStream转charSet, 以前看到的例子都是用VBScript来转的,所以就写了一个纯Javascript的例子 
不过可惜因为安全限制问题,这个东东只能给做HTA的人用了.....sigh.... 

function loadURL(strURL,strSend,strMethod,blnNotWait,aryHeads){
       if(!strURL){return(false);}
       strSend=strSend?strSend:"";
       strMethod=strMethod=="POST"?"POST":"GET";
       blnNotWait=blnNotWait?true:false;
       var xmlHTTP=new ActiveXObject("MSXML2.XMLHTTP");
       xmlHTTP.open(strMethod,strURL,blnNotWait);
       if(typeof(aryHeads)=="object"){
              for(var i in aryHeads){
                     try{
                            xmlHTTP.setRequestHeader(i,aryHeads[i]);
                     }catch(e){}
              }
       }
       xmlHTTP.send(strSend);
       if(blnNotWait){
              return(xmlHTTP);
       }else{
              strTempFilePath="t"+(new Date()).getTime()+parseInt(Math.random()*1000)+".tmp";
              var adodbStream=new ActiveXObject("ADODB.Stream"); 
         adodbStream.Type=1;//1=adTypeBinary
         adodbStream.Open();
         adodbStream.write(xmlHTTP.responseBody);
         adodbStream.position=0;
         adodbStream.Type=2;
         adodbStream.charset="_autodetect_all";
         var re=adodbStream.readText();
         adodbStream=null;
         return(re);
       }
}
百度中搜索更多的关于xmlHTTP实例内容,或者用Google搜索相关更多
浏览次数:载入中... 打印本文关闭本文返回首页

文章评论

共有 位脚本之家网友发表了评论我来说两句

同 类 文 章
最 近 更 新
热 点 排 行