ASP ile RSS Yayınlama Örneği

[Fmulti]

İlk önemli nokta browser' ın .asp uzantısına rağmen sayfayı XML olarak yorumlaması gerektiği;

Sayfanın başına bunu koymamız yeterli,
Kod:

Response.ContentType="application/xml"

	IntPageSize = 15 	 	RsNewsSQL = "SELECT TOP 15 id, baslik, makale, tarih FROM makaleler ORDER BY id DESC"  	Set RsNews = Server.CreateObject("ADODB.Recordset") 	RsNews.ActiveConnection = conn 	RsNews.Source = RsNewsSQL 	RsNews.CursorType = 1 	RsNews.Cursor******** = 2 	RsNews.LockType = 1 	RsNews.Open()  %> <?xml version="1.0" encoding="iso-8859-9"?> <rss version="2.0"> 	<channel> 		<title>Ferruh Mavituna | Articles</title> 		<link>http://ferruh.mavituna.com</link> 		<description>Ferruh Mavituna tarafından yazılan güvenlik, web teknolojileri başta olmak üzere çeşitli konuları kapsayan makaleler ve haberler.</description> 		<language>tr</language> 		<copyright>Copyright 1997-2003 Ferruh Mavituna</copyright> 		<lastBuildDate><%=GetRFC822Date(RsNews("Tarih"))%></lastBuildDate> 		<docs>http://backend.userland.com/rss</docs> 		<generator>Ferruh Mavituna ASP - RSS</generator> 		<managingEditor>ferruh-at-mavituna.com</managingEditor> 		<webMaster>ferruh-at-mavituna.com</webMaster> 		<ttl>60</ttl>  	   <image> 		  <title>Ferruh Mavituna</title> 		  <url>http://ferruh.mavituna.com/rss/rss.gif</url> 		  <link>http://ferruh.mavituna.com</link> 	   </image> <% 	While Not RsNews.EOF 		Makale = RsNews("makale")  		Makale = fm_GoodLinks(DbNews)  		'Fix RSS 		Makale = Replace(Xstr," src=""/"," src=""http://ferruh.mavituna.com/") 		Makale = Server.HTMLEncode(Xstr) 		Baslik = Server.HTMLEncode(RsNews("Baslik"))   		Response.Write "<item>" & vbNewline &_ 		"<title>" & Baslik &"</title>" & vbNewline &_	 		"<pubDate>" & GetRFC822Date(RsNews("Tarih")) & "</pubDate>" & vbNewline &_ 		"<link>http://ferruh.mavituna.com/article/?" & RsNews("ID") & "</link>" & vbNewline &_ 		"<description>" &  Makale & "</description>" & vbNewline &_ 		"</item>"  		RsNews.MoveNext 	Wend  	RsNews.Close 	Set RsNews = Nothing %>  	</channel> 	</rss>

 

[OptiMistics]

teşekkürler.

 

[Fmulti]

teşekkürler.

Bişey değil!..

 

[kutlucan1]

Teşekkürler