Visual Basic Move Outlook gesendete Objekte zu anderen Ordner

Question

Ich habe Visual Studio 2017 Pro installiert und bin am Schreiben eines VSTO Outlook-Add-Ins. Im Wesentlichen möchte ich Code ausführen, wenn ein neues Element zum Ordner gesendete Objekte hinzugefügt wird. Ich habe geforscht und anscheinend ist dies der effizienteste Weg, dies zu tun, anstatt Code auf der ItemSend-Veranstaltung zu haben.

Ich habe verschiedene MsgBox-Befehle hinzugefügt, damit ich sehen kann, dass verschiedene Bits tatsächlich ausgeführt werden, aber aus irgendeinem Grund scheint das ItemAdd-Ereignis nicht ausgelöst zu werden. Mein Code ist wie folgt:

Public Class ThisAddIn 
    Public WithEvents myOlItems As Outlook.Items 

    Private Sub ThisAddIn_Startup() Handles Me.Startup 
     MsgBox("Initliasing add-in") 
     AddIn_Init() 
    End Sub 

    Private Sub ThisAddIn_Shutdown() Handles Me.Shutdown 

    End Sub 

    Private Sub AddIn_Init() 
     myOlItems = Application.GetNamespace("MAPI").GetDefaultFolder(Microsoft.Office.Interop.Outlook.OlDefaultFolders.olFolderSentMail).Items 
     MsgBox("We are ready!") 
    End Sub 

    Private Sub myOlItems_ItemAdd(ByVal Item As Object) 
     MsgBox("You sent an email from " & Item.SenderEmailAddress) 
    End Sub 

End Class 

Ich glaube, ich bin nahe daran arbeiten, aber ich bin noch nicht so weit - alle Hinweise sehr dankbar empfangen.

Answer 1

Der endgültige Code funktioniert jetzt - danke!