Hvad er fejlen- RSS
jeg har fundet et script til at sætte RSS på min blog,men det virkker ikke som det skal... det kommer med en masse fejl (kan ses her http://www.dianna.dk/dag/rss.asp)Er der en der kan hjælpe med at finde ud af hvad fejeln er?koden ser således ud:
rss.asp:
<% Response.Buffer = true
Response.ContentType = "text/xml"
Function ApplyXMLFormatting(strInput)
strInput = Replace(strInput,"&", "&")
strInput = Replace(strInput,"'", "'")
strInput = Replace(strInput,"""", """)
strInput = Replace(strInput, ">", ">")
strInput = Replace(strInput,"<","<")
ApplyXMLFormatting = strInput
End Function
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("form.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT TOP 10 * from users order by ID desc;"
rs.Open strSQL, Conn, 1, 3
Function GetNewsHeader(InputString, MaxNumber)
Dim inCount
For inCount = LBound(Split(InputString, " ")) To MaxNumber - 1
GetNewsHeader = GetNewsHeader & " " & Split(InputString, " ")(inCount)
Next
End Function
do while not rs.eof
%>
<?xml version="2.0" encoding="iso-8859-1" ?>
<rss version="2.0" xmlns:dc=" http://purl.org/dc/elements/1.1/" xmlns:sy=" http://purl.org/rss/1.0/modules/syndication/" xmlns:admin=" http://webns.net/mvcb/" xmlns:rdf=" http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:content=" http://purl.org/rss/1.0/modules/content/">
<channel>
<site>Min Web Side</site>
<siteurl> http://www.dianna.dk/dag/</siteurl>
<language>da</language>
<copyright>Copyright 2004, dianna.dk</copyright>
<lastBuildDate><%=Now()%></lastBuildDate>
<item>
<title><%=rs("overskrift")%></title>
<link> http://www.dianna.dk/dag/index.asp?dagbog=<%=rs("Id")%></link>
<description><% Response.Write GetNewsHeader(rs("tekst"), 40) %>...</description>
<datePosted><%=rs("dato")%></datePosted>
</item>
<%
rs.MoveNext
loop
Conn.Close
Set Conn = Nothing
%>
</channel>
</rss>
