title image


Smiley Du darfst dann aber auch keine Outlook-Konstanten oder -Objekte verwenden..
also nicht:



Dim oApp As New Outlook.Application, oNameSpace As Outlook.NameSpace

Set oNameSpace = oApp.GetNamespace("MAPI")

oApp.Explorers.Add oNameSpace.GetDefaultFolder(olFolderInbox), olFolderDisplayNormal

oApp.Explorers(1).Display





sondern



Private Const olFolderDisplayNormal = 0

Private Const olFolderInbox = 6

Dim oApp As Object, oNameSpace As Object

Set oApp = CreateObject("Outlook.Application")

Set oNameSpace = oApp.GetNamespace("MAPI")

oApp.Explorers.Add oNameSpace.GetDefaultFolder(olFolderInbox), olFolderDisplayNormal

oApp.Explorers(1).Display





Siehe auch unter "late binding" im Archiv.


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: