trouble adding new record
Hi guys, I need your help once again... This does add to the data base but displays this error.. here is my error
----------------
Error Type:
Microsoft JET Database Engine (0x80040E07)
Data type mismatch in criteria expression.
/curves/Insert.asp, line 135
--------------------
Dim objRS, intIDForNewRecords
Set objRS = Server.CreateObject ("ADODB.Recordset")
objRS.Open "tblIThelp",strStatus,adOpenStatic,adLockOptimisti c,adCmdTable
-------
objRS.MoveLast
intIDForNewRecords = objRS("ID") + 1
objRS.AddNew
objRS("ID") = intIDForNewRecords
some html stuff and then
-------
line 135 objRS.Open "Select * FROM tblIThelp WHERE ID=" & intIDForNewRecords, _
strStatus, adOpenForwardOnly, adLockReadOnly, adCmdText
|