fejl , ved oprettelse i db.
har følgende kode:session("navn") = Replace(Request.Form("navn"), "'", "''")
session("koen") = Replace(Request.Form("koen"), "'", "''")
session("adresse") = Replace(Request.Form("adresse"), "'", "''")
session("postnr") = Replace(Request.Form("postnr"), "'", "''")
session("by") = Replace(Request.Form("by"), "'", "''")
session("telefon") = Replace(Request.Form("telefon"), "'", "''")
session("mobil") = Replace(Request.Form("mobil"), "'", "''")
session("email") = Replace(Request.Form("email"), "'", "''")
session("lokalradio") = Replace(Request.Form("lokalradio"), "'", "''")
session("dkradio") = Replace(Request.Form("dkradio"), "'", "''")
session("lokaltv") = Replace(Request.Form("lokaltv"), "'", "''")
session("retv") = Replace(Request.Form("retv"), "'", "''")
session("dktv") = Replace(Request.Form("dktv"), "'", "''")
session("demo1") = Replace(Request.Form("demo1"), "'", "''")
session("demo2") = Replace(Request.Form("demo2"), "'", "''")
'Ser efter om brugeren er oprettet i databasen
StrSQL = "SELECT Navn FROM Speaker where Navn = '" & session("Navn") & "'"
Set RS = Conn.Execute(strSQL)
' Hvis ikke brugeren er oprettet i databasen
If RS.bof then
strSQL = "INSERT INTO Speaker ("
strSQL = strSQL & "Navn, "
strSQL = strSQL & "Koen, "
strSQL = strSQL & "Adresse, "
strSQL = strSQL & "Postnr, "
strSQL = strSQL & "By, "
strSQL = strSQL & "Telefon, "
strSQL = strSQL & "Mobil, "
strSQL = strSQL & "Email, "
strSQL = strSQL & "Lokalradio, "
strSQL = strSQL & "Dkradio, "
strSQL = strSQL & "Lokaltv, "
strSQL = strSQL & "Retv, "
strSQL = strSQL & "Dktv, "
strSQL = strSQL & "Demo1, "
strSQL = strSQL & "Demo2"
strSQL = strSQL & ") values( "
strSQL = strSQL & "'" & session("navn") & "', "
strSQL = strSQL & "'" & session("koen") & "', "
strSQL = strSQL & "'" & session("adresse") & "', "
strSQL = strSQL & "'" & session("postnr") & "', "
strSQL = strSQL & "'" & session("by") & "', "
strSQL = strSQL & "'" & session("telefon") & "', "
strSQL = strSQL & "'" & session("mobil") & "', "
strSQL = strSQL & "'" & session("email") & "', "
strSQL = strSQL & "'" & session("lokalradio") & "', "
strSQL = strSQL & "'" & session("dkradio") & "', "
strSQL = strSQL & "'" & session("lokaltv") & "', "
strSQL = strSQL & "'" & session("retv") & "', "
strSQL = strSQL & "'" & session("dktv") & "', "
strSQL = strSQL & "'" & session("demo1") & "', "
strSQL = strSQL & "'" & session("demo2")
strSQL = strSQL & "');"
Conn.Execute(strSQL)
Får følgende fejl:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl i INSERT INTO-sætningen.
