Hej (igen)
Jeg har følge kode, som skal tjekke/tilføje en e-mail til en database.
Hvis e-mailen ikke findes i databasen, skal den indskrives og man skal gå
til siden vind2.asp
Hvis e-mailen allerede findes skal den ikke til føjes og man skal gå til
siden vind3.asp
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/data/vind.mdb")
Conn.Open DSN
sqlTjek = "Select (mailtab) from vindliste where email = '" &
Request.Form("mail") & "'"
set rs1 = conn.execute(sqlTjek)
If rs1.EOF Then
strSQL = "Insert into vindliste (mailtab) values('" & Request.Form("mail") &
"')"
Conn.Execute(strSQL)
response.redirect("/vind2.asp")
Else
response.redirect("/vind3.asp")
End If
Conn.Close
Set Conn = Nothing
%>
Men jeg får følgende fejl *suk*:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/fun-til-tak.asp, line 39
Hvad er min fejl????
--
Med venlig hilsen
Ulrik Christiansen
@: usenet@uac.dk
Homepage:
www.uac.dk
ICQ: 24872480