当前位置: 首页 > 图文教程 > 网络编程 > Javascript > xmlHTTP实例

Javascript
javascript手冊-r
javascript手冊-m&n
javascript手冊-p&q
javascript手冊-t
javascript手冊-e
javascript手冊总纲
javascript手冊-b
javascript手冊-a
JavaScript 实现动态增加、删除表单域
JavaScript:一个鼠标动态跟随文字特效的示例
如何使用可以接受输入的列表框
想让您的桌面文字背景透明吗?
淡出淡入 Script
OpenGL Step by Step
看看你的状态栏有什么在动??
自定义 IE 鼠标右键弹出式
抓住网页恶意代码的"黑手"
一个javascript脚本写的俄罗斯方块
检查指定Text输入框的值是否是数值型数据
将sTableName表中的sFieldNameArr数组字段数据根据条件sWhere加载到selName

Javascript 中的 xmlHTTP实例


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 38 ::
收藏到网摘: n/a

其实也没有什么特别的地方,主要是看了微软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);
}
}