تعرض هذه المقالة بشكل أساسي كيفية قيام Asp بتحليل XML وعرضه في الصفحات التي يمكن للأصدقاء المحتاجين الرجوع إليها.
يقوم Asp بتوزيع XML وعرضه في الصفحات. نموذج التعليمات البرمجية المصدر هو كما يلي:
انسخ رمز الكود كما يلي:
<!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">
<الرأس>
<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>موضوع خاص عن قوة الثروة</title>
<نمط النوع = "نص/CSS">
#الموضوع_الصحيح
{
تعويم: حق؛
الارتفاع: تلقائي؛
العرض: 690 بكسل؛
}
#الموضوع_الصحيح .xinhua
{
واضح: كلاهما؛
العرض: 690 بكسل؛
الفائض: مخفي؛
حجم الخط: 14 بكسل؛
اللون: #444؛
ارتفاع الخط: 24 بكسل؛
}
#الموضوع_الصحيح .xinhua img
{
الحدود: 0؛
}
#الموضوع_الصحيح .xinhua .top_cont
{
الحدود: 1px الصلبة #ddd؛
الارتفاع: 140 بكسل؛
}
#الموضوع_الصحيح .xinhua .top_cont .xh_logo
{
العرض: 270 بكسل؛
تعويم: يسار؛
الهامش: 25 بكسل 10 بكسل؛
}
#right_topic .xinhua .top_cont .xh_text
{
تعويم: حق؛
العرض: 390 بكسل؛
حجم الخط: 14 بكسل؛
ارتفاع الخط: 22 بكسل؛
اللون: #666؛
الهامش العلوي: 15 بكسل؛
}
.قائمة
{
واضح: كلاهما؛
الهامش العلوي: 15 بكسل؛
الفائض: مخفي؛
الحد السفلي: 3 بكسل صلب #206295؛
}
.listul
{
الهامش: 0;
الحشو: 0؛
}
.listulli
{
نمط القائمة: لا شيء؛
الحد السفلي: 1 بكسل منقط #E5E5E5؛
الحشو: 10 بكسل؛
}
.قائمة ماي لى h4
{
عائلة الخطوط: "Microsoft Yahei"؛
حجم الخط: 18 بكسل؛
وزن الخط: عادي؛
ارتفاع الخط: 22 بكسل؛
الهامش: 0 بكسل؛
الهامش السفلي: 5 بكسل؛
الحشو: 0؛
اللون: #0761B7؛
}
.قائمة ماي لى h4 أ
{
اللون: #206295؛
زخرفة النص: لا شيء؛
}
.list ul li h4 a:hover
{
زخرفة النص: تسطير؛
}
.listulli تمتد
{
تعويم: حق؛
العرض: 120 بكسل؛
اللون: #999؛
حجم الخط: 14 بكسل؛
محاذاة النص: يمين؛
}
.قائمة ماي لى ص
{
الهامش: 0;
الحشو: 0؛
حجم الخط: 12 بكسل؛
}
.listulli.bg
{
الخلفية: #f5f8fa؛
}
#pageZone
{
الخلفية: #F5F6FB؛
الحد السفلي: 1 بكسل صلب #DBE3EE؛
الهامش: 10 بكسل تلقائي 20 بكسل؛
الحشو: 10 بكسل 0؛
محاذاة النص: مركز؛
}
#pageZone تمتد
{
الخلفية: #FFFFFF؛
الحد: 1 بكسل صلب #D8DADF؛
حجم الخط: 14 بكسل؛
الارتفاع: 34 بكسل؛
ارتفاع الخط: 34 بكسل؛
الهامش: 0px 2px؛
الحشو: 8 بكسل 12 بكسل؛
}
#pageZone تمتد أ
{
اللون: #666؛
زخرفة النص: لا شيء؛
}
#pageZone تمتد.isNow
{
الخلفية: #206295؛
الحدود: 1 بكسل صلبة #D8DADF؛
اللون: #FFFFFF؛
}
</نمط>
<نوع البرنامج النصي = "نص/جافا سكريبت">
var $m = $(window.parent.document).find("#MyXH08");
$م.تحميل(وظيفة () {
فار thish = $(document).height() + 30;
$m.height(thish);
});
</script>
</الرأس>
<الجسم>
<!--معلومات القائمة-->
<ديف>
<ul>
<%
خافت xmlDoc،objNodes،pIndex،pSize،i،http،xmlUrl
pSize = 10 'حجم الصفحة
xmlUrl="http://back.moneypower.cn/news.xml"
فهرس صفحة REM
pIndex = Request.QueryString("p")
إذا كان Cint(pIndex)> 6 أو Cint(pIndex) <1
المؤشر = 1
نهاية إذا
يقرأ REM مصدر XML بشكل غير متزامن
قم بتعيين http = Server.CreateObject("Microsoft.XMLHTTP")
http.open "GET"،xmlUrl،خطأ
http.send
يحدد REM المتغيرات لقراءة XML
تعيين xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = خطأ
xmlDoc.validateOnParse = false
xmlDoc.load(http.ResponseXML)
تعيين objNodes = xmlDoc.getElementsByTagName("item")
إذا objNodes.length > 0 ثم
ط = 0
بالنسبة لـ j = (pSize*(pIndex-1)) إلى (pSize*pIndex-1) الخطوة 1
myTitle = objNodes(j).childNodes(0).text
myDate = objNodes(j).childNodes(3).text
myDescription = objNodes(j).childNodes(2).text
الرابط = Server.URLEncode(objNodes(j).childNodes(1).text)
myLink = "http://www.fx678.com/news/currency/XH08NewsContent.asp?u=" & الرابط
%>
<% إذا كنت Mod 2 = 0 ثم %>
<لي>
<% آخر %>
<لي>
<% نهاية إذا %>
<ح4>
<سبان>
<%= FormatDate(myDate,2) %>
</span><a target="_blank" href="<%= myLink %>">
<%= myTitle %></a></h4>
<ص>
<%= وصفي %>
</ص>
</لي>
<%
ط = ط + 1
التالي
آخر
Response.Write("لا توجد بيانات بعد!")
نهاية إذا
%>
</ul>
</div>
<!--معلومات الترحيل-->
<ديف>
<%
إذا كان pIndex = 1 إذن
%>
<span>الصفحة الأولى</span>
<span><<الصفحة السابقة</span>
<سبان&م
د = CStr(اليوم(التاريخ والوقت))
إذا كان Len(d) = 1 ثم d = "0" & d
h = CStr(ساعة(التاريخ والوقت))
إذا كان Len(h) = 1 ثم h = "0" & h
ميل = CStr(دقيقة(التاريخ والوقت))
إذا كان Len(mi) = 1 ثم mi = "0" & mi
الصورة = CStr(الثانية(التاريخ والوقت))
إذا كانت Len(s) = 1 ثم s = "0" & s
حدد حالة الفقرة
الحالة "1"
strDateTime = y & "-" & m & "-" & d & " " & h & ": " & mi & ": " & s
الحالة "2"
strDateTime = y & "-" & m & "-" & d
الحالة "3"
strDateTime = y & "http://www.vevb.com/" & m & "http://www.vevb.com/" & d
الحالة "4"
strDateTime = y & "السنة" & m & "الشهر" & d & "اليوم"
الحالة "5"
strDateTime = م & "-" & د
الحالة "6"
strDateTime = م & "http://www.vevb.com/" & د
الحالة "7"
strDateTime = m & "الشهر" & d & "اليوم"
الحالة "8"
strDateTime = y & "السنة" & m & "الشهر"
الحالة "9"
strDateTime = y & "-" & m
الحالة "10"
strDateTime = y & "http://www.vevb.com/" & m
الحالة "11"
strDateTime = m & "-" & d & " " & h & ": "& mi
الحالة "12"
strDateTime = h & ": " & mi & ": " & s
الحالة "13"
strDateTime = y & m & d & h & mi & s
القضية "14"
strDateTime = y&m&d
القضية "15"
strDateTime = h&mi&s
القضية "16"
strDateTime = h & ": " & mi
القضية "17"
strDateTime = y & m & d & h & mi & s
القضية "18"
strDateTime = y&m&d
القضية "19"
strDateTime = y&m
حالة أخرى
strDateTime = DateAndTime
إنهاء التحديد
FormatDate = strDateTime
وظيفة النهاية
%>
التقديم (الجزء):