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, 3978 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 ..
Neuester Wissensbeitrag
CPU, RAM, Mainboards

Angetestet: PC Engines APU 3a2 im Rack-Gehäuse

Erfahrungsbericht von ashnod zum Thema CPU, RAM, Mainboards ...

Ä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 ...

Heiß diskutierte Inhalte
Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

DSL, VDSL
DSL-Signal bewerten (10)

Frage von SarekHL zum Thema DSL, VDSL ...

Windows Server
Mailserver auf Windows Server 2012 (8)

Frage von StefanT81 zum Thema Windows Server ...

Backup
Clients als Server missbrauchen? (8)

Frage von 1410640014 zum Thema Backup ...