Hello John,
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


if there is another way of doing this it would simplify my life enormously, thanks once again for your assistance


Pete ( confused ) Kane

Regards,
Peter J. Kane



Pete