1.客户端提交请求
Domain = " test.com"
sXml = "" &_
" <package></package> " &_
"<domain></domain>" & Domain & "" &_
""
Set oD = Server.CreateObject("Microsoft.XMLHTTP")
oD.Open "Post", "http://Server/Domain_Check.jsp", False
oD.Send(sXml)
If oD.Status = 200 Then
Result = oD.responseText
Set o = Server.CreateObject("Microsoft.XMLDOM")
o.LoadXML(Result)
Domain = CInt(o.selectSingleNode("//Result").text)
Response.Write Domain
Set o = Nothing
Set oD = Nothing
End If
2.服务器端解析数据包
3.得到返回结果
test.com