Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Publicfolder Favoriten in Outlook per Skript einrichten

Mitglied: Dirmhirn

Dirmhirn (Level 2) - Jetzt verbinden

04.09.2013 um 14:23 Uhr, 3285 Aufrufe, 1 Kommentar, 1 Danke

Hi!

habe eine kleines Skirpt mit dem ich öffentliche Ordner im Outlook zu den Favoriten hinzufügen kann (gekürzt):
'VBS
Set olkApp = CreateObject("Outlook.Application")
Set olkSes = olkApp.GetNameSpace("MAPI")
Set olkFolder = olkSes.GetDefaultFolder(olPublicFoldersAllPublicFolders)
Set olkFolder = olkFolder.Folders("Ordner1")	
olkFolder.AddToPFFavorites
nur dauert das recht lange auf manchen alten Kisten.
würde jetzt gerne zuerst prüfen, ob der Ordner schon in den Favoriten ist.

außerdem - wie kann ich Einträge wieder löschen?

hat vll jemand ein Skript dafür am Laufen? Outlook 2013 reicht aus.

sg Dirm
Mitglied: colinardo
05.09.2013, aktualisiert um 10:47 Uhr
Hallo Dirm,
den FavoritenOrdmer kannst du behandeln wie jeden anderen Ordner auch, d.h. Ordner die dort hinterlegt sind, sind auch Folder-Objekte die eine Verknüpfung zum Original-Ordner haben, nur werden beim löschen von Ordnern aus diesem die Originale nicht gelöscht.
Hier mit könntest du prüfen ob ein Ordner schon vorhanden ist und wenn nicht diesen hinzufügen (Ich setze jetzt mal ein deutsches System voraus, in dem der Favoritenordner den Namen Favoriten hat):
01.
Sub checkPublicFolderFavorites()
02.
    Dim pfAllFolderRoot As Folder, pfRoot As Folder, myFolder As Folder
03.
    Set pfAllFolderRoot = Application.GetNamespace("MAPI").GetDefaultFolder(olPublicFoldersAllPublicFolders)
04.
    Set pfRoot = pfAllFolderRoot.Parent
05.
    
06.
    found = False
07.
    Set myFolder = pfAllFolderRoot.Folders("Ordner 1")
08.
    For Each objFolder In pfRoot.Folders("Favoriten").Folders
09.
        If myFolder.Name = objFolder.Name Then
10.
            found = True
11.
        End If
12.
    Next
13.
    ' Keinen entsprechenden Ordner Namens "Ordner 1" gefunden, also füge Ihn hinzu.
14.
    If Not found Then
15.
        myFolder.AddToPFFavorites
16.
    End If
17.
End Sub
außerdem - wie kann ich Einträge wieder löschen?
ganz normal wie du normale "Folder" Objekte auch löschst. Wenn ich jetzt von oben das Objekt pfRoot mit hineinnehme und möchte den Ordner "Ordner 1" aus den Favoriten löschen, geht dies so:
01.
pfRoot.Folders("Favoriten").Folders("Ordner 1").Delete
Grüße Uwe
Bitte warten ..
Ähnliche Inhalte
Outlook & Mail

Öffentlicher Ordner speichert sich nicht als Favorit

Frage von GwaihirOutlook & Mail1 Kommentar

Hallo zusammen, eigentlich kann ich hier in der Firma bei fast jedem in Outlook 2013 die Geschäftskontakte (die als ...

Microsoft Office

Outlook 2010 Konto Reparieren per Skript möglich?

Frage von pixel0815Microsoft Office4 Kommentare

Hallo zusammen, ist es möglich per Skript ein Outlook 2010 Konto zu reparieren? Ich möchte das erzwungenermaßen ein erneutes ...

Outlook & Mail

Öffentliche Kontakte im Outlook per Skript kopieren

gelöst Frage von o0Asia0oOutlook & Mail4 Kommentare

Hallo Zusammen Gibt es eine Möglichkeit, wie man mit einem Skript die Öffentliche Kontakte Synchronisiert mit einem Kontakteordner von ...

Batch & Shell

Powershell Skript Fehlermeldung - Outlook und Log Probleme

Frage von Pat.batBatch & Shell3 Kommentare

Hallo, ich habe gerade folgendes Problem. In den letzten Wochen wo das Skript lief gab es keine Probleme. Aber ...

Neue Wissensbeiträge
Datenschutz

SiSyPHuS Win10: Analyse der Telemetriekomponenten in Windows 10

Tipp von freesolo vor 3 TagenDatenschutz1 Kommentar

Alle die sich detailliert für die Datensammlung interessieren die unter Windows 10 stattfindet, sollten sich folgende Analyse des BSI ...

Sicherheit
Adminrechte dank Intel-Grafikkarte
Information von DerWoWusste vor 3 TagenSicherheit2 Kommentare

ist das Advisory, welches beschreibt, welche Intel HD Graphics Modelle Sicherheitslücken haben, mit denen sich schwache Nutzer zu Admins ...

Internet

EU Urheberrechtsreform: Eingriff in die Internetkultur

Information von Frank vor 4 TagenInternet1 Kommentar

Liebe Besucherin, lieber Besucher, warum erscheint das obere Banner in allen Beiträgen? Aus Protest gegen Teile der geplanten EU-Urheberrechtsreform ...

Windows Server
Windows Backup - FilterManager Event 3
Tipp von NixVerstehen vor 5 TagenWindows Server

Hallo zusammen, ich bin kein gelernter ITler und auch beruflich nicht in dem Feld tätig. Wir setzen in unserem ...

Heiß diskutierte Inhalte
DNS
50 EUR für Telekom-, Unitymedia- und Vodafone-Kunden
Frage von Zorro1199DNS14 Kommentare

Hallo zusammen, wie evaluieren gerade das korrekte Einhalten von DNS-TTLs durch verschiedene Provider. Aktuell suchen wir noch Kunden der ...

Windows Server
Sonntagsfrage: Welchen Sinn seht Ihr noch im Server 2019 Essentials
Frage von ashnodWindows Server13 Kommentare

Guten Morgen, ich habe gestern den Windows Server 2019 Essentials als Trial in einer VM installiert um mir das ...

Windows Server
Windows 2012 R2 - Skript um Druckerkonfiguration auszulesen und zu setzen
gelöst Frage von Der-PhilWindows Server11 Kommentare

Hallo! Kennt ihr eine Möglichkeit, per Skript die Konfiguration eines Druckers auszulesen und auf einen anderen anzuwenden? Hintergrund: Ich ...

Grafik
Viele Fotos organisieren - Windows Dateisystem zu lahm bzw. überfordert
Frage von augustaparkGrafik11 Kommentare

Hallo und Guten Morgen, hat einer eine Idee, wie man viele Fotos sinnvoll und effizient organisieren kann? Wir haben ...