INSERT INTO-problem

<%

    Dim Conn, RS

%>
<!-- #include virtual="/includes/dbconnopen.asp" -->
<%

    Set RS = Conn.Execute("SELECT * FROM backendusersitg WHERE username='" & SQLEncode(Request.QueryString("user")) & "'")

    If RS.EOF Then
        RS.Close
        Conn.Close
        Response.Redirect "/error.asp?msg=Brugeren+eksisterer+ikke."
    End If

    Dim strCreateUsers
    If RS("createuser") = 1 Then
        strCreateUsers = " checked"
    Else
        strCreateUsers = ""
    End If

    Dim strEditUserRights
    If RS("edituser") = 1 Then
        strEditUserRights = " checked"
    Else
        strEditUserRights = ""
    End If

    Dim strDeactivateUsers
    If RS("deactivateuser") = 1 Then
        strDeactivateUsers = " checked"
    Else
        strDeactivateUsers = ""
    End If

    Dim strDeleteUsers
    If RS("deleteuser") = 1 Then
        strDeleteUsers = " checked"
    Else
        strDeleteUsers = ""
    End If

    '****************************************************************INSERT CHOISE
    Dim vCreateUser
    If LCase(Request.Form("createuser")) = "on" Then
        vCreateUser = 1
    Else
        vCreateUser = 0
    End If

    Dim vEditUser
    If LCase(Request.Form("edituser")) = "on" Then
        vEditUser = 1
    Else
        vEditUser = 0
    End If

    Dim vDeactivateUser
    If LCase(Request.Form("deactivateuser")) = "on" Then
        vDeactivateUser = 1
    Else
        vDeactivateUser = 0
    End If

    Dim vDeleteUser
    If LCase(Request.Form("deleteuser")) = "on" Then
        vDeleteUser = 1
    Else
        vDeleteUser = 0
    End If

    'HVORFOR KAN JEG IKKE INDSÆTTE DETTE?

    If Request.Form("mode") = "edituser" Then

        Conn.Execute("INSERT INTO backendusersitg (createuser, edituser, deactivateuser, deleteuser) VALUES (" & _
            "'" & vCreateUser & "', " & _
            "'" & vEditUser & "', " & _
            "'" & vDeactivateUser & "', " & _
            "'" & vDeleteUser & "', " & _
            WHERE username='" & SQLEncode(Request.QueryString("user")) & "' & "')")
        Conn.Close

        Response.Redirect "/admin/showallusers.asp"

    End If

%>

Jeg kan ikke indsætte rettigheder foretaget i checkboxe. Eller rettere: Jeg kan ikke komme ind på siden, fordi jeg kludrer et eller andet sted, og det er dér, hvor data skal indsættes i DB.