.net应用xmlhttp
Imports System.Xml.XmlDocument
创建一个xmlhttp对象的实例：
Dim xmlhttp As New MSXML2.XMLHTTP30()
向目标页面发送POST请求：
xmlhttp.open("POST", "http://192.168.0.81/unicom/GetValue.aspx?vCorpID=" & vCorpID & "&MacVer=" & MacVer & "&macCount=" & macCount & "&userAccount=" & userAccount, False, , )
上面是直接在页面后面加上？X=1这种形式传值，另一种传值方式是：
poststr = "mytextarea1=" & strTemp
xmlhttp.setRequestHeader("Content-type", "application/x-www-form-urlencoded")
xmlhttp.setRequestHeader("Content-length", strTemp.Length)
xmlhttp.setRequestHeader("Connection", "close")
xmlhttp.send(poststr)
当xmlhttp的readyState 状态为4时，即可进行如下处理
If xmlhttp.readyState = 4 Then
onGetResponse()
End If
onGetResponse()是要出发的事件。
在onGetResponse时间中接受xmlhttp返回的结果：
Dim xmlDoc As New System.Xml.XmlDocument()
xmlDoc.LoadXml(xmlhttp.responseText)
message = xmlDoc.GetElementsByTagName("message").Item(0).InnerXml
If message = "true" Then
..........
else
..........
end if from:asp学习网/title:.net应用xmlhttp/ time:2007-11-25 12:14:55
本文主题xmlhttp
使用XMLHTTP Request Object获取服务器数据
用MSXML2.ServerXMLHTTP的setTimeouts属性解决并死问题
