Hur då (i VBScript alltså)?
Vad är felet ?
29 svar · 558 visningar · startad av Denniss · sida 2 av 2
Frågan, av Denniss
Active Server Pages error 'ASP 0113' Script timed out /default.asp 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.
Läs frågan i sin helhet →
tack
"För att fältet text i din tabell inte innehåller något värde."
Vad är det för if sats och vart skall jag lägga in det ? Nån som kan skriva själva koden ?
Någon som kan det ?
Funktionen ISNULL() kan ju funka
if NOT isnull(recset("fält")) then
' Skriv
end if
Nu är jag förvirrad.
Skall jag försöka lägga in det i default.asp fil ?
if NOT isnull(recset("fält")) then
Eller ?
För att fortsätta på cyprys kod:
<%
Response.Buffer = True
Response.Expires = -1500
Response.AddHeader "Pragma", "no-cache"
Response.AddHeader "cache-control", "no-store"
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Database.mdb")
Dim i
i = 0
set recset = connect.execute("select top 5 * from inlagg where accepterad = true order by datum DESC")
do until recset.eof OR i = 5
If NOT IsNull(recset("text")) Then
response.write(recset("typ"))
if not recset("bild") = "" then
%>
<%
end if
response.write("<br />" & chr(10))
response.write(replace(left(recset("text"),40),vbCrLf,""))
End If
i = i -- 1
recset.movenext
loop
recset.Close
set recset = Nothing
Connect.Close
set Connect = Nothing
%>