Problemer med at opdatere felterne

Jeg har problemer med at opdatere felterne UserLevel og Active i min Access database.

UserLevel = tal
Active = ja/nej

Er der nogle der kan se det jeg har overset?

UserTmp = request.Form("User")
User = UCase(UserTmp)
Password = request.Form("Password")
FirstName = request.Form("FirstName")
LastName = request.Form("LastName")
EmailTmp = request.Form("Email")
Email = LCase(EmailTmp)
UserLevelTmp = "7"
ActiveTmp = "TRUE"
SQL=""
SQL="INSERT INTO tblUsers (User,Password, FirstName, LastName, Email, UserLevel, Active) VALUES ("
SQL = SQL & "'" & User & "',"
SQL = SQL & "'" & Password & "',"
SQL = SQL & "'" & FirstName & "',"
SQL = SQL & "'" & LastName & "',"
SQL = SQL & "'" & Email & "',"
SQL = SQL & "'" & UserLevelTmp & "',"
SQL = SQL & "'" & ActiveTmp & "'"
SQL = SQL & ");"