har testat att startaom datorn? jag har aldriig fått detta fel, men andra som har försvunnit genom omstart av datorn.... vet inte men kanske det löser sig ;)
------------------
My name is Chris - Chris dangerous!
Frågan#1
När man har postat ett foruminlägg där man inte fyllt i hela formuläret (name eller e-mail) kommer detta fel upp:
fel 'ASP 0115'
Oväntat fel
/runnerscorner/forum.asp
Ett trap-fel inträffade i ett externt objekt. Skriptet kan inte fortsätta att köras.
<%
If Request.QueryString("forum") = "writeadd" Then
If len(Request.Form("subject"))=0 OR len(Request.Form("message"))=0 Then
%>
<SPAN CLASS="text"> <BR></SPAN>
<SPAN CLASS="subheading">You haven't filled in the form correctly. Please try again.</SPAN>
<%
Else
Show = "SELECT * FROM Messages"
RecSet.Open Show, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
RecSet("Forumname") = Request.Form("forum")
Forumname = Server.URLEncode(Request.Form("forum"))
If len(Request.Form("name"))=0 Then
RecSet("Name") = "Anonymous"
Else
RecSet("Name") = Replace(Server.HTMLEncode(Request.Form("name")),"'","%27")
End If
If len(Request.Form("e-mail"))=0 Then
RecSet("E-mail") = "no E-mail"
Else
RecSet("E-mail") = Server.HTMLEncode(Request.Form("e-mail"))
End If
RecSet("Time") = Request.Form("time")
RecSet("Time2") = Request.Form("time")
RecSet("Hits") = 0
RecSet("AnswersID") = 0
RecSet("Subject") = Replace(Server.HTMLEncode(Request.Form("subject")),"'","%27")
RecSet("Message") = Replace(Replace(Server.HTMLEncode(Request.Form("message")),chr(13) & chr(10), "<BR>"),"'","%27")
RecSet("IP") = Request.Form("ip")
RecSet.Update
RecSet.Close
Response.Redirect "forum.asp?forum=messages&name=" & Forumname & ""
End If
End If
%>
Var är felet?
Tack på förhand