har slagit av on error resume next nu.
nu får jag upp detta:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'id='.
/savenew.asp, line 36
har försökt lösa det men hittar inte felet. det har fungerat felfritt förut.
här är hela koden
Set Conn=Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/forum.mdb") & " ;PWD="
checkup="SELECT nick, password, id, nrposts FROM users WHERE nick='"&Request.Form("username")&"' AND password='"&Request.Form("password")&"'"
rs.Open checkup, Conn, 0, 3, &H0001
If not rs.EOF Then
wid=rs("id")
poster=rs("nrposts")
nicko=rs("nick")
End IF
rs.Close
If nicko<>"" OR Request.Form("username")<>"" AND Request.Form("password")<>"" AND Request.Form("content")<>"" AND Request.Form("title")<>"" Then
tid=time
datum=date
tdatum=datum&", "&tid
Streng=Request.Form("content")
Streng = Replace(Streng, chr(13), "")
Streng = Replace(Streng, chr(10) & chr(10), "<br> <br>")
Streng = Replace(Streng, chr(10), "<br>")
FormateraTecken = Streng
gbook="INSERT INTO inlays(title, writer, message, posted, icon, tid, writerid) VALUES ('"&Request.Form("title")&"','"&Request.Form("username")&"','"&FormateraTecken&"','"&tdatum&"','"&Request.Form("icon")&"','"&tid&"','"&wid&"')"
Conn.Execute (gbook)
setid="SELECT writer, id, title, writerid FROM inlays WHERE writer='"&Request.Form("username")&"' AND title='"&Request.Form("title")&"' AND message='"&FormateraTecken&"'"
rs.Open setid, Conn, 0, 3, &H0001
idi=rs("id")
widi=rs("writerid")
rs.Close
gbook2="UPDATE inlays SET replyto='"&idi&"' WHERE id="&idi&""
Conn.Execute (gbook2)
nrposty=poster+1
gbook3="UPDATE users SET nrposts='"&nrposty&"' WHERE id="&widi&""
Conn.Execute (gbook3)
------------------
//McMiller
Jag är inte idiot, jag har bara fem skruvar och en mutter lös...
