DAO Recordset Object Manipulation - Access 2002 VBA

[foodmandeuce]

I would soooo appreciate help from anyone who can provide it:

I am setting up a quasi-command line in an application, where the user enters a unique command in a text box on a form, the application then searches the table for the command, grabs the corresponding "form" field from the table, and then goes to the table. Both of my books say to do the same thing, and the code has not passed compiling yet. Here is my code:

Sub Commandline(lngCommandEntry As Long)

Dim rstTable As Recordset

rstTable = CurrentDb.OpenRecordset("9999_tblCommands", dbOpenTable)

rstTable.Index = "lngCommand"

rstTable.Seek "=", lngCommandEntry

DoCmd.OpenForm rstTable.strForm, , , ""

End Sub


PLEEEEEEEEZZZZ HELP!

 

[TonyJollans]

Hi foodmandeuce

I only have 2000, but I think you need at least ..

Dim rstTable As

DAO.

Recordset

Set

 rstTable = CurrentDb.OpenRecordset("9999_tblCommands", dbOpenTable)

.. and maybe ..

Dim rstTable As DAO.Recordset

Dim db As DAO.Database
Set db = CurrentDb

Set rstTable =

db

.OpenRecordset("9999_tblCommands", dbOpenTable)

Enjoy,
Tony

 

[foodmandeuce]

Thanks for the help, Tony!

Actually, the variable type did need to be changed. Instead of changing it to DAO.Recordset though, I changed it to Object, and it worked - thank goodness.

I appreciate your help!