Write an OnEndOfRecordset event handler to take specific action after an attempt to move to a row past the end of the recordset. No row navigation methods should trigger this event due to the effects of the Eof property. This event should only be triggered by internal recordset navigation operations or by direct access to the Recordset object (through the dataset component's Recordset property). 

DataSet is the ADO dataset component that triggered the OnEndOfRecordset event. This dataset component also contains the recordset in question. 

MoreData is a boolean value indicating whether there are more unfetched rows beyond the last row fetched prior to the OnEndOfRecordset event. 

The EventStatus value (ADO EventStatusEnum) indicates the success or failure of the execution of the operation that triggered the event.