DoCmd.OpenForm Where Condition From Recordset 1

[firsttube]

I'm using an ADO recordset to search for record and then open a form based on the result...

rs3.movefirst
theID = rs3("ID")
DoCmd.OpenForm "theForm", acNormal, , "[ID] = ' & theID & '", acFormEdit


The problem is with the DoCmd.Openform line. Any ideas? How can I open a form based on the result of the recordset?

thanks

ft

Set the gearshift for the high gear of your soul, you've got to run like an antelope, out of control.

 

[PHV]

If ID is defined as numeric in the form underlaying table/query then get rid of the single quotes.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[RoyVidar]

You'll need to concatinate the string:
[tt]DoCmd.OpenForm "theForm", acNormal, , "[ID] = '" & theID & "'", acFormEdit ' for string
DoCmd.OpenForm "theForm", acNormal, , "[ID] = " & theID, acFormEdit ' for numeric[/tt]

Roy-Vidar