[allgood4]

Hey guys i am trying to write a program in access and its supposed to write or addNewdata into a database:

Private Sub Add_New_Record_Click()
Dim con As ADODB.Connection
Dim cmd As ADODB.Command
Dim rst As New ADODB.Recordset

'Dim pstrSQL As String
Dim pstritem As String
Dim pstrcolumn As String
Dim pintrow As Integer
Dim pintquantity As Integer
'Dim ivlocation As AccessObject

Set rst = New ADODB.Recordset
Set con = CurrentProject.Connection
Set cmd = New ADODB.Command
Set cmd.ActiveConnection = con

pstritem = cmbItem
pstrcolumn = txtColumn
pintrow = txtrow
pintquantity = txtquantity

cmd.CommandText = "INSERT INTO icqty " & "(item, Column, Row, Quantity) Values ('" & pstritem & "','" & pstrcolumn & "'," & pintrow & "," & pintquantity & ");"



cmd.Execute
Set cmd = Nothing

Now its telling me there is a syntax error, could someone check my syntax please

[Guy]

Which line is the syntax error at?

The only thing that I can see that may be causing a problem is the semicolon at the end of your SQL.

[Rockn]

Take out all of the extra junk from the INSERT statement. Are these values coming from a form or is it a straight insert query running from a macro? If it's coming from a form you need something like this:

INSERT INTO EmployeesHistory (FirstName, LastName, Title)
VALUES (Forms!Employees!FirstName, Forms!Employees!Lastname,Forms!Employees!Title);