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, 4065 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 Outlook2010 sendet keine Anhänge mehr (3)

Frage von JensDND zum Thema Outlook & Mail ...

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

Outlook & Mail
Upgrade auf Office 2016: Kein Zugriff auf geteilte Kalender (2)

Frage von fuzzyLogic zum Thema Outlook & Mail ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows 10
Windows 10 im Unternehmen? (25)

Frage von zorlayan zum Thema Windows 10 ...

Festplatten, SSD, Raid
Raid 1 2 SSD mit Windows Server 2016 (17)

Frage von jaywee zum Thema Festplatten, SSD, Raid ...

Netzwerkgrundlagen
Pro Contra "echtes Subnetting" VLSM (12)

Frage von killing.Apfelkuchen zum Thema Netzwerkgrundlagen ...

Voice over IP
Über Fritzfax over IP gehen nur einige Faxe (11)

Frage von shearer9 zum Thema Voice over IP ...