RSS-flöde som slutar att "feeda"

Jag har gjort en "RSS-lösning" som jag vid tillfället trodde var ganska basic, men nu efter några månader har kommer det inga nya inlägg trots att det läggs in i databasen.

När jag försöker hämta hem något inlägg via Thunderbird så säger den att RSS-feed not valid.
Men jag vet inte vad det är som är fel nu helt plödsligt när det har fungerat innan?

Här kommer hela koden:

<?xml version="1.0" encoding="iso-8859-1"?>
<rss version="2.0"><% 
' Skapa koppling till databasen										  
					Set Conn_db = Server.CreateObject( "Adodb.Connection" )		    
					Conn_db.Provider = "Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=losenordet"
					MdbFilePath = Server.MapPath( "..\databasen.mdb" )            
					Conn_db.ConnectionString = "Data Source='" & MdbFilePath & "'"  
					Conn_db.open	

' RS för att lista...	
SET rs_rss = Server.CreateObject("ADODB.recordset")									
plock = "SELECT * FROM webbsidor WHERE kategori = 9 AND publik = 'checked' order by datum desc"	
rs_rss.Open plock, Conn_db	

'En funktion som tar bort &aring; &auml; &ouml; for de funkar inte bra i RSS
Function FixabortTecken(sfix)
sfix = Replace(Trim(sfix), "'", "''")
sfix = Replace(sfix, "&aring;", "å")
sfix = Replace(sfix, "&auml;", "ä")
sfix = Replace(sfix, "&ouml;", "ö")
sfix = Replace(sfix, "&Aring;", "Å")
sfix = Replace(sfix, "&Auml;", "Ä")
sfix = Replace(sfix, "&Ouml;", "Ö")
FixabortTecken = sfix
End Function
 %>

<channel>
	<title>sidans titel</title>
		<link>http://www.denaktuellawebbsidan.se</link>
		<description>Nyheter från www.denaktuellawebbsidan.se via RSS</description>
<% 
Do While Not rs_rss.EOF
 %>

	<item>
		<title><%= FixabortTecken(rs_rss("rubrik")) %></title>
		<link>http://www.denaktuellawebbsidan.se/viewpage.asp?node=9&amp;ID=<%= rs_rss("Id") %></link>
		<description><%= FixabortTecken(rs_rss("rubrik")) %></description>
	</item><p />
<% rs_rss.MoveNext
Loop %>
</channel>
</rss>
<% 
'Stanger RS
  		rs_rss.Close
  		Set rs_rss=nothing
'Stanger databaskoppling
  		Conn_db.Close
  		Set Conn_db=nothing   %>