<% Set objHTTP = Server.CreateObject("MSXML2.XMLHTTP")
Set xmlDOC =Server.CreateObject("MSXML.DOMDocument")
strWebserviceURL = "http://localhost:8080/webservice/Service.asmx/sysLoginService" '编码的处理 Response.CodePage=65001 response.charset="utf-8"
'设置参数和值 strRequest = "UserName="&server.urlencode("1中国")&"&SYSID=6&Password=21" objHTTP.Open "POST", strWebserviceURL, False '设置Content-Type很重要
objHTTP.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objHTTP.Send(strRequest) bOK = xmlDOC.load(objHTTP.responseXML) '查看状态值
if objHTTP.Status=200 then Set oXMLRoot = xmlDOC.documentElement '// 获取节点
for i=0 to 2 text1 = oXMLRoot.childNodes.item(i).text Response.Write text1 next
text2 =oXMLRoot.selectSingleNode("UserName").text Response.Write text2
'xmlStr = xmlDOC.xml 'xmlStr = Replace(xmlStr,"<","<",1,-1,1) 'xmlStr = Replace(xmlStr,">",">",1,-1,1) 'Response.Write xmlStr
else
Response.Write objHTTP.Statu&"<br>" Response.Write objHTTP.StatusText end if %>
附件返回的xml:
红色的部分让我花了好多时间,原来送过去的时候asp默认的是用gb2312进行URLEncode,而。net是用utf-8,还有解析xml,这里就不用说了,花了好多的时间,都是直接载入xml文件的,但是和返回的xml文件其实是一样的!
参考文章:http://hi.baidu.com/westfruit/blog/item/01b8d0d7d8f17cd8a044df3d.html