Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Access2010 - Outlook2010 Zugriff auf den Kalender funktioniert nicht mehr

Frage Entwicklung VB for Applications

Mitglied: RDiller

RDiller (Level 1) - Jetzt verbinden

15.06.2012 um 10:15 Uhr, 4027 Aufrufe, 4 Kommentare

Lieb Kollegen,

folgendes Problem:
Nach und nach werden alle Office Versionen von 2007 auf 2010 umgestellt.
Bei einer Access Anwendung wird auf einen öffentlichen Kalender zugegriffen un desses Inhalt ausgelesen. Mit der 2007'er Version funktioniert das problemlos, aber bei der 2010'er Version erscheint die Fehlermeldung: "Der versuchte Vorgang konnte nicht ausgeführt werden. Ein Objekt wurde nicht gefunden."

Der Fehler wird durch den Befehl "Set objPublicFolder = objNameSpace.Folders("Öffentliche Ordner")....) hervorgerufen.

Kompletter Code:
Set objOutlook = New Outlook.Application
Set objNameSpace = objOutlook.GetNamespace("MAPI")
Set objPublicFolder = objNameSpace.Folders("Öffentliche Ordner").Folders("Alle Öffentlichen Ordner").Folders("DE").Folders("Change Kalender AW-Germany").Folders("Changekalender AW Frankfurt/Aachen")
Set fldPublicCalender = objPublicFolder

Die Verweise auf die Object Libraries (14'er) sind korrekt und das Kompilieren erzeugt keine Fehler.

Ich hoffe Ihr könnt mir Helfen.

Danke

Ralf

Mitglied: NetWolf
15.06.2012 um 10:19 Uhr
Moin Moin,

erst mal im Einzelschritt den Code ausführen und herausfinden, in welcher Zeile der Fehler entsteht.

Da 2010 die Öffentlichen Ordner geändert hat auf "USERNAME.ÖffenlicherOrdnerName" könnte das dein Problem sein.

Grüße aus Rostock
Wolfgang
(Netwolf)
Bitte warten ..
Mitglied: RDiller
15.06.2012 um 11:25 Uhr
Das sieht wirkilch so aus.
Der Fehler erscheint bei:
Set objPublicFolder = objNameSpace.Folders("Öffentliche Ordner").Folders("Alle Öffentlichen Ordner").Folders("DE").Folders("Change Kalender AW-Germany").Folders("Changekalender AW Frankfurt/Aachen")

Ich habe verschiedene Varianten versucht, aber keine funktioniert.
z.B.:
Set objPublicFolder = objNameSpace.Folders("user@domain").Folders("Öffentliche Ordner").Folders("Alle Öffentlichen Ordner").Folders("DE").Folders("Change Kalender AW-Germany").Folders("Changekalender AW Frankfurt/Aachen")
Bitte warten ..
Mitglied: NetWolf
15.06.2012 um 12:38 Uhr
Ich denke du hast mich noch nicht verstanden:

objNameSpace.Folders("user@domain").Folders("Öffentliche Ordner")

Die Bezeichnung "Öffentliche Ordner" gibt es so nicht mehr!
diese werden nun wie folgt benannt: "USERNAME.Öffentliche Ordner"

Keine Ahnung warum MS das so geändert hat, aber es bereitet nicht nur dir Probleme.

Grüße aus Rostock
Wolfgang
(Netwolf)
Bitte warten ..
Mitglied: RDiller
15.06.2012 um 14:16 Uhr
OK hier die Lösung:

Aus irgend einem Grund muss man erst eine Referenz zu der Root des Öffentlich Ordners erstellen und kann danach zum eigentlichen Ziel referenzieren.


Hier der Code, der erst abprüft, welche Outlook Version genutzt wird und dann die Emailadresse des Nutzers ermittelt.

Set objOutlook = New Outlook.Application
Set objNameSpace = objOutlook.GetNamespace("MAPI")

If InStr(objOutlook.Application.Version, "14") Then
Set accs = objNameSpace.Accounts
For Each Account In accs
If Account.AccountType = olExchange And Account.SmtpAddress = objNameSpace.Session.DefaultStore Then
pupfldr = "Öffentliche Ordner - " & Account.SmtpAddress
Set pub = objNameSpace.Folders(pupfldr)
objPublicFolder = pub.Folders.Item("Alle Öffentlichen Ordner").Folders.Item("XX").Folders.Item("YYY").Folders.Item("ZZZ")
)
End If
Next
Else
Set objPublicFolder = objNameSpace.Folders("Öffentliche Ordner").Folders("Alle Öffentlichen Ordner").Folders("XXX").Folders("YYY").Folders("ZZZ")

End If
Bitte warten ..
Ähnliche Inhalte
Outlook & Mail
gelöst Outlook Kalender freigeben funktioniert nicht (1)

Frage von Zippo97 zum Thema Outlook & Mail ...

Exchange Server
Kein Zugriff auf freigebene Outlook Kalender (6)

Frage von akae11 zum Thema Exchange Server ...

Firewall
gelöst Zyxel USG 40 Zugriff auf NAS funktioniert nicht (7)

Frage von Alexwehle zum Thema Firewall ...

VB for Applications
gelöst VBA Skript funktioniert auf lokalen Zugriff, aber nicht auf Netzwerkshare (1)

Frage von Dr.Cornwallis zum Thema VB for Applications ...

Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(6)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Administrator.de Feedback

Tipp: Ungelöste Fragen ohne Antwort in Tickeransicht farblich hinterlegen

Tipp von pattern zum Thema Administrator.de Feedback ...

Heiß diskutierte Inhalte
Windows Server
gelöst Update BackupExec 2015 auf 2016 führt zu SQL-Server Problem (16)

Frage von montylein1981 zum Thema Windows Server ...

Batch & Shell
gelöst Batch um Benutzer aus Sitzung abzumelden (15)

Frage von zeroblue2005 zum Thema Batch & Shell ...

Linux
gelöst Google Chrome startet nicht (12)

Frage von Thomas91 zum Thema Linux ...