I've opened a MS Access database by using this code:

Set DBMain = OpenDatabase(App.Path & "\Main.mdb")
Set RSMain = DBMain.OpenRecordset("Select * From MAIN")

Now I want to display the database information into a flexgrid control. But when I add this line:

Set FlexMain.DataSource = DBMain

it comes with the error message "Object variable or With block variable not set".

What am I doing wrong?

Thanks in advance.