asp´¦ÀíxmlÎÊÌâ - Web ¿ª·¢ / ASP

¸Õ¿ªÊ¼×öasp£¬ÎÒ×ö.netµÄ£¬¼æ×öÏÂasp£¬ÏÖÔÚ¹ØÓÚxmlÎÊÌ⣬Çë½Ì

Èç¹û±ð¸öÇëÇóÎÒµÄÒ³Ã棬´«µÝµÄÊÇxml¸ñʽ
ÎÒ¿ÉÒÔÕâÑù½ÓÊÕ
VBScript code:


set xmlDOC=Server.CreateObject("MSXML.DOMDocument")
xmlDOC.async = False
xmlDOC.Load Request

If xmlDOC.parseError.errorCode <> 0 Then
Response.Write "²»ÊÇxml¸ñʽ"
Response.End()
End If
set blogchild=xmlDOC.getElementsByTagName("msg")
'........................´¦Àí



µ«ÊÇÏÖÔÚÊÇÎÒÇëÇó±ðÈË£¬·µ»ØÊÇxml¸ñʽµÄ£¬ÎÒ½ÓÊÕ²»ÁË£¬ÒªÔõô½ÓÊÕ
VBScript code:


str=getHTTPPage("http://www.xxxx.com") '¶Ô·½·µ»ØµÄÊÇxml¸ñʽ
set xmlDOC=Server.CreateObject("MSXML.DOMDocument")
xmlDOC.async = False
xmlDOC.Load [color=#FF0000]str[/color]

If xmlDOC.parseError.errorCode <> 0 Then
Response.Write "²»ÊÇxml¸ñʽ"
Response.End()
End If
set blogchild=xmlDOC.getElementsByTagName("msg")
'........................´¦Àí



ÕâÑù²»ÐÐ

---

VBScript code:

str=getHTTPPage("http://www.xxxx.com") '¶Ô·½·µ»ØµÄÊÇxml¸ñʽ
set xmlDOC=Server.CreateObject("MSXML.DOMDocu