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
Ïà¹ØÎÊ´ð£º
ÓÐÒ»¸öÀà
class adc
{
dim a,b,c
}
ÈçºÎÔÚÁíÍâÒ»¸öÀàÖÐÈ¡µÃÀà³ÉÔ±¼°³ÉÔ±¸öÊý
class getmenber
{
dim menbers()
function getmenbers(resclass)
'resΪһδ֪Àà
'getmenber ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
¹ØÓÚÍøÕ¾°²È«µÄÎÊÌ⣡
ÎÒÁ˽⵽µÄÍøÕ¾°²È«ÎÊÌâ°üÀ¨£º
sql×¢Èë©¶´ºÍ±©¿â©¶´»¹ÓÐÉÏ´«Â©¶´
³ýÁËÕâЩ»¹ÓÐÆäËûµÄ©¶´Ã´£¿
×¢Èë©¶´¿ÉÒÔͨ¹ý¹ýÂËÀ´·ÀÖ¹
±©¿â©¶´Ôõô·ÀÖ¹
»¹ÓÐÈËÉÏ´«µÄľÂíÊÇ.gif
ÕâÖÖ©¶´Ôõôȥ± ......
ÎÒ×î½ü×öÁËÒ»¸öÍøÕ¾ÊǹØÓÚ²úƷչʾµÄ ~ Õû¸öÍøÕ¾Í¼Æ¬¶¼Õ¼ÓÃÁËÒ»´ó°ë
ÕâÑùµÄ»°·ÃÎÊËٶȾͷdz£Âý ÓÐʲô°ì·¨¿ÉÒÔ½â¾öÂð£¿
Âé·³´ó¼Ò¶à¶à¸øµãÒâ¼û £¡ ÓÐʲô¾¡¹Ü˵
3Q´ó¼Ò
htmlÒ³Ãæ.
Õâ¸ö,¼ÈÈ»Ö÷Ò ......
<tr>
<td width="700" valign="top" align="left">
<!--¼ÓÔØÊý¾Ý¿â²úÆ·Áбí°üº¬·ÖÒ³´úÂ뿪ʼ -->
<tabl ......