>>oOleDb = CreateObject("OleDbFox.Utils") >>oRecordSet = CreateObject("ADODB.Recordset") >>* If cursor name not specified, a cursor in selected area will be used >>oOleDb.CursorToRs(oRecordSet, "MyCursor") >>* Now you can return oRecorset to VB >>>>Alexander
o = CreateObject("OleDbFox.Utils") && to fix a problem with library initialization oRS = CreateObject("ADODB.Recordset") oRS.ActiveConnection = "Provider=MSDAOSP;Data Source=OleDbFox.DSObject;" oRS.Open("AnyOpenedInVFPCursor") * now you can return oRSHowever I have not tested it within COM objects.