I am running a SQL Append query in VBA and it is working fine. I now want to add a condition where a field value matches a variable value in my code but cannot seem to get it to work. SQL String is as follows

"INSERT INTO tblItemHistory ( UNIQUE_ID, ITEMNO, SELL, COST, DATE_FLD, TYPE, DOC_TYPE, DOC_NO, QTY, QTY_STK, AVG_COST, DB_SERVER_DATE ) SELECT dbo_INVHIST.UNIQUE_ID, dbo_INVHIST.ITEMNO, dbo_INVHIST.SELL, dbo_INVHIST.COST, dbo_INVHIST.DATE_FLD, dbo_INVHIST.TYPE, dbo_INVHIST.DOC_TYPE, dbo_INVHIST.DOC_NO, dbo_INVHIST.QTY, dbo_INVHIST.QTY_STK, dbo_INVHIST.AVG_COST, dbo_INVHIST.DB_SERVER_DATE FROM dbo_INVHIST WHERE (((dbo_INVHIST.ITEMNO)= strItemCode))"

Each time I run it, it is bringing up a parameter box for strItemCode.

Could anyone please help?

Try and change the last section from ....

to

HTH

Mike


Mike
EchoVue.com

Unless its a number in which case:

WHERE (((dbo_INVHIST.ITEMNO)= " & strItemCode & "))"

It looks like a string, of course, but I have seen coders name all their varialbles "strXX" if they don't code much or are coding fast (I have done that.)

:D


mmcdonal

try doing this..

WHERE (((dbo_INVHIST.ITEMNO)= " & Me.strItemCode & "));"

Thanks echovue, that works a treat !