Data type mismatch! HELP!

Jeg sidder og roder lidt med at lave et brugersystem.. men lige nu siger den "Data type mismatch in criteria expression" og jeg kan simpelthen ikke fatte hvad der er galt :P

Det er denne kode:


Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("databasen.mdb")
Conn.Open DSN


navn = Request.Form("navn")
navn = Replace(navn, "'", "")

email = Request.Form("email")
email = Replace(email, "'", "")

brugernavn = Request.Form("brugernavn")
brugernavn = Replace(brugernavn, "'", "")

password = Request.Form("password")
password = Replace(password, "'", "")

alder = Request.Form("alder")
alder = Replace(alder, "'", "")

profil = Request.Form("profil")
Function RemoveHTML( strText )
Dim RegEx
Set RegEx         = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
End Function
profil = RemoveHTML(profil)
profil = Replace(profil, vbCrLf, "<br>")
profil = Replace(profil, "'", "&acute;")
navn = RemoveHTML(navn)
email = RemoveHTML(email)
password = RemoveHTML(password)
brugernavn = RemoveHTML(brugernavn)
alder = RemoveHTML(alder)


strSQL = "Insert into bruger (navn, email, brugernavn, password, alder, profil) values('" & navn & "', '" & email & "', '" & profil & "', '" & brugernavn & "', '" & password & "', '" & alder & "')" 
%>

<%
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
response.redirect("index.asp")
%>


Whats wrong? :)

/Daniel