<نمط>
الجسم {الهامش:10px;لون الخلفية:#ffffff;الهامش العلوي:6px;}
النموذج {الهامش: 0px؛}
* {font:12px تاهوما;ارتفاع الخط:140%;اللون:#000000}
.العنوان {وزن الخط: غامق؛ اللون: أحمر؛}
.الوقت {الخط:10px;اللون:#999999;}
أ {زخرفة النص: لا شيء؛ اللون: أزرق؛}
</نمط>
<نوع البرنامج النصي = "نص/جافا سكريبت">
فار الجلاد=0;
</script>
<body ondblclick="if(switcher==0){document.styleSheets[0].addRule('div','display:none');switcher=1}else{document.styleSheets[0].addRule('div) ','display:block');switcher=0}">
<اسم النموذج = "rssform" الطريقة = الإجراء اللاحق = "">
رسالة RSS: <INPUT TYPE = "text" NAME = "RssFeed" size = 60 style = "height:22px" value = "<%=request("RssFeed")%>" onfocus=select()> <input type= "إرسال" value = "اقرأها">
</النموذج>
<ساعة/>
<%
إذا (طلب ("RssFeed") = "") ثم
URL = "/rss2.asp"
آخر
url=request("RssFeed")
إنهاء إذا
تم تعيين xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.فتح "GET"، عنوان url، خطأ
xml.Send
Set xmlDom = server.createObject("microsoft.xmldom")
xmlDom.async=خطأ
xmlDom.ValidateOnParse=false
xmlDom.load(xml.responseXML)
إذا xmlDom.ReadyState>2 ثم
قم بتعيين oItem=xmlDom.getElementsByTagName("item")
لـ i=0 إلى oItem.length-1
Response.write "<span style='font:bold 9px verdana;color:#000000'>"&i+1&"</span>. <a class='title' href='"&oItem(i).childNodes(1) .text&"' target='_blank'>"&oItem(i).childNodes(0).text&"</a> <span class='time'>["&oItem(i).childNodes(3).text&" ]<br />"
Response.write "<div>الإجابة:"&oItem(i).childNodes(4).text&"</div><br>"
التالي
نهاية إذا
%>