Skrive i database

Dette er mit script

<%
' Databaseforbindelse - husk at angive sti til din database
Dim Conn1, DSN1, strSQ, rs1
Set Conn1 = Server.CreateObject("ADODB.Connection")
DSN1 = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN1 = DSN1 & "DBQ=" & Server.MapPath("../usersystem/usermgr/usr.mdb")
Conn1.Open DSN1

' SQL forespørgsel
strSQ = "Select * from users WHERE user = '" & Session("uName") & "'"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs1 = Conn1.Execute(strSQ)

Response.Write rs1("forename") & "<br>"

strSQ = "Insert into users (id) values (41)"

' SQL sætning eksekveres
Conn1.Execute(strSQ)

' Luk databaseforbindelse
Conn1.Close
Set Conn1 = Nothing
%>

Jeg bruger en lege værdig 41, men menigen er at værdien skal komme fra en session.

Jeg får denne fejl

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Index or primary key cannot contain a Null value.

/usersystem/oprettet.asp, line 129