[AccessD] OT Outlook

MartyConnelly martyconnelly at shaw.ca
Sun Sep 24 11:01:35 CDT 2006


At least from object model these should be synonymous.
objFolder.EntryID (Hex string) and  oFolder.Name

I think you can list the entries with this magic constant
    cdoPR_EntryID = &HFFF0102
How I am not sure


Dim oSession As MAPI.Session
  Dim oFolder As MAPI.Folder


  Dim objFolder As Outlook.MAPIFolder
  Set objFolder =
Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)

  Set oSession = CreateObject("MAPI.Session")
  oSession.Logon "", "", False, False

  Set oFolder = oSession.GetFolder(objFolder.EntryID, objFolder.StoreID)

  If oFolder Is Nothing Then
    Debug.Print "I am nada..."
  Else
    Debug.Print oFolder.Name
  End If

  Set oFolder = Nothing
  oSession.Logoff
  Set objFolder = Nothing


Martin Reid wrote:

>It is my understanding that an Outlook EntryID can be used to uniquely ID an Outlook folder. i.e each folder has a unique GUID that can be referenced via VBA?
> 
>Is this correct?
> 
> 
>Martin
> 
>Martin WP Reid
>Training and Assessment Unit
>Riddle Hall
>Belfast
> 
>tel: 02890 974477
> 
> 
>  
>
>------------------------------------------------------------------------
>
>No virus found in this incoming message.
>Checked by AVG Free Edition.
>Version: 7.1.405 / Virus Database: 268.12.8/455 - Release Date: 22/09/2006
>  
>

-- 
Marty Connelly
Victoria, B.C.
Canada




More information about the AccessD mailing list