Pesky Parameter boxes on SQL Append queries in VBA

[wildsyp]

Hi,

I have been trying to run a fairly straightforward but of VBA code to append four fields from a form into a table. Unfortunately, when the code runs through I get the 'Enter Parameter Value' box appear for the updatedby and changereason updates. This is very frustrating, but I am probably missing something simple. Code is below.

Any help with this would be great.

Cheers
Paul


date1 = Date
updatedby = fOSUserName
Change = Me.MIRef
changereason = InputBox("Please confirm reason for change to revised date")
DoCmd.RunSQL "INSERT INTO Tbl_RevisedEndDateChange ( [Updated By], Change, [Date Changed], [Reason for change] ) " & _
"Select " & updatedby & ", " & Change & ", " & Format(date1, "dd/mm/yyyy") & ", " & changereason & ";"

 

[pbaldy]

Presuming they are text data types, you need to surround the value with single quotes:

"Select '" & updatedby & "',...

 

[wildsyp]

Presuming they are text data types, you need to surround the value with single quotes:

"Select '" & updatedby & "',...

Solved! Thanks for your help.

Paul

 

[pbaldy]

No problemo; generally you have to surround text values with the single quote, date values with #, numeric values with nothing.

 

[wildsyp]

It all makes sense now. The # around dates has also resolved another niggling issue I have always had as well!