RSS içeriği paylaştığım xml kodlamalı rss.asp dosyası, bir hostingde sorun yaratmadan çalışıyorken, başka bir hostingde aşağıdaki hata mesajını veriyor ve hiç bir şekilde rss okuycuları bilgi çekemiyor bu dosyadan. Sorunu hosting firmasına aktardığında da kendilerinden kaynaklı bir teknik sorun olmadığını yazılımsal bir problem yaşamış olabileceğimi savunuyor. Fakat aynı kod başka bir hosting de çalışıyor...
Bu tür bir sorunu tecrübe etmiş arkadaşlar var ise, çözüm önerilerine çok ihtiyacım var. Şimdiden teşekkür ederim,
-------------- KARŞILAŞILAN HATA MESAJI:
This page contains the following errors:
error on line 26 at column 69: Extra content at the end of the document Below is a rendering of the page up to the first error.
Bu tür bir sorunu tecrübe etmiş arkadaşlar var ise, çözüm önerilerine çok ihtiyacım var.
Şimdiden teşekkür ederim,
--------------
KARŞILAŞILAN HATA MESAJI:
This page contains the following errors:
error on line 26 at column 69: Extra content at the end of the document
Below is a rendering of the page up to the first error.
-----------------------
RSS.ASP DOSYASI KODLAMASI.
<?xml version="1.0" encoding="windows-1254" ?>
<!--#include file="ayarlar.asp"-->
<!--#include file="include/degiskenler.asp"-->
<!--#include file="include/baglanti.asp"-->
<!--#include file="fonksiyonlar/database.asp"-->
<!--#include file="fonksiyonlar/filtreler.asp"-->
<!--#include file="fonksiyonlar/link.asp"-->
<!--#include file="fonksiyonlar/tarih.asp"-->
<%
Response.Buffer = True
Response.ContentType = "text/xml"
intKategoriID = Temizle(Request.Querystring("katid"))
strVersiyon = Temizle(Request.Querystring("tur"))
SQL = "SELECT * FROM tblHaberler WHERE kategori <> "& intKoseYazilari &" AND durum="& strDBTrue &" AND onay="& strDBTrue
If intKategoriID <> "" AND IsNumeric(intKategoriID) Then SQL = SQL & " AND kategori = "& CInt(intKategoriID)
SQL = SQL & " ORDER BY tarih DESC"
%>
<rss version="2.0">
<channel>
<title><%=Temizle(strSiteAdi)%></title>
<link><%=strSiteAdresi%></link>
<description><%=strAciklama%></description>
<language>tr</language>
<%
kdGenel.Open SQL, adoCon, 1, 3
i = 0
Do While i =< 20 And Not kdGenel.Eof
Link = LinkVer("haber",kdGenel("haberID"), kdGenel("baslik"), KategoriBul(kdGenel("kategori")))
Link = Mid(Link, Len(strScriptYolu), Len(Link))
Response.Write "<item>"
Response.Write "<title>" & kdGenel("baslik") & "</title>"
Response.Write "<link>"& strSiteAdresi & Link &"</link>"
Response.Write "<description>"& Temizle(kdGenel("ozet")) &"</description>"
Response.Write "</item>"
i = i + 1
kdGenel.MoveNext
Loop
kdGenel.Close
%></channel></rss>
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.
Üye Ol Şimdi DeğilÜye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.