ExecuteComplete 이벤트

ExecuteComplete 이벤트는 실행이 완료된 직후에 발생하는 이벤트이며, 다음과 같은 구문을 사용한다.

ExecuteComplete (RecordsAffected, pError, adStatus, pCommand, pRecordset, pConnection)

인수	데이터 형식	설명
RecordsAffected	Long	실행된 명령에 영향을 받은 레코드의 개수를 나타낸다.
pError	ADODB.Error	오류가 발생해서 adStatus가 adStatusErrorsOccurred 이면 발생한 오류에 대한 정보를 가지고 있는 개체이다. 그렇지 않을 경우에는 설정되지 않는다.
adStatus	ADODB.EventStatusEnum	EventStatusEnum 상태 값으로 이벤트를 발생시킨 작업이 성공하면 adStatusOK로 설정되고 작업이 실패하면 adStatusErrorsOccurred로 설정된다.
pCommand	ADODB.Command	이 이벤트에 적용된 Command 개체를 나타낸다. Command 개체가 사용되지 않았다면 설정되지 않는다.
pRecordset	ADODB.Recordset	Execute 메서드에 의해서 생성된 Recordset 개체를 나타낸다. Action Query와 같이 반환 값이 없는 명령이 실행된 경우에는 Empty 값을 나타낸다.
pConnection	ADODB.Connection	Execute 메서드를 실행한 Connection 개체를 나타낸다.

이 이벤트는 명령이 성공적으로 수행되었는지를 점검하거나, 몇 개의 레코드가 명령에 의해서 영향을 받았는지를 알기 위해서 사용할 수 있다. 몇 개의 레코드가 영향을 받았는지를 알기 위해서 다음과 같이 코드를 작성할 수 있다.

Private Sub adoCn_ExecuteComplete(ByVal RecordsAffected As Long, _
     ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, _
     ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, _
     ByVal pConnection As ADODB.Connection)

   If adStatus = adStatusOK Then
      Debug.Print RecordsAffected & "개의 레코드가 변경되었습니다"
   End If
End Sub

참고

ExecuteComplete 이벤트는 Connection.Execute, Command.Execute, Recordset.Open 또는 Recordset.NextRecordset을 사용할 때 발생할 수 있다.