Docmd.runsql

anne.burrows · #1 (**permalink**) October 25th, 2006, 06:38 AM

I am trying to update a table depending on the value in strwhere
The update statement does not recognise the variable.

Dim strwhere As Integer
Dim strsql As String
strwhere = oldTcp
strsql = "UPDATE TCPIP SET TCPIP.Allocated = 0 WHERE ((TCPIP.ID)=[strwhere]);"

Shasur · #2 (**permalink**) October 25th, 2006, 07:16 AM

Replace

strsql = "UPDATE TCPIP SET TCPIP.Allocated = 0 WHERE ((TCPIP.ID)=[strwhere]);"

with

strsql = "UPDATE TCPIP SET TCPIP.Allocated = 0 WHERE ((TCPIP.ID)=[" & strwhere & "]);"

The variable was earlier taken as part of the string literally

Cheers
Shasur

http://www.vbadud.blogspot.com

anne.burrows · #3 (**permalink**) October 25th, 2006, 08:21 AM

Thanks for your help, as the value is an integer I took the brackets out and it worked fine.

Saved me a lot of time.

Thanks again

Anne

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Using DoCmd.RunSQL to return values	jscully	Access VBA	10	August 21st, 2017 12:58 PM
DoCmd.RunSQL dates and time	TarkaDahl	Access VBA	3	May 11th, 2006 11:19 AM
Question about DoCmd.RUNSQL using an insert statem	Nasem	VB Databases Basics	1	May 5th, 2006 10:15 AM
docmd.runsql "select	RodMead	Access VBA	2	July 31st, 2004 02:55 PM
Help with DoCmd.RunSQL command	ricmar	Access VBA	3	July 21st, 2004 03:32 PM