check om data findes i database
Hej eksperter.Jeg troede lige at jeg havde løst mit problem på http://www.eksperten.dk/spm/151217 men det virker stadig ikke.
Jeg har følgende kode, som jeg gerne vil have til at checke, om der allerede findes en post i tabellen ”forummail” , som indeholder de samme data som jeg skal til at tilføje via en form, dataene skal kun tilføjes hvis der er skrevet noget i inputfeltet ”email” i formen:
Set objConn = Server.CreateObject(\"ADODB.Connection\")
conStr = \"Provider=Microsoft.Jet.OLEDB.4.0;\"
%><!--#INCLUDE FILE=\"../include/db.inc\" --><%
objConn.Open conStr
if Request.form(\"email\") <> \"\" then
strSQL = \"Select * FROM forummail where mail = \" & Request.form(\"email\") & \" AND indlaegid = \" & Request.form(\"indlaegid\") & \"\"
Set rs = objConn.Execute(strSQL) ‘ >> her er linie 31 <<
IF RS.EOF THEN
strSQL = \"Insert into forummail (\"
strSQL = strSQL & \"mail, \"
strSQL = strSQL & \"indlaegid) \"
strSQL = strSQL & \"values( \"
strSQL = strSQL & \"\'\" & strCorrect(Request.form(\"email\")) & \"\', \"
strSQL = strSQL & \"\'\" & strCorrect(Request.form(\"indlaegid\")) & \"\')\"
objConn.Execute(strSQL)
END IF
objConn.close
SET objConn = nothing
end if
Response.Redirect \"show.asp?id=\" & Request.form(\"indlaegid\")
Men koden giver en fejlmedelse:
Microsoft JET Database Engine fejl \'80040e14\'
Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket \"mail = morten@mail.dk AND indlaegid = 271\".
/forum/response.asp, linje 31
Kan du finde fejl i koden vil jeg blive meget glad
På forhånd tak
Morten // morten@12tri.dk
