query cannot see integer value

[ugly]

I have set up a recordset to return a query-If I write-it works fine

Set ms = db.OpenRecordset("Select keyFK from authcomp where AuthorIDFK = 2 ", dbOpenDynaset)

If I write it like this it does'nt work
Dim holder As Integer
holder = 2
Set ms = db.OpenRecordset("Select keyFK from authcomp where AuthorIDFK = '"holder"'", dbOpenDynaset)

what is the problem with holder?

 

[HarleyQuinn]

Does it work if you try:

Set ms = db.OpenRecordset("Select keyFK from authcomp where AuthorIDFK = " & holder & ", dbOpenDynaset)

you don't need the 's and you need the & to include a variable in a string.

Hope this helps

HarleyQuinn
---------------------------------
The most overlooked advantage to owning a computer is that if they foul up there's no law against wacking them around a little. - Joe Martin

Get the most out of Tek-Tips, read FAQ222-2244 before posting.

 

[PHV]

I'd use this:

Set ms = db.OpenRecordset("Select keyFK from authcomp where AuthorIDFK = " & holder, dbOpenDynaset)

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[TheAceMan1]

ugly . . .

[blue]HarleyQuinn[/blue] & [blue]PHV[/blue] are correct. You only need quotes for strings! . . .

See Ya! . . . . . .

Be sure to see thread181-473997