Function returns RecordSet

[TestMe]

Hi All,

Is it possible to return a RecordSet from a function.
Just like return value from function.

I tried this code :
******************************

Code:

Function GetData() Set objConnection=fgGetConnection strQuery = "SELECT * FROM [DATA$]" Set RecordSet = CreateObject("ADODB.recordset") RecordSet.Open strQuery, objConnection GetData=RecordSet End Function

The Function call :

Code:

Set RecordSet = CreateObject("ADODB.recordset") RecordSet = GetData

*****************************
But Im getting an error with Wrong Parameter

Thanks
TestMe

[QTPian]

Hi,

You can return a record set object by using SET keyword.
In your function, use Set before GetData=RecordSet

Set GetData=RecordSet

Hope this helps!!!

[TestMe]

Hi,
Actually I tried this one earlier.Sry it'll not work...

[QTPian]

Hi, I found a solution for the problem. The following code works for me.
*******************

Code:

Set conn=createobject("adodb.connection") Set rec_set=createobject("adodb.recordset") function getrs() str_con= "dsn=dsn name" conn.open str_con, "username", "password" rec_set.open "select * from table", conn, 2, 3 Set getrs = rec_set End Function Set RdSt = getrs RdSt.movefirst msgbox(RdSt(0)) rec_set.close conn.close Set RdSt = Nothing

*********************

Here I have declared the connection object and recordset object globally (above the function). I have also used Set keyword infront of the function call (Set RdSt=getrs).

Revert back with your thoughts on the above code.

Thanks,