The following code example provides the empty event procedures required to implement a COM add-in.
Implements IDTExtensibility2
Private Sub IDTExtensibility2_OnAddInsUpdate(custom() As Variant)
' Occurs when the set of connected COM add-ins changes, that is when
' any other add-in is connected or disconnected.
' The custom argument is ignored.
End Sub
Private Sub IDTExtensibility2_OnBeginShutdown(custom() As Variant)
' If the COM add-in is connected, occurs when Outlook begins its
' shutdown routines.
' The custom argument is ignored.
End Sub
Private Sub IDTExtensibility2_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant)
' Occurs when the COM add-in is connected.
' The Application argument is the Outlook Application object.
' The ConnectMode argument specifies how the COM add-in was connected.
' It can be
' ext_cm_AfterStartup Add-in was connected after Outlook started,
' or the Connect property of the corresponding
' COMAddIn object was set to True
' ext_cm_Startup Add-in was connected on startup
' ext_cm_External
' ext_cm_CommandLine
' The AddInInst argument is the COMAddIn object that refers to the current
' instance of the add-in itself.
' The custom argument is ignored.
End Sub
Private Sub IDTExtensibility2_OnDisconnection(ByVal RemoveMode As AddInDesignerObjects.ext_DisconnectMode, custom() As Variant)
' Occurs when the COM add-in is disconnected.
' The RemoveMode argument specifies how the COM add-in was disconnected.
' It can be
' ext_dm_HostShutdown Add-in was disconnected when Outlook was
' closed.
' ext_dm_UserClosed Add-in was disconnected when the user
' cleared the corresponding check box in the
' COM Add-ins dialog box, or the Connect
' property of the corresponding COMAddIn
' object was set to False.
' The custom argument is ignored.
End Sub
Private Sub IDTExtensibility2_OnStartupComplete(custom() As Variant)
' If the COM add-in connects at startup, occurs when Outlook completes
' its startup routines. This event does not occur if the COM add-in is not
' connected when Outlook loads, even when the user connects the add-in in
' the COM Add-ins dialog box.
' The custom argument is ignored.
End Sub