源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

xmlHTTP实例

  • 时间:2020-03-04 02:16 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:xmlHTTP实例
其实也没有什么特别的地方,主要是看了微软VBA对象手册,发现可以直接用adodbStream转charSet, 以前看到的例子都是用VBScript来转的,所以就写了一个纯Javascript的例子  不过可惜因为安全限制问题,这个东东只能给做HTA的人用了.....sigh.... 
[u]复制代码[/u] 代码如下:
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);        } }
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部