SQL Insert Issue

Insert Issue with Date

[Cin_Coder]

Can anyone help me with this insert statement....it throws a syntax error

Microsoft VBScript compilation error '800a03ea'

Syntax error

/gm_location/default1.asp, line 51

insert_query="INSERT INTO AccessData (cintasRepLocCode, FirstName, LastName, Accesses, LastAccess) VALUES ("& Request.Form("cintasRepLocCode") & "," & Request.Form("FirstName") & "," & Request.Form("LastName") & ", '1',"& LastAccess=# & Date() & "# &")"
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------^

[mattglet]

insert_query="INSERT INTO AccessData (cintasRepLocCode, FirstName, LastName, Accesses, LastAccess) VALUES ("& Request.Form("cintasRepLocCode") & "," & Request.Form("FirstName") & "," & Request.Form("LastName") & ", '1','#" & Date() & "#')"

If you're using Access, I *think* that works. I have not tested.

If that doesn't work, take out the single quotes from around the #'s.

[Cin_Coder]

If month(theLastAccess)< month(now()) then
Set AccessData = Server.CreateObject("ADODB.Command")
AccessData.ActiveConnection = MM_gm_location_STRING
insert_query="INSERT INTO AccessData (cintasRepLocCode, FirstName, LastName, Accesses, LastAccess) VALUES ("& Request.Form("cintasRepLocCode") & "," & Request.Form("FirstName") & "," & Request.Form("LastName") & ", 1, #" & Date() & "#)"
AccessData.CommandText = insert_query
AccessData.Execute
AccessData.ActiveConnection.Close
Set AccessData = Nothing

This causes the following error:

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

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 2.

/gm_location/default1.asp, line 53

[tomasz]

try this
insert_query="INSERT INTO AccessData (cintasRepLocCode, FirstName, LastName, Accesses, LastAccess) VALUES ('"& Request.Form("cintasRepLocCode") & "','" & Request.Form("FirstName") & "','" & Request.Form("LastName") & "', 1, Now())"

[Zaphod Beeblebrox]

This part:
...Request.Form("LastName") & ", '1',"& LastAccess=# & Date() & "# &")"

Should read:
...Request.Form("LastName") & ", '1', LastAccess=#" & Now() & "#)"

Or even:
...Request.Form("LastName") & ", '1', LastAccess=Now)"