Jag ska skapa en rss fil genom att loopa ut alla poster i databasen till den.
har hittills denna kod:

Kod:
<code>
<!--#INCLUDE FILE="../inc/db.asp"-->
<%
Set fso = CreateObject("Scripting.FileSystemObject")

if not fso.FileExists(Server.MapPath("../rss/blogg.rss")) then
Set act = fso.CreateTextFile(Server.MapPath("../rss/blogg.rss"), true)
else
Set act = fso.OpenTextFile(server.mappath("../rss/blogg.rss"))
end if

Set RSS = objConn.Execute("SELECT TOP 10 bID, Rubrik, RSS, Datum, Tid FROM Blogg ORDER BY Datum DESC")


act.WriteLine "<?xml version=""1.0"" encoding=""utf-8"" ?>"
act.WriteLine "<rss version=""2.0"">"
act.WriteLine "<channel>"

act.WriteLine "<title>RSS</title>"
act.WriteLine "<link>http://www.wwwwww.ww</link>"
act.WriteLine "<description>RSS</description>"



DO WHILE NOT RSS.EOF

act.WriteLine "<item>"
act.WriteLine "<title>"&RSS("Rubrik")&"</title>"
act.WriteLine "<link>"&RSS("bID")&"</link>"
act.WriteLine "<description>"&RSS("RSS")&"</description>"
act.WriteLine "<pubDate>"&RSS("Datum")&"</pubDate>"
act.WriteLine "</item>"

RSS.MoveNext
loop
RSS.close
set RSS = Nothing

act.WriteLine "</channel>"
act.WriteLine "</rss>"

act.close
%>
</code>

Problemet är att ingen fil skapas, har gett mappen alla rättigheter.
Får felmeddelandet:
The maximum amount of time for a script to execute was exceeded. You can change this limit by specifying a new value for the property Server.ScriptTimeout or by changing the value in the IIS administration tools.


Vad har jag gjort för fel & hur löser jag det??

Tacksam för all hjälp

felhantering 101:
strippa ner koden och hitta felet.

Varför skapa en fil? Varför inte skriva ut html-koden direkt?

man vill ju inte anropa databasen för mycket vilket segar ner sidan...

Har du så många besökare då?
eller är en dålig lina problemet?

haha, nee, så många besökare har jag inte. Men jag har bestämt mig för att göra en RSS - fil och inte anropa databasen.

provade att ta bort utloopningen från databasen.
Filen skapades samt 5.6 Miljoner rader skapades med massa:
<code>
<item>
</item>
</code>

har koden:
<code>
Set fso = CreateObject("Scripting.FileSystemObject")

if not fso.FileExists(Server.MapPath("../rss/blogg.rss")) then
Set act = fso.CreateTextFile(Server.MapPath("../rss/blogg.rss"), true)
else
Set act = fso.OpenTextFile(server.mappath("../rss/blogg.rss"))
end if



act.WriteLine "<?xml version=""1.0"" encoding=""utf-8"" ?>"
act.WriteLine "<rss version=""2.0"">"
act.WriteLine "<channel>"

act.WriteLine "<title>RSS</title>"
act.WriteLine "<link>http://www.wwwwww.ww</link>"
act.WriteLine "<description>RSS</description>"



act.WriteLine "</channel>"
act.WriteLine "</rss>"

act.close
</code>


ser ingen loop som ska loopa ut massa item-taggar.


Vad kan det vara för fel?? :s

du körde kanske fel fil eller laddade upp den nya på fel ställe.
Felsök.

körde fel fil? fel ställe? Felsök?

Jag har provat att enbart köra koden för att skapa rss-filen och det går bra (filen skapas). Problemet är när texten ska in RSS-filen.

Men mellan
<code>

description>RSS</description>
</code>
och
<code>
<channel>
<rss>
</code>

Hamnar det oändligt massa <item> taggar, samt så skrivs inte
<code>
<channel>
<rss>
</code>
ut sist i documentet. Kollar man koden jag har skrivit så ska inga <item>-taggar skrivas ut, varifrån kommer dessa?

Ja något fel är det DU har gjort iaf.