How do I pass a recordset between forms?

[tashayar]

I am working in VB6. I build my recordset in a separate search form. I return to my main form and the first record is displayed. When I try to access the next record, the recordset is empty. I am setting the main global recordset equal to the search form created recordset to try and pass it back to the main form. (Set rst1 = rst2) This is moderately urgent. I would appreciate any help you could provide. tashayar

 

[DrJavaJoe]

If you add a module to your project and declare your recordset there as public it'll be available throught out the project.

 

[VNDN]

use property let and property let event to pass recordset between form.

 

[tashayar]

Thanks for your suggestion. The recordset I was trying to pass to was already Public and in a Module. I tried making the search form recordset Public and put it in a module, but I get an "object not set" error on the main recordset after returning to the main form and attempting to movenext. The recordset is filled just before I hide the search form and return to the main form. After the return, it is gone. tashayar

 

[DrJavaJoe]

'Module
Public adoRS As New ADODB.Recordset


'Search Form
adoRS.open strSQL, strConnection

'Main Form
adoRS.MoveNext '<- Should Work


'When finished with rs
adoRS.Close

 

[CCLINT]

If it is REALLY public and REALLY in a module, the look if the recordset is being closed and Set to Nothing somewhere.
Otherwise it should work.