In diesem Artikel wird hauptsächlich vorgestellt, wie Asp XML analysiert und in Seiten anzeigt. Freunde in Not können darauf verweisen.
Asp analysiert XML und zeigt es in Seiten an. Der Beispielquellcode lautet wie folgt:
Kopieren Sie den Codecode wie folgt:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<Kopf>
<link href="http://www.fx678.com/css/cur_topics.css" type="text/css" />
<script language="javascript" type="text/ecmascript" src="http://www.fx678.com/js/jquery-1.8.0.min.js"></script>
<title>Spezialthema Vermögensmacht</title>
<style type="text/css">
#right_topic
{
schweben: rechts;
Höhe: automatisch;
Breite: 690px;
}
#right_topic .xinhua
{
klar: beides;
Breite: 690px;
Überlauf: versteckt;
Schriftgröße: 14px;
Farbe: #444;
Zeilenhöhe: 24px;
}
#right_topic .xinhua img
{
Rand: 0;
}
#right_topic .xinhua .top_cont
{
Rand: 1px fest #ddd;
Höhe: 140px;
}
#right_topic .xinhua .top_cont .xh_logo
{
Breite: 270px;
schweben: links;
Rand: 25px 10px;
}
#right_topic .xinhua .top_cont .xh_text
{
schweben: rechts;
Breite: 390px;
Schriftgröße: 14px;
Zeilenhöhe: 22px;
Farbe: #666;
Rand oben: 15px;
}
.Liste
{
klar: beides;
Rand oben: 15px;
Überlauf: versteckt;
border-bottom: 3px solid #206295;
}
.listul
{
Rand: 0;
Polsterung: 0;
}
.listulli
{
Listenstil: keiner;
border-bottom: 1px gepunktet #E5E5E5;
Polsterung: 10px;
}
.list ul li h4
{
Schriftfamilie: „Microsoft Yahei“;
Schriftgröße: 18px;
Schriftstärke: normal;
Zeilenhöhe: 22px;
Rand: 0px;
Rand unten: 5px;
Polsterung: 0;
Farbe: #0761B7;
}
.list ul li h4 a
{
Farbe: #206295;
Textdekoration: keine;
}
.list ul li h4 a:hover
{
Textdekoration: unterstreichen;
}
.listulli span
{
schweben: rechts;
Breite: 120px;
Farbe: #999;
Schriftgröße: 14px;
Textausrichtung: rechts;
}
.list ul li p
{
Rand: 0;
Polsterung: 0;
Schriftgröße: 12px;
}
.listulli.bg
{
Hintergrund: #f5f8fa;
}
#pageZone
{
Hintergrund: #F5F6FB;
border-bottom: 1px solide #DBE3EE;
Rand: 10 Pixel, automatisch 20 Pixel;
Polsterung: 10px 0;
Textausrichtung: Mitte;
}
#pageZone-Bereich
{
Hintergrund: #FFFFFF;
Rand: 1 Pixel fest #D8DADF;
Schriftgröße: 14px;
Höhe: 34px;
Zeilenhöhe: 34px;
Rand: 0px 2px;
Polsterung: 8px 12px;
}
#pageZone umfasst a
{
Farbe: #666;
Textdekoration: keine;
}
#pageZone span.isNow
{
Hintergrund: #206295;
Rand: 1 Pixel fest #D8DADF;
Farbe: #FFFFFF;
}
</style>
<script type="text/javascript">
var $m = $(window.parent.document).find("#MyXH08");
$m.load(function () {
var thish = $(document).height() + 30;
$m.height(thish);
});
</script>
</head>
<Körper>
<!-- Listeninformationen-->
<div>
<ul>
<%
Dimmen Sie xmlDoc,objNodes,pIndex,pSize,i,http,xmlUrl
pSize = 10 'Seitengröße
xmlUrl="http://back.moneypower.cn/news.xml"
REM-Seitenindex
pIndex = Request.QueryString("p")
wenn Cint(pIndex) > 6 oder Cint(pIndex) < 1 dann
pIndex = 1
Ende wenn
REM liest die XML-Quelle asynchron
Setze http = Server.CreateObject("Microsoft.XMLHTTP")
http.open „GET“,xmlUrl,false
http.send
REM definiert Variablen zum Lesen von XML
Setze xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.validateOnParse = false
xmlDoc.load(http.ResponseXML)
Setze objNodes = xmlDoc.getElementsByTagName("item")
wenn objNodes.length > 0 dann
ich = 0
Für j = (pSize*(pIndex-1)) bis (pSize*pIndex-1) Schritt 1
myTitle = objNodes(j).childNodes(0).text
myDate = objNodes(j).childNodes(3).text
myDescription = objNodes(j).childNodes(2).text
link = Server.URLEncode(objNodes(j).childNodes(1).text)
myLink = "http://www.fx678.com/news/currency/XH08NewsContent.asp?u=" & Link
%>
<% wenn i Mod 2 = 0 dann %>
<li>
<% sonst %>
<li>
<% end if %>
<h4>
<span>
<%= FormatDate(myDate,2) %>
</span><a target="_blank" href="<%= myLink %>">
<%= myTitle %></a></h4>
<p>
<%= myDescription %>
</p>
</li>
<%
ich = ich + 1
Nächste
Anders
Response.Write("Noch keine Daten!")
Ende wenn
%>
</ul>
</div>
<!--Paging-Informationen-->
<div>
<%
wenn pIndex = 1 dann
%>
<span>Erste Seite</span>
<span><<Vorherige Seite</span>
<span&m
d = CStr(Day(DateAndTime))
Wenn Len(d) = 1, dann ist d = „0“ & d
h = CStr(Hour(DateAndTime))
Wenn Len(h) = 1, dann ist h = „0“ & h
mi = CStr(Minute(DateAndTime))
Wenn Len(mi) = 1, dann mi = „0“ & mi
s = CStr(Second(DateAndTime))
Wenn Len(s) = 1, dann ist s = „0“ & s
Wählen Sie Fallpara
Fall „1“
strDateTime = y & "-" & m & "-" & d & " " & h & :: & mi & :: & s
Fall „2“
strDateTime = y & "-" & m & "-" & d
Fall „3“
strDateTime = y & "http://www.vevb.com/" & m & "http://www.vevb.com/" & d
Fall „4“
strDateTime = y & „year“ & m & „month“ & d & „day“
Fall „5“
strDateTime = m & "-" & d
Fall „6“
strDateTime = m & "http://www.vevb.com/" & d
Fall „7“
strDateTime = m & „Monat“ & d & „Tag“
Fall „8“
strDateTime = y & „Jahr“ & m & „Monat“
Fall „9“
strDateTime = y & "-" & m
Fall „10“
strDateTime = y & "http://www.vevb.com/" & m
Fall „11“
strDateTime = m & "-" & d & " " & h & :: & mi
Fall „12“
strDateTime = h & :: & mi & :: & s
Fall „13“
strDateTime = y & m & d & h & mi & s
Fall „14“
strDateTime = y&m&d
Fall „15“
strDateTime = h&mi&s
Fall „16“
strDateTime = h & ":" & mi
Fall „17“
strDateTime = y & m & d & h & mi & s
Fall „18“
strDateTime = y&m&d
Fall „19“
strDateTime = y&m
Fall anders
strDateTime = DateAndTime
Endauswahl
FormatDate = strDateTime
Funktion beenden
%>
Rendering (Teil):