Hello John / Larry,
if you can pardon my ignorance here much obliged, the way I read it was, e.g., if I created a class as shown below, I could bind

my class to another ( using EventHandler() ) which would capture the events of my bound object

    oEventSink = CreateObject('PKTest')
    oConn = CreateObject('ADODB.Connection')
    oRs = CreateObject('ADODB.RecordSet')
    oConn.Open('MYDSN')
    lRet = EventHandler(oRs,oEventSink)

    If lRet
        oRs.Open('Select * From foo',oConn)
    EndIf
    
    Define Class PKTest as Session
        IMPLEMENTS _Recordset In ADODB.Recordset  
      
        Procedure _Recordset_Open(whatever parameters)
            I thought this code would fire when I issued oRs.Open('Select * From foo',oConn)
        EndProc

        All the rest of the interface stuff here...
    EndDefine



 I just tried it with RecordsetEvents and it worked, I need to read up more


thank you very much for your time

Regards,
Peter J. Kane



Pete