Type mismatch

Når jeg prøver at skrive til min db med nedenstående, får jeg en "Type mismatch"-fejl.

Const adOpenKeyset = 1
Const adLockOptimistic = 3

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

    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "Select * From varer"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

      rs.AddNew
      rs("varenr") = request.form("varenr")
      rs("info") = request.form("info")
      rs("pris") = request.form("pris")
      rs("lager") = request.form("lager")
      rs("levering") = request.form("levering")

    rs.Close
    Set rs = Nothing

Conn.Close
set Conn = Nothing

Pris og lager er tal. Levering er en dato og resten er tekst-streng.

Hjælp!