ASP代码： <% set xml_dom = Server.CreateObject("MSXML2.DOMdocument") xml_dom.load request strxml=xml_dom.xml response.Write xml_dom.getelementsbytagname("ToUserName").item(0).text & vbcrlf response.Write xml_dom.getelementsbytagname("FromUserName").item(0).text & vbcrlf response.Write xml_dom.getelementsbytagname("CreateTime").item(0).text & vbcrlf response.Write xml_dom.getelementsbytagname("MsgType").item(0).text & vbcrlf response.Write xml_dom.getelementsbytagname("Content").item(0).text & vbcrlf response.Write xml_dom.getelementsbytagname("MsgId").item(0).text & vbcrlf %>