Haz 26

ASP ile RSS Beslemesi Oluşturmak 26 Haziran 2008 Perşembe | 16 yorum

RSS (Really Simple Syndication), haber servisleri veya kişisel günlükler gibi veri akışının önemli olduğu yapılarda, eklenen yeni içeriğin kullanıcılar tarafından kolaylıkla takip edilebilmesi amacıyla geliştirilmiş bir sistemdir. Özel RSS okuyucuları ya da internet uygulamaları sayesinde güncel veriler veritabanından çekilir ve kullanıcıya sunulur. Bu bakımdan RSS teknolojisi, bilgiye ulaşımı hızlandırması ve kolaylaştırması açısından oldukça önemlidir.

ASP ile RSS beslemesi oluşturmak, sanıldığının aksine oldukça basittir. İhtiyacımız olanlar, bir veritabanı dosyası ve bu veritabanından bilgileri çekmeye yarayacak RSS standartlarına dâhil edilmiş kodlar. Bu yazımızda ASP ile bir RSS beslemesi dosyası oluşturup, veritabanımızdan verileri çekeceğiz. Bunun için gerekli olan kodlar şöyledir:

<?xml version="1.0" encoding="iso-8859-9"?>
<%
'#############################################
'## ASP ile RSS Beslemesi Oluşturma Kodları ##
'## Hazırlayan: İsa SARI / www.isa-sari.com ##
'#############################################
%>
<rss version="2.0">
<%
'## Veritabanı bağlantımızı kuruyoruz. veritabani.mdb dosyasını kendi veritabanı 
dosyanızın ismine göre değiştirebilirsiniz.
Set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabani.mdb")

Response.Buffer = True
Response.ContentType = "text/xml"
%>
<channel>
<%
'## Bu kısımda sitemizin başlığını, adresini ve RSS tanımlamasını giriyoruz.
%>
<title>Sitenizin Başlığı</title>
<link>http://www.sitenizinadresi.com</link>
<description>En son eklenen 20 kayıt</description>
<language>tr</language>
<%
'## Veritabanından kaç adet verinin çekileceğini belirtiyoruz. Burada örnek 
olarak 20 adet veriyi çekiyoruz.
'## İhtiaçlarınıza göre bu sayıyı değiştirebilirsiniz.
'## Örnek tablomuzun ismi "icerik". Tablomuzda 5 adet örnek girdi var.
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "Select top 20 * from icerik order by id desc"
rs.Open SQL,baglanti,1,3

i = 0
Do While i =< 19 And Not rs.Eof

'## RSS için gerekli olan unsurları sıralamaya başladık.
'## Veritabanımızda kayıtlı olan tablodan ve ilgi sütunlardan çekilen verileri 
ekrana yazdırıyoruz.
'## Buradaki 310 sayısı, içerikten belli bir özet halinde veri çekmemizi 
sağlıyor. Karakter sayısını belirtir.
'## Bağlantı atamalarını kendi sitenizin adresleme yöntemine göre 
düzenleyebilirsiniz.
Response.Write "<item>"
Response.Write "<title><![CDATA["&rs("baslik")&" / "&rs("tarih")&"]]></title>"
Response.Write "<link><![CDATA[#id="& rs("id") &"]]></link>"
Response.Write "<description><![CDATA[" & left(rs("icerik"),310) & "...<br><br><a 
target=""_blank"" href=""#id="& rs("id") &""">Devamı için tıklayınız</a>]]></description>"
Response.Write "</item>"

i = i + 1
rs.MoveNext
Loop
rs.Close
%></channel></rss>

Yukarıda yer alan kodları ve örnek veritabanıyla birlikte çalışan bir RSS uygulamasını aşağıda yer alan bağlantıdan indirebilirsiniz.

5512 okunma

16 yorum

Yazıcı şekli

İndir

Paylaş

Yorumlar

Faik Arslan / 29 Haziran 2008 Pazar - 18:46 Ne zamandır bunu arıyordum. Hazır sitelerde RSS geliyor ama kendi sitem için kullanamıyordum. Çok yardımcı oldu bu kodlar. Eliniz dert görmesin...

Şenel AKSOY / 19 Eylül 2008 Cuma - 23:23 Elinize sağlık

Kurtar KARAKUŞ / 1 Aralık 2008 Pazartesi - 18:23 İsacım çok sağol. İşime yaradı

Mehmet Onur SEKİZKARDEŞ / 2 Şubat 2009 Pazartesi - 13:52 Selam öncelikle tşk ederim yanlız bir sorunum var yardımcı olursanızsevinirim. ben kodları rss.asp şeklinde kaydettim. Linklerde bozukluk oluyor örneğin Devamı için tıklayın a basıldıgında http://www.domain.com/rss.asp#id=12 bunun yerine http://www.domain.com/haberoku.asp?id=12 yapmak istiyorum yardımlarınızı bekliyorum.

Halit Ziya Kapıcı / 12 Şubat 2009 Perşembe - 16:57 Mehmet arkadaşım, onun için href=""#id="& rs("id") &" yazan yeri haberoku.asp?id="& rs("id") &" yapman lazım. Ben öyle yaptım ve çalıştı.

Ahmet Can / 2 Mayıs 2009 Cumartesi - 02:30 bunu asp mysql db için nasıl yaparız

Ahmet Can / 2 Mayıs 2009 Cumartesi - 14:41 hocam yardımcı olurmusunuz bana bu konuda hiç bi sitede mysql için bi kaynak bulamadım

İsa Sarı / 2 Mayıs 2009 Cumartesi - 15:52 Ahmet Can, MySQL ile ilgili pek fazla bir bilgim olmadığı için yardımcı olamıyorum. İnternet üzerinden araştırma yaparak bilgi edilebileceğinizi düşünüyorum.

semih çelik / 21 Ekim 2009 Çarşamba - 01:34 çok teşekkür ederiz..peki bu torrent sitelerindeki rss ekleme olayı hakında bilginiz varmı nedir ne işe yarar varsa önerebileceginiz bi bağlantı varmı ?

fatih erener / 2 Mayıs 2010 Pazar - 23:02 db ayarı yaptım ancak son kısımda yer alan düzenlemeyi yapamadığım için sanırım açılmıyor sayfa yardımcı olabilirmisiniz.

Mesut Özden / 12 Eylül 2011 Pazartesi - 03:45 Merhabalar; Bunu www.toptantedarikci.com sitesine eklemek istiyorum nasıl yapmam gerektiği konusunda yardımcı olabilir misiniz.. İyi Çalışmalar

Kemal / 1 Aralık 2011 Perşembe - 01:27 Kodlar için çok teşekkür ederim. Biraz önce siteme uyarladım. Sorunsuz bir şekilde çalışmaktadır.

Serkan / 12 Şubat 2012 Pazar - 11:44 sayın yetkili bunu yaptık var sayalım bunu feedBurner nasıl ilişkilendireceğiz lotocilginligi.com adlı sitemde uygulamaya çalışacağım.

İsa Sarı / 12 Şubat 2012 Pazar - 13:10 Serkan Bey, Feedburner'a üye olarak gerekli işlemleri yapabilirsiniz.

hakan / 3 Mart 2012 Cumartesi - 22:10 arkadaslar ben bir turlu beceremedim.. mdb klasorun icinde ama yolu veremedim galiba bilen arkadas yardimci olurmu ? Msql dan olan başka bi scriptim daha var ondan nasıl cagirabilirim.. tşk. ederim

mozkaradas / 15 Nisan 2012 Pazar - 20:22 peki bu dosyanın uzantısı yine .asp mi olacak. hayır yani o şekilde yapınca listeleme yapmıyorda. farklı birşey ise ve belirtirseniz çok sevinirim.

Yorum Ekle   Ad - Soyad   E-posta Adresi   Ağ Sitesi Yorumum aşağıdaki şartlara uygundur. Yeni yorumlarda uyarı mesajı gönder. Yazacağınız yorum ve mesajlarda, - Gerçek adınızı ve soyadınızı belirtiniz. - Geçerli bir e-posta adresi giriniz. - Dilbilgisi kurallarına uyunuz. Bu şartları sağlamayan yorum ve mesajlar yayımlanmayacaktır.