Utilisez asp pour obtenir le fichier XML du sujet spécifié, puis lisez le contenu de la liste du fichier XML par lots.
Copiez le code comme suit :<title>Lei Feng|Youku-Album Collection Program</title></head>
<form name=form1 method=post action=?action=add>
<table width=95% border=0 align =center cellpadding=0 cellpacing=1 class=tableBorder>
<tr><th colspan=2 align=center class=tableHeaderText><<<< <font color=red>Lei Feng|Programme de collection d'albums Youku</font> >>>></td></tr>
<tr><td align=center><a href=http://www.youku.com/playlist/ target=_blank>Cliquez sur moi pour trouver l'album Youku</a >
</td>
</tr>
<tr><td bgcolor=#FFFFFF align=center>Adresse de l'album : <input name=maxz type=text value=<%=Request(maxz)%> size=50></ td ></tr>
<tr><td align=center bgcolor=#FFFFFF>Par exemple album : http://www.youku.com/playlist_show/id_2344971.html</td></tr>
<tr><td align=center bgcolor= # FFFFFF><input name=action type=submit id=action value=Soumettre l'adresse de l'album pour analyse></td></tr>
<tr><td align=center bgcolor=#FFFFFF></td></tr>
</table>
</form>
<%
if Request(action)=add Then
maxz=request.Form(maxz)
v_urla=Split(maxz,/id_)(1 )
v_urlb=Replace(v_urla,.html,)
v_url=http://www.youku.com/playlist/rss/id/4014024&v_urlb
réponse.write <div align=center><a href=&v_url& target=_blank >XML de l'album actuel :&v_url&</a></div>
Fonction GetPageContent(Url)
Dim HTTPObj
sur erreur Reprendre suivant
Définir HTTPObj = Server.CreateObject(Microsoft. XMLHTTP )
Avec HTTPObj
.Open Get, Url, False, ,
.Send
End With
if HTTPObj.Readystate <> 4 puis
définissez HTTPObj = Nothing
GetPageContent = False
Exit Function
end if
GetPageContent = replace(HTTPObj.responseText,UTF-8,gb2312)
Set HTTPObj = Nothing
End Function
strXML=GetPageContent(&v_url&)
Set objXML = Server.CreateObject(Microsoft.XMLDOM)
objXML .validateonparse = vrai
objXML.async=false
objXML.loadXML(strXML)
set objRootElement = objXML.documentElement
if not isObject(objRootElement) then
Response.Write(aucun fichier chargé)
else
Set ChannelList=objXML.getElementsByTagName(item)
if isnull(objXML.getElementsByTagName(item ) ) puis
réponse.Write (échec de la lecture)
réponse.End()
else
Set Statistics=objXML.getElementsByTagName(title)
set KeywordList=objXML.getElementsbytagname(lastBuildDate)
'response.write Total : &keywordlist.length-1&channels'response.write
<div align=center><h4> Album nom : &Statistics.item(0).text&</h4>
v_name=REPLACE(Statistics.item(0).text,Youku-Album-,)
zt_name=REPLACE(v_name, video,)
réponse.write <div align=center><h4>Nom de l'album : <font color=red> &zt_name& </font></h4>
réponse.write <center><form method=post action=../admin_add.asp>
réponse.write <input type=hidden name=db_channel value=&zt_name& /><br>
réponse.write <input type=hidden name=db_player value=youku />
réponse.write <textarea name=db_url rows=15 cols=100>
pour j=0 à ChannelList.length-1
dim
réponse
ibb.write
&ChannelList.item(j).childnodes(0).text&$&ChannelList.item(j).childnodes(8).text&chr(13)&
ibb=ibb+1
prochaine
réponse.write </textarea><br /><input type=submit value=modified submit/></form></center>
réponse.write <div align=center><h4>Un total d'extraits : <font color=red>&ibb&</font> Soumettre après vérification</h4></div><br>
end if
end if
%>
<%End If %>
Le programme ci-dessus est basé sur la liste d'albums de Youku à titre d'exemple Exemple d'asp lire du XML !
Enregistrez le code ci-dessus au format XML.ASP et exécutez-le dans l'environnement IIS pour collecter les données de l'album Youku !
En fait, ce qui est obtenu ci-dessus est
le code de copie du fichier xml suivant. Le code est le suivant :
<?xml version=1.0 encoding=utf-8?>
<!-- generateur=Novajax Feed Writer -->
<rss. version=2.0 xmlns:media=http ://search.yahoo.com/mrss xmlns:itunes=http://www.itunes.com/dtds/podcast-1.0.dtd>
<canal>
<title>Youku-Album-Vidéo de Qianlong et Xiangfei (épisode 27)</title>
<description>Vidéo de l'album Youku Qianlong et Xiangfei (épisode 27)</description>
<link>http://www.youku .com /playlist/</link>
<lastBuildDate>Mer 16 décembre 2009 13:34:06 +0800</lastBuildDate>
<generator>Novajax Feed Writer</generator>
<image>
<url>http://www.youku.com/index/img/youkulogo.gif</url>
<title>Youku.com - Réseau vidéo n°1 en Chine, offrant la lecture vidéo , publication vidéo, recherche vidéo</title>
<link>http://www.youku.com</link>
<description>Plateforme de services vidéo, fournissant la lecture vidéo, la publication vidéo, la recherche vidéo, le partage vidéo</description>
< /image >
<élément>
<title>Qianlong et Xiangfei 01</title>
<link>http://www.youku.com/v_show/id_XMTM4NTY5NDk2_rss.html</link>
<description><![CDATA[<a href=http:// www .youku.com/v_show/id_XMTM4NTY5NDk2_rss.html><img src=http://g3.ykimg.com/0100641F464B178EA61F9F011876CAD9220D5D-8DAE-B491-FD1B-138F2DC75B23 border=0 width=120 height=90 vspace=4 hspace=4 /><itunes:duration>43:42</itunes : durée>
<itunes:keywords>Zunlong, Nurbia, Tianniu, Weng Hong, Ainur, Guhaier, Tan Feiling, Valiyi, Slamjiangsi</itunes:keywords>
<author>Weijie coule< /author>
<comments>http://www.youku. com/v_show/id_XMTM4NTY5NDk2_rss.html#comments</comments>
<pubDate>Mer, 16 décembre 2009 13:34:06 +0800</pubDate>
<guid>34642374</guid>
<enclosure type=application/x-shockwave-flash url=http://player.youku.com/player.php/sid /34642374/v.swf></enclosure>
</item>
<item>
<title>Qianlong et Xiangfei 02</title>
<link>http://www.youku.com/v_show/id_XMTM4NTY5NTI4_rss.html</link>
<description><![CDATA[<a href=http://www .youku.com/v_show/id_XMTM4NTY5NTI4_rss.html><img src=http://g2.ykimg.com/0100641F464B178D99EF1F011876CA86F7B34B-B71C-2F1E-36B5-D0804F32AB42 border=0 width=120 height=90 vspace=4 hspace=4 /><itunes:duration>41:26</itunes : durée>
<itunes:keywords>Zunlong, Nurbia, Tianniu, Weng Hong, Ainur, Guhaier, Tan Feiling, Valiyi, Slamjiangsi</itunes:keywords>
<author>Weijie coule< /author>
<comments>http://www.youku. com/v_show/id_XMTM4NTY5NTI4_rss.html#comments</comments>
<pubDate>Mer, 16 décembre 2009 13:34:06 +0800</pubDate>
<guid>34642382</guid>
<enclosure type=application/x-shockwave-flash url=http://player.youku.com/player.php/sid /34642382/v.swf></enclosure>
</item>
</channel>
</rss>