推薦：XSL簡(jiǎn)明教程(6)XSL過(guò)濾和查詢
原著：Jan Egil Refsnes 翻譯：阿捷 六. XSL的過(guò)濾和查詢 如果我們希望只顯示滿足一定的條件的XML數(shù)據(jù)應(yīng)該怎么做呢？還是上面的例子代碼，我們只需要在xsl:for-each元素的select屬性

Send varBody
varBody：指令集�？梢允荴ML格式數(shù)據(jù)，也可以是字符串，流，或者一個(gè)無(wú)符號(hào)整數(shù)數(shù)組。也可以省略，讓指令通過(guò)Open方法的URL參數(shù)代入。

setRequestHeader bstrHeader, bstrValue
bstrHeader：HTTP 頭(header)
bstrValue：HTTP 頭(header)的值
如果Open方法定義為POST，可以定義表單方式上傳：
xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

XMLHTTP屬性：
onreadystatechange：在同步執(zhí)行方式下獲得返回結(jié)果的事件句柄。只能在DOM中調(diào)用。
responseBody：結(jié)果返回為無(wú)符號(hào)整數(shù)數(shù)組。
responseStream：結(jié)果返回為IStream流。
responseText ：結(jié)果返回為字符串。
responseXML：結(jié)果返回為XML格式數(shù)據(jù)。

下面是本文附件源程序中的一個(gè)應(yīng)用示例：
Function GetResult(urlStr)
Dim xmlHttp
Dim retStr

Set xmlHttp = CreateObject("Msxml2.XMLHTTP") '創(chuàng)建對(duì)象
On Error Resume Next '出錯(cuò)處理
xmlHttp.Open "POST", urlStr, False '用POST方式打開(kāi)連接，異步執(zhí)行。
xmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" '上傳表單
xmlHttp.Send '發(fā)送指令

If Err.Number = 0 Then '如果連接正確
retStr = xmlHttp.responseText '等待并獲得服務(wù)端返回的結(jié)果字符串
Else
retStr = "Url not found" '否則返回出錯(cuò)信息
End If
Set xmlHttp = nothing '釋放對(duì)象
GetResult = retStr '返回結(jié)果
End Function

GetResult()函數(shù)帶入一個(gè)服務(wù)網(wǎng)頁(yè)的URL參數(shù)，把上傳的指令安放在URL后面的參數(shù)上，如：
urlStr = "server.asp?cmd=" & cmd & "&db=" & db & "table=" & table
cmd：執(zhí)行方式，例如查詢，修改，刪除等等。
db：服務(wù)端數(shù)據(jù)庫(kù)名
table：服務(wù)端表名

然后提交指令，等待并接收返回的處理結(jié)果。結(jié)果以字符串方式返回。

最后由函數(shù)調(diào)用者處理并顯示結(jié)果。

分享：XML技巧五則
技巧1 　　 XmlNode.InnerText與.InnerXml的區(qū)別是：前者將內(nèi)容中的<和>分別變成<和>，因此，希望將兩段 XmlDocument 合并的程序只能使用 XmlDocumentFragment.InnerXml = XmlN