User-defined type error (A2K/VBA)

[Night]

ok I have some code and I keep getting a User-defined type not defined error. Here is my code.

Public Function RefreshSmartSearch()
Dim CurDB As Database, GetData As Recordset, RestofArgs As String
Set CurDB = CurrentDb()
Me!OptionLabel1.Visible = False
Me.Option1.Visible = False
Me!OptionLabel2.Visible = False
Me.Option2.Visible = False
Me!OptionLabel3.Visible = False
.....

Any help would be appreciated. This code works for another database of the same type, but can't figure out why it won't work now.

[MarkJ]

Check your Tools | References for a reference to ADO and/or DAO.

The default object in Access 2000 is ADO, whereas 97 used DAO.

You'll need to add DAO to the list of References and remove ADO (assuming you're not using it).

Also, it's good practice to explicitly declare your variables by adding the object Prefix in front of them:
Dim db as DAO.Database
Dim rst as DAO.Recordset 'etc....

HTH

[Night]

Thank you. After looking I realized the DAO control wasn't activated. I keep forgeting I need to set that damn thing up. Anyway many thanks.