Birazda kendi gördüğüm dersin konusu üzerine yazmak istedim.Artık gelişen web2.0 dünyasıyla rss gereksinim oldu web siteleri için. asp bloglarında kimileri rss sayasını kendileri oluşturmak zorundalar tabi asp zor ama gayet kullanışlı bir dil olduğundan dolayı yazıyorum.Rss izlemeleri genellikle haber siteleri download siteleri ve bloglarda kullanılmaktadır.RSS ile sitemizde ki içeriğin, ziyaretçilerimiz tarafından yardımcı bir program kullanılarak sitemize girmesine gerek kalmadan okuyabilmelerini sağlayabiliriz.Evet dersimize başlıyoruz.Kendimce hazırlamış olduğum bir örnek

<% Set baglanti = Server.CreateObject(”ADODB.Connection” ) baglanti.Open “DRIVER={Microsoft Access Driver (*.mdb )}; DBQ=” & Server.MapPath(”database/db.mdb” )Response.Buffer = True Response.ContentType = “text/xml”Function Temizle(strInput ) strInput = Replace(strInput,”&”, “&” ) strInput = Replace(strInput,”", “” ) strInput = Replace(strInput,”"”", “”" ) strInput = Replace(strInput,”>”, “>” ) strInput = Replace(strInput,”<”,”<” ) strInput = Replace(strInput,”İ”,”I” ) strInput = Replace(strInput,”Ş”,”S” ) strInput = Replace(strInput,”Ü”,”U” ) strInput = Replace(strInput,”Ö”,”O” ) strInput = Replace(strInput,”Ç”,”C” ) strInput = Replace(strInput,”Ğ”,”G” ) strInput = Replace(strInput,”ğ”,”g” ) strInput = Replace(strInput,”ı”,”i” ) strInput = Replace(strInput,”ş”,”s” ) strInput = Replace(strInput,”ü”,”u” ) strInput = Replace(strInput,”ö”,”o” ) strInput = Replace(strInput,”ç”,”c” ) Temizle = strInput End Function %> <rss version=”2.0″> <channel> <title>SİTENİZİN ADI</title> <link>http://www.siteniz.com</link> <description>En Son Eklenen 20 İçerik</description> <language>tr</language> <% Set rs = Server.CreateObject(”ADODB.Recordset” ) SQL = “Select * from tablo_adi order by tarih desc” rs.Open SQL,baglanti,1,3 i = 0 Do While i =< 19 And Not rs.Eof Response.Write “<item>” Response.Write “<title>” &Temizle(rs(”icerik_adi” ) ) & “</title>” Response.Write “<link>http://www.siteniz.com/icerik.asp?id=”& Sil(rs(”id” ) ) &”</link>” Response.Write “<description>İcerik Aciklamasi : ” & Temizle(rs(”icerik_aciklamasi” ) ) & “</description>” Response.Write “</item>” i = i + 1 rs.MoveNext Loop rs.Close %></channel></rss>

Evet bunlar rss kodlarımız.Yukarıda görmüş olduğunuz kodda ki ilgili yerleri kendi sitenize göre düzenleyerek RSS sayfanızı oluşturabilirsiniz. RSS sayfası içerisinde, veritabanından gelen Türkçe harflerde yer alan noktaları replace yöntemi ile kaldırmaktayız.Burada belirtilmiş olan http://www.siteniz.com/icerik.asp?id= kısmı sizin rss akışınızı geleceği yoldur.Bir bakımada kaynaktır.Burada rss akışınızı düzgün okutabilmeniz için bu adres değiştirmeniz lazımdır.Yani bir bakımada sizin kaynak yolunuzu yazmanız gerekmektedir.Burada icerik.asp?id= kısmı her sitede olmayabilir.Kullandığınız script farklı yollar oluşturuyor olabilir.Örneği haber sitelerinde detay.asp?detayid= olabiliyor.Burada en önemli nokta sizin kaynaklarınızdaki linklerdir.Buradaki linki kendi dosyanızın kaynak linki vererek rss adresimizi yapıyoruz

RSS sayfasında, aşağıda yer alan hatayı alırsanız Türkçe karakterleri düzenleyerek bu hatayı giderebilirsiniz.
“An invalid character was found in text content. Error processing resource”