INSERT INTO Setning.

Sånn her ser koden ut:

<%
Response.Buffer = True

if Request("btnLagre") = "Lagre" then
   
    dim strConn
    strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database/Document.mdb")
   
    dim strFullName
    dim strUserName
    dim strPassword
    dim strSecuritLevel
    strFullName = Request.Form("txtFullName")
    strUserName = Request.Form("txtUserName")
    strPassword = Request.Form("txtPassword")
    strSecurityLevel = Request.Form("txtSecurityLevel")
   
    dim adoCn
    dim strSQL
    set adoCn = Server.CreateObject("ADODB.Connection")
    adoCn.Open strConn
   
    strSQL = "INSERT INTO Users (FullName, UserName, Password, SecurityLevel) VALUES " &_
        "('" & strFullName & "', '" & strUserName & "', '" & strPassword & "', '" & strSecurityLevel & "')"
   
    Response.Write(strSQL)
    'Response.End
   
    adoCn.Execute strSQL
    adoCn.Close
    set adoCn = nothing
   
    Response.Redirect "admin_BrukerListe.asp"
end if
%>

I databasen er feltene tekst untatt UserId.

SQL setningen ser slik ut nå sktiver den på skjermen:

INSERT INTO Users (FullName, UserName, Password, SecurityLevel) VALUES ('karoline', 'karo', 'yvonne', '1')

FEILMELDINGEN ER:

Error Type:
Microsoft JET Database Engine (0x80040E14)
Syntax error in INSERT INTO statement.
/YOL/admin/admin_BrukerNy.asp, line 30