¹ØÓÚXML HTTP µÄÒÉÎÊ - Web ¿ª·¢ / JavaScript
JScript code:
//XML HTTPÇëÇó¶ÔÏóµÄ´´½¨·½·¨
if(typeof XMLHttpRequest == "undefined" && window.ActiveXObject){
function XMLHttpRequest(){
var arrSignatures = ["MSXML2.0.XMLHTTP.5.0","MSXML2.0.XMLHTTP.4.0","MSXML2.0.XMLHTTP.3.0",
"MSXML2.0.XMLHTTP.2.0","MSXML2.0.XMLHTTP","Microsoft.XMLHTTP"];
for(var i=0;i < arrSignatures.length;i++){
try{
var oRequest = new ActiveXObject(arrSignatures[i]);
return oRequest;
}catch(oError){
//ignore
}
}
throw new Error("MSXML is not installed on your system.");
}
}
var oRequest = new XMLHttpRequest();
oRequest.open("get","example.txt",false);
oRequest.send(null);
alert("status is"+oRequest.status+"("+oRequest.statusText+")");
alert("Response text is"+oRequest.responseText);
ÉÏÃæÕâ¶Î´úÂ룬ÔÚIEÖÐÊÇÈçºÎÖ´ÐеÄÄØ£¿µ±new XMLHttpRequest()ʱÕÒ²»µ½XMLHttpRequest¶ÔÏóʱ¾Í»áÈ¥Ö´ÐÐÉÏÃæµÄifÓï¾ä¿éÂð£¿javascript²»ÊÇ´ÓÉϵ½Ï½âÊÍÖ´ÐеÄÂð£¿Ôõô»áÖ´ÐÐÏÂÃæµÄÔÙÖ´ÐÐÉÏÃæµÄÄØ£¬²»Ã÷°×£¬Çë½Ì½ÌÎÒ{{
Ïà¹ØÎÊ´ð£º
<?xml version="1.0"?>
<root>
<status>433</status>
<msg>Õâ¸öÊǺº×Ö</msg>
<serialno>123</serialno>
</root>
ÈçºÎÓÃASP¶ÁÈ¡ statusÖµ ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
htmlÒ³Ãæ¾²Ì¬´´½¨xmlÎļþ£¬²¢±£´æ£¬ÒÔºó¿ÉÒÔ¶ÁÈ¡¡£
²»ÖªÄÄλ´óÏÀ×ö¹ý¡£¡£¡£
лл
javascriptÓ¦¸Ã²»ÄÜ´´½¨Îļþ°É
jsÓÐȨÏÞ´´½¨Ã´£¬´ó¶àÊýÇé¿öϱ»½ûÖ¹°É
ȨÏÞ¡£¡£
ÀúÊ·ÒÅÁôÎÊÌ⣬¿´À´½â¾ö²»ÁËÁË¡£¡£¡£¡£¡ ......