Returning a recordset as an object

[LincolnIMP]

I have a class module that returns a recordset in the following way

public function GetRecordset() as adodb.recordset
dim rs as adodb.recordset

'//code to get recordset (disconnected)

set GetRecordset = rs

set rs = nothing

end function

I understand that this returns a reference to the recordset.

It is planned that the application will be upgraded to MTS.

My question is how do I get the function to return an object to the client application rather than a reference?

As I do not want the recordset in memory on the server

I have thought that i could use the clone method of a recordset in the client application and destroy the reference to the server side recordset.

Comments Please

thanks

[Negative0]

Try sending it as a parameter:

public Sub GetRecordset(ByRef tmpRS as Adodb.Recordset) 
dim rs as adodb.recordset 

'//code to get recordset (disconnected) 

set tmpRS = rs 

set rs = nothing 

end Sub

Hope this helps,