Jump to content

approved_ok

Members
  • Gesamte Inhalte

    2
  • Registriert seit

  • Letzter Besuch

Beiträge erstellt von approved_ok

  1. Danke für die Hilfestellung, hat soweit gut funktioniert:
     

    # Abrufen des Namespaces
     
    Add-Type -assembly "Microsoft.Office.Interop.Outlook"
    $outlook = New-Object -ComObject Outlook.Application
     
    $namespace = $outlook.GetNamespace('MAPI')
     
    #--------------
     
    # Default Contacts folder
    $Contacts = $namespace.GetDefaultFolder(10)
    $KundenContacts = $Contacts.Folders["Kunden"]
    $LieferantenContacts = $Contacts.Folders["Lieferanten"]
     
    $Kunden_cnt = 0
    $Lieferanten_cnt = 0
    <#
    #------------------------------
    # Schleife für Subfolder Kunden
    foreach ($Contact in $KundenContacts.Items)
    {
        if($Contact.Body -and $Contact.Categories -like "*Kundenstamm*" )
     
            {
     
                Write-Output ("--" + $Contact.Categories+ " :" + $Contact.FullName + " ........" + $Contact.Body )
    • Like 1
  2. Über ein externes Programm werden Kontakte in Outlook erstellt.
    Teile dieser neuen Kontakte 'Kunden' und 'Lieferanten' ($Contact.Body) sollen gelöscht werden.

     

    Nach dem Import der Daten sieht das in Outlook / Kontakte so aus:

    1085582038_2022-08-2109_39_51-Kontakte-Outlook.png.f5c02dd6c3097f763e5cbb802695a421.png

     

    in der Ordneransicht ist das ein 'Unterordner'

    95300465_2022-08-2109_39_51-Kontakte1-Outlook.png.41f46a8a9577059efe48a6d5208762cd.png

     

    Im Feld $Contact.Categories ist bei Kunden 'Kundenstamm' und für Lieferanten 'Lieranten' eingetragen - vielleicht hilft das

     

     

    Folgenden Powershellscript habe ich dafür probiert, dieser findet jedoch nur die Kontakteinträge im original 'Kontakte' Ordner.

     


    # Abrufen des Namespaces

    Add-Type -assembly "Microsoft.Office.Interop.Outlook"

    $outlook = New-Object -ComObject Outlook.Application

    $namespace = $outlook.GetNamespace('MAPI')

    #--------------

    # Default Contacts folder

    $Contacts = $namespace.GetDefaultFolder(10)

    $cnt = 0

     

    foreach ($Contact in $Contacts.Items)

    {

        if($Contact.Body -and $Contact.Categories -like "*Kundenstamm*")

            {

                echo ("--" + $Contact.Categories+ " :" + $Contact.FullName + " ........" + $Contact.Body )

                $cnt++

            }

    }

    # Anzeige Anzahl bearbeitete Kontakte

    $cnt

    $outlook.Quit | Out-Null

    [GC]::Collect()

     

    Frage: wie erreicht man die Unterordner 'Kunden' bzw. 'Lieferanten'

     

    Danke im Vorfeld für eure Hilfe

     

     

     

×
×
  • Neu erstellen...