#DEFINE ccOlFolderCalendar 9 >>#DEFINE ccOlFolderContacts 10 >>#DEFINE ccOlFolderDeletedItems 3 >>#DEFINE ccOlFolderDrafts 16 >>#DEFINE ccOlFolderInbox 6 >>#DEFINE ccOlFolderJournal 11 >>#DEFINE ccOlFolderNotes 12 >>#DEFINE ccOlFolderOutbox 4 >>#DEFINE ccOlFolderSentMail 5 >>#DEFINE ccOlFolderTasks 13 >>>
loInbox=loNS.GetDefaultFolder(ccOlFolderInbox)
oMFfolder = loInbox.Folders("Michel Fournier")