• 16-03-2008, 14:30:37
    #1
    Üyeliği durduruldu
    <%
    Set baglanti = Server.CreateObject("ADODB.Connection" )
    'baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb )}; DBQ=" & Server.MapPath("databese/videoasd1#.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,"İ","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>********** Rss Sayfası</title>
    <link>http://www.siteismi.com</link>
    <description>En Son Eklenen 20 Video</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.siteismi.com/video.asp?id="& Temizle(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>
    ----
    hata nerede bu kodda arkadaşlar
  • 16-03-2008, 22:38:37
    #2
    Üyeliği durduruldu
    <?xml version="1.0" encoding="ISO-8859-9"?>
    <rss version="2.0">
    <channel>
    <title>Sitenin Adi</title>
    <link>http://www.siteadi.com/rss.asp</link>
    <description>sitemizin rss i</description>
    <language>tr</language>
    <lastBuildDate>14.03.2008 12:37:07</lastBuildDate>
    <copyright>Copyright: (C) siteadi</copyright>
    <image>
    <title>Siteadin</title>
    <url>http://www.siteadi.com/logo.gif</url>
    <link>http://www.siteadi.com</link>
    <width>203</width>
    <height>45</height>
    </image>
    <%
    Do
    %>
    <item>
    <title>Baslik</title>
    <description>Yazi burada.</description>
    <link>http://www.siteadi.com/yaziadresim.asp?id=44444</link>
    <guid isPermaLink="false">http://www.siteadi.com/yaziadresim.asp?id=44444</guid>
    <pubDate>14.03.2008 09:49:00</pubDate>
    </item>
    <%
    Loop
    %>
    </channel></rss>