Problem working with foldere below inbox

[Keith]

I am writing a function to process a folder that is a sub-folder of
"Inbox."
I can identify inbox and work with it, using the following code.
However, I have been unable to obtain a list of folders, and cannot figure
out how to connect to the Inbox sub-folder "MySubFolder"

Any suggestions would be helpful,

Below is the code that works
'Open or attach to Outlook
Set oApp = New Outlook.Application
Set oNameSp = oApp.GetNamespace("MAPI")

'Attach to the appropriate folders
Set oFoldMail = oNameSp.GetDefaultFolder(6) '6=Inbox

thanks

keith

 

[Ken Slovak - [MVP - Outlook]]

Set oMyFolder = oFoldMail.Folders("MyFolderName")

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Lead Author, Professional Outlook 2000 Programming, Wrox Press
Lead Author, Beginning VB 6 Application Development, Wrox Press
Attachment Options
http://www.slovaktech.com/attachmentoptions.htm
Extended Reminders
http://www.slovaktech.com/extendedreminders.htm