set mig blind på insert into
Jeg har en side der opretter nye brugere i en database. Jeg udfylder selv 4 parametre fra forms, og min kode indsætter selv et Id (autonummerering), og så får jeg koden til at indsætte teksten "mangler" i alle andre felter i rækken.Et eller andet sted i denne kode er der et problem. Jeg får fejlen "Too few parameters. Expected 1." og den henviser til min "conn.execute(strSQL)" linjen.
koden er som følger:
<html><head></head><body stylesrc="main.htm">
<!--#include file ="opretforbindelse.asp" -->
<%
dim Id, brugernavn, password, fornavn, email
' vi tæller op hvad det højeste Id der er for brugere i databasen
strSQL = "SELECT MAX(brugere.Id) FROM brugere;"
Set rs = Conn.Execute(strSQL)
' for at vores nye tag vi opretter IKKE får et Id der er brugt i forvejen, lægger vi +1 til den fundne værdi
Id= rs.fields("Expr1000")+1
brugernavn=request.form("brugernavn")
password=request.form("password")
fornavn=request.form("fornavn")
email=request.form("email")
response.write Id & "<br>"
response.write brugernavn &"<br>"
response.write password&"<br>"
response.write fornavn&"<br>"
response.write email
strSQL = "Insert Into brugere ("
strSQL = strSQL & "beskrivelse, "
strSQL = strSQL & "beskrivelse2, "
strSQL = strSQL & "brugernavn, "
strSQL = strSQL & "password, "
strSQL = strSQL & "fornavn, "
strSQL = strSQL & "efternavn, "
strSQL = strSQL & "fodselsdag, "
strSQL = strSQL & "adresse, "
strSQL = strSQL & "postnr, "
strSQL = strSQL & "byen, "
strSQL = strSQL & "email, "
strSQL = strSQL & "msn, "
strSQL = strSQL & "tlf, "
strSQL = strSQL & "mobil, "
strSQL = strSQL & "Bil, "
strSQL = strSQL & "Arbejde, "
strSQL = strSQL & "boern, "
strSQL = strSQL & "aegtestatus, "
strSQL = strSQL & "billede, "
strSQL = strSQL & "billede1, "
strSQL = strSQL & "billede2, "
strSQL = strSQL & "Id) "
strSQL = strSQL & "values("
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "'"&brugernavn&"', "
strSQL = strSQL & "'"&password&"', "
strSQL = strSQL & "'"&fornavn&"', "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "'"&email&"', "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "mangler, "
strSQL = strSQL & "'"&Id&"')"
Conn.Execute(strSQL)
response.redirect "hvemvier.asp"
Conn.Close
Set Conn = Nothing
%>
</body></html>
Som det ses skriver jeg lige for sjov mine variable ud inden jeg bruger insert into, og de virker, så det er ikke mine variable der laver ged.
Selve databasen er bygget op således at alle kolonnerne er tekst-kolonner, pånær beskrivelse og beskrivelse2 som er "notat" for at få flere tegn med, og Id som er autonummerering.
100 point til den finder fejlen!
