|
XMLHTTP對象及其方法
－－－－－－－－－－－－－－－－－－
MSXML中提供了Microsoft.XMLHTTP對象，能夠完成從數據包到Request對象的轉換以及發送任務。
創建XMLHTTP對象的語句如下：
Set objXML = CreateObject("Msxml2.XMLHTTP") 或
Set objXML = CreateObject(“Microsoft.XMLHTTP”)
' Or, for version 3.0 of XMLHTTP, use:
' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")
對象創建后調用Open方法對Request對象進行初始化，語法格式為：
poster.open http-method, url, async, userID, password
Open方法中包含了5個參數，前三個是必要的，后兩個是可選的(在服務器需要進行身份驗證時提供)。參數的含義如下所示：
http-method： HTTP的通信方式，比如GET或是 POST
url： 接收XML數據的服務器的URL地址。通常在URL中要指明 ASP或CGI程序
async： 一個布爾標識，說明請求是否為異步的。如果是異步通信方式(true)，客戶機就不等待服務器的響應；如果是同步方式(false)，客戶機就要等到服務器返回消息后才去執行其他操作
userID 用戶ID，用于服務器身份驗證
password 用戶密碼，用于服務器身份驗證
XMLHTTP對象的Send方法
用Open方法對Request對象進行初始化后，調用Send方法發送XML數據：
poster.send XML-data
Send方法的參數類型是Variant，可以是字符串、DOM樹或任意數據流。發送數據的方式分為同步和異步兩種。在異步方式下，數據包一旦發送完畢，就結束Send進程，客戶機執行其他的操作；而在同步方式下，客戶機要等到服務器返回確認消息后才結束Send進程。
XMLHTTP對象中的readyState屬性能夠反映出服務器在處理請求時的進展狀況。客戶機的程序可以根據這個狀態信息設置相應的事件處理方法。屬性值及其含義如下表所示：
值說明
0 Response對象已經創建，但XML文檔上載過程尚未結束
1 XML文檔已經裝載完畢
2 XML文檔已經裝載完畢，正在處理中
3 部分XML文檔已經解析
4 文檔已經解析完畢，客戶端可以接受返回消息
客戶機處理響應信息
客戶機接收到返回消息后，進行簡單的處理，基本上就完成了C/S之間的一個交互周期。客戶機接收響應是通過XMLHTTP對象的屬性實現的：
● responseTxt：將返回消息作為文本字符串；
● responseXML：將返回消息視為XML文檔，在服務器響應消息中含有XML數據時使用；
● responseStream：將返回消息視為Stream對象。
下面的xml文件是動態生成的最后用xmlHTTP傳送出去，這是一個在客戶端JavaScript腳本里的內容，當然你也可以寫在服務器，但是要相應的改一些東西：（僅供大家參考，了解它的用法）
var xmlDoc=new ActiveXObject("MSXML2.DOMDocument");
flag=xmlDoc.loadXML(""); newNode =xmlDoc.createElement("編碼")
MarkNode=xmlDoc.documentElement.appendChild(newNode);
newNode =xmlDoc.createElement("StartMark")
newNode.text=StartMark;
MarkNode.appendChild(newNode)
newNode =xmlDoc.createElement("EndMark")
newNode.text=EndMark;
MarkNode.appendChild(newNode)
newNode =xmlDoc.createElement("日期")
DateNode=xmlDoc.documentElement.appendChild(newNode);
newNode =xmlDoc.createElement("StartDate");
newNode.text=StartDate;
DateNode.appendChild(newNode)
newNode =xmlDoc.createElement("EndDate")
newNode.text=EndDate;
DateNode.appendChild(newNode);
newNode =xmlDoc.createElement("數量")
SLNode =xmlDoc.documentElement.appendChild(newNode);
newNode =xmlDoc.createElement("StartSL")
newNode.text=StartShuL
SLNode.appendChild(newNode)
newNode =xmlDoc.createElement("EndSL");
newNode.text=EndShuL
SLNode.appendChild(newNode);
newNode =xmlDoc.createElement("單價")
DJNode =xmlDoc.documentElement.appendChild(newNode)
newNode =xmlDoc.createElement("StartDJ")
newNode.text=StartDanJ;
DJNode.appendChild(newNode);
newNode =xmlDoc.createElement("EndDJ")
newNode.text=EndDanJ;
DJNode.appendChild(newNode);
newNode =xmlDoc.createElement("金額")
JENode =xmlDoc.documentElement.appendChild(newNode)
newNode =xmlDoc.createElement("StartJE")
newNode.text=StartJinE
JENode.appendChild(newNode)
newNode =xmlDoc.createElement("EndJE")
newNode.text=EndJinE
JENode.appendChild(newNode)
newNode =xmlDoc.createElement("倉庫代碼")
newNode.text=CK;
xmlDoc.documentElement.appendChild(newNode)
newNode =xmlDoc.createElement("票號")
newNode.text=RKPH;
xmlDoc.documentElement.appendChild(newNode)
newNode =xmlDoc.createElement("單位代碼")
newNode.text=CorpName;
xmlDoc.documentElement.appendChild(newNode)
newNode =xmlDoc.createElement("BiaoShi")
newNode.text=Biaoshi
xmlDoc.documentElement.appendChild(newNode)
newNode =xmlDoc.createElement("FindCate")
newNode.text=FindCate
xmlDoc.documentElement.appendChild(newNode)
var xh =new ActiveXObject("MSXML2.XMLHTTP")
xh.open("POST","Find.asp",false)
xh.setRequestHeader("Content-Type","text/xml")
xh.setRequestHeader("Content-Type","gb2312")
xh.send(xmlDoc);
我的每一個newNode的text值是一個變量，也就是我客戶端form 中input的值.
|
