xmlHTTP實例

2024-09-06 12:44:42

字體：大中小

來源：轉載

供稿：網友

其實也沒有什么特別的地方，主要是看了微軟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;

上一篇：使用TextRange獲取輸入框中光標的位

下一篇：關于javascript的“靜態類&amp;quot;