MyDesign | Kod Arşivi - Anasayfaya Dön   No banner in farm
Anasayfa Araştır Forum Gelişmiş Arama Siteniz İçin En Hit İçerikler RSS İçerik Ekle Scriptler Destekleyenler Kadromuz Reklam İletişim Giriş Sayfası Yap  Sık Kullanılanlara Ekle
Bu Kategorinin En Yeni Makaleleri:


Bu Kategorinin En Çok Okunan Makaleleri:






Arama:
Gelişmiş Arama


No banner in farm



En Çok Görüntülenen Kodlar:


Üye Girişi:
 Üye Ol



Anasayfa > Asp > Makaleler

RSS Dosya Yapısı, Yayınlanması / Okunması

RSS Nedir, Dosya Yapısı Nasıl Olmalıdır, Nasıl İçerik Yayınlanır ve Başka Sitelerden Bilgi Almak Nasıl Olur?

RSS  Rich  Site  Summary  Really  Simple  Syndication  RDF 

Kategori: Asp
Gönderen: mYavuz
Tarih: 02 Aralık 2006
Okunma Sayısı: 13847
Puan: 10 / 4 Oy
Puan Ver:
Google Bookmarks  del.icio.us  Digg  Yahoo! MyWeb  Windows Live  Furl
RSS Nedir?
RSS (Rich Site Summary / Really Simple Syndication) sitelerin içeriklerini başlıklar şeklinde sunmak için kullanılan bir teknoloji. Temelinde bir XML dosyası yatar. Bu teknoloji ilk olarak 1999 yılında Netspace tarafından geliştirilmiştir.

Dosya Yapısı:
<rss version="2.0">
<channel>
<title>Site Basligi</title>
<link>http://www.siteninadresi.com</link>
<description>Siteyle ilgili kisa açiklama</description>
<language>RSS'in yayinlandigi dil kodu. Türkçe için tr</language>
<item>
<title>Ilk Içerigin Basligi</title>
<link>Ilk Içerigin Adresi</link>
<description>Ilk Içerigin Metni</description>
</item>
<item>
<title>Ikinci Içerigin Basligi</title>
<link>Ikinci Içerigin Adresi</link>
<description>Ikinci Içerigin Metni</description>
</item>
</channel>
</rss>

Sitenizin veritabanındaki bilgilerinin RSS okuyucular tarafından okunabilir hale getirilmesi:
<?xml version="1.0" encoding="windows-1254" ?>
<%
Response.Buffer = True
Response.ContentType = "text/xml" %>

Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veritabani.mdb")

Function Temizle(strInput)
    strInput = Replace(strInput,"&", "&amp;", 1, -1, 1)
    strInput = Replace(strInput,"'", "'", 1, -1, 1)
    strInput = Replace(strInput,"""", "", 1, -1, 1)
    strInput = Replace(strInput, ">", "&gt;", 1, -1, 1)
    strInput = Replace(strInput,"<","&lt;", 1, -1, 1)
Temizle = strInput
End Function
%>
<rss version="2.0">
<channel>
<title>mydesign.gen.tr</title>
<link>http://www.mydesign.gen.tr</link>
<description>En Yeni İçerikler</description>
<language>tr</language>
<%
Set rs = Server.CreateObject("Adodb.Recordset")
SQL = "SELECT * FROM tablo ORDER BY tarih DESC"
rs.Open SQL, adoCon, 1, 3

i = 0
Do While not rs.EOF and i < 10

response.write("<item>")
response.write("<title>" & Temizle(rs("baslik")) & "</title>")
response.write("<link>http://www.mydesign.gen.tr/"& rs("id") &".html</link>")
response.write("<description>" & Temizle(rs("ozet")) & "</description>")
response.write("</item>")
i = i + 1

rs.MoveNext
Loop

rs.Close
set rs = Nothing
%>
</channel>
</rss>

Aslında bu kodlar bir XML dosyası yerine XML çıktısı veren bir asp sayfasının kodlarını olusturur. Peki neden bir asp sayfası çıkarıyoruz? Bunun 2 nedeni var:
1. Eger sitenize sonradan bir RSS desteği ekleyecek olursanız, aynı zamanda bir XML dosyasında yazmanız gerekeceğinden sitenizin tüm sistemini değiştirmeniz gerekecekti.
2. Hem sitenizin veritabanı hem de bir XML dosyasına kaydetmeniz gerekeceğinden kayıt işlemi yavaşlayacakti.

Baska Sitelerin RSS Kaynaklarindan Bilgi Almak
<%@ Language="VBScript" %>
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="EN">
<head>
<title>[ D 0 G M A ]</title>
</head>
<body>
<table cellpadding="0" cellspacing="0" border="0">
<tr>
<td>
<%
Dim objXML
Dim objItemList
Dim objItem
Dim I

Set objXML = Server.CreateObject("MSXML2.FreeThreadedDOMDocument")
objXML.async = False

objXML.setProperty "ServerHTTPRequest", True
objXML.Load("http://www.mydesign.gen.tr/rss.asp")

If objXML.parseError.errorCode <> 0 Then
Response.Write "<strong>Hata:</strong> " & objXML.parseError.reason &"<br>"
Response.Write "<strong>Satır:</strong> " & objXML.parseError.line &"<br>"
Response.Write "<strong>Açıklama:</strong> " & Server.HTMLEncode(objXML.parseError.srcText) & vbCrLf
End If

Set objItemList = objXML.getElementsByTagName("item")
Set objXML = Nothing

For Each objItem In objItemList
i = 1
Response.Write "<div style=""padding-top:2px""><a href=""" & objItem.childNodes(1).text & """ target=""_blank"" title=""" & objItem.childNodes(2).text & """>"
Response.Write "" & objItem.childNodes(0).text & "</a><br>" & vbCrLf
Next

Set objItemList = Nothing
%>
</td>
</tr>
</table>
</body>
</html>

Makalede Yararlanılan Kaynaklar:
http://www.megatokyo.com/rss
http://www.tengiz.net/dokuman/web/rss_nasil.html

RSS Dosya Yapısı, Yayınlanması / Okunması için yazılan yorumlar

Barış Sığınç  { 20 Ocak 2008 }
Yayınladığınız Makale için teşşekür ederim. Büyük bir sorunumuza Çare oldunuz Sitemiz resmi site olduğundan eğer izin alabilirsem. Teşşekür listesinden isminizi yayınlamaya çalışacağım.

Ahmet BEYAZKAYA   { 22 Haziran 2007 }
Merhaba, ilginize teşekkür ederim ancak nasıl uyarlayacağımı bilemiyorum. 1 sene önce bunun dersini almıştım terimleri hatırlıyorum ama çalışmalarımı sürdürmediğim için herşeyi unuttum :( Siz uyarlayabilirseniz, çok mutlu olacağım. Sevgiler..

Murat Yavuz   { 22 Haziran 2007 }
http://forum.zoque.net/102850-mesaj25/ adresinde, zaman aşımı kontrolü olan bir aspTear fonksiyonu var. O fonksiyonu kodlara uyarlayabilirsiniz.

Ahmet BEYAZKAYA   { 21 Haziran 2007 }
Merhaba, rss okuyucu kod için çok teşekkür etmek istiyorum. İnanılmaz derecede üzerimden bir yük aldı.. Ancak bu kadar önemli bir derecede bana katkı sağlamasından dolayı ufak bir eksiklikle karşılaştım ve ciddi bir soruna yol açıyor. Soruna gelicek olursak; forum sitemin rss kaynağını kullanarak başka bir sitemde son gönderilen mesajları ve aynı şekilde başka bir blog sitemdeki son yazıları bir sitede bu kod sayesinde yayınlıyorum. Ancak şu varki, eğer diğer sitelerimden biri bir sorun olurda kapanır veya açılmaz ise, kodu kullandığım sitede açılmıyor. Acaba diyorum, sunucuya ulaşılmadığı zaman sayfayı kapamak yerine 2. bir tercih olsa ve orda hata mesajı gösterse. Eğer sunucu yanıt vermiyorsa farklı bir kaynağa yönelmesi gibi birşey yani. Cevabınızı sabırsızlıkla bekliyor olacağım, saygılar.

decoder   { 13 Haziran 2007 }
olmuyor " noktalı virgül karakteri bekleniyordu " hatasını veriyor.

Furkan KARTAL   { 20 Mart 2007 }
mesela ben rss sayesinde db den bir kaç bilgi çekiyorum bu bilgilerin içinde html kodlarıda var <iframe> .. <img> .. gibi bunları listeletemiyorum internet explorer da geçersiz metin tarzı bi uyarı geliyor ama mozillada görebiliyorum nasıl halledebilirim bu durumu ?

Yorum ekleyin

Bu sayfaya link verin:
Anasayfa > Asp > Makaleler > RSS Dosya Yapısı, Yayınlanması / Okunması
Kategoriler:


Forum:



Bağlantılar:


Murat Yavuz | Site Haritası | Gizlilik Bildirimi | 54.156.76.187 | 0,11 Saniye
© Copyright 2004-2018 MyDesign | Kod Arşivi. Tüm Hakları Saklıdır.
MyDesign | Kod Arşivi, en iyi görünüm için, 1024x768 ve üzeri çözünürlük tavsiye eder.