Sitenize RSS Desteği Ekleyin

[db.gen.tr]

Aşağıdaki kodla veri tabanınızda son girilen 10 veriyi açıklama kısmında 200 karakter göstererek rss formatına dönüştürebilirsiniz. Sistemi yaptıktan sonra çalışıp çalışmadığını;

http://www.haberss.com/?r=http://www.arshiv.net/rss.asp

şeklinde kontrol edebilirsiniz güle güle kullanın

PHP- Kodu:

<%
response.contenttype="text/xml"
  Set conn= Server.CreateObject("ADODB.Connection")
  conn.Open ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db.mdb"))

response.write "<?xml version=""1.0"" encoding=""ISO-8859-9""?>" & vbcrlf
response.write "<rss version=""2.0"">" & vbcrlf
response.write "<channel>" & vbcrlf
response.write "<title>siteadi.com</title>" & vbcrlf
response.write "<rs>http://www.asiteadi.com/</rs>" & vbcrlf
response.write "<description>Son Eklenen 10 Veri</description> " & vbcrlf
response.write "<language>tr</language>" & vbcrlf
response.write "</channel>" & vbcrlf

set rs = conn.execute("Select top 10 * from tabloadi order by id desc")
do while not rs.eof

Response.Write("<item>" & _
vbCrLf & "<title>" & rs("baslik") & "</title>" & _
vbCrLf & "<link>http://www.siteadi.com/yazi.asp?id="& rs("id") &"</link>" & _
vbCrLf & "<description>"& left(rs("aciklama"),200) &"  " & _
vbCrLf & "</description>" & _
vbCrLf & "<pubdate>" & rs("tarih") & "</pubdate>" & _
vbCrLf & "</item>")

rs.movenext
loop

response.write "</rss>" & vbcrlf
rs.close
%>

[mithrandil]

800a0cc1 hatası verıyor devamlı beceremedım sanırım

[db.gen.tr]

Belirttiğim adreste bunu kullanıyorum db bağlantılarına filan birdaha bak...