enum ADODB.EventStatusEnum:

   def enum
      adStatusOK = 1
      adStatusErrorsOccurred = 2
      adStatusCantDeny = 3
      adStatusCancel = 4
      adStatusUnwantedEvent = 5.

end enum.
