Outlook events bei Mail in Ordner

  • Sonstige

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von petaod.

    Outlook events bei Mail in Ordner

    Hallo,

    ich habe eine Regel, die mir Mails von Absender A in den Oredner von Absender A packt. Nun soll ein Script gestartet werden, wenn eine neue Mail in den Ordner kommt.

    Dies habe ich wie folgt bewerkstelligt:

    Visual Basic-Quellcode

    1. Public WithEvents newMails As Outlook.Items
    2. Public Sub Application_Startup()
    3. Set newMails = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Parent.Folders("Sup")
    4. End Sub
    5. Private Sub newMails_ItemAdd(ByVal Item As Object)
    6. MsgBox ("Neue Mail in Sup")
    7. End Sub

    aber ich bekomme nun kein Popup, also wird das Event doch nicht richtig gestartet, oder?
    Ein Folder ist aber keine Items-Auflistung!
    Die Handler-Init Routine
    Set newMails = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Parent.Folders("Sup")
    würde ich durch

    Visual Basic-Quellcode

    1. Set newMails = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Parent.Folders("Sup").Items
    ersetzen.

    Halte dich exakt an die Doku:
    msdn.microsoft.com/en-us/library/bb220152(office.12).aspx
    --
    If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
    --