oOutlook = CREATEOBJECT( [Outlook.Application] ) oNamespace = oOutlook.GetNamespace( [MAPI] ) loRootFolder = oNameSpace.Folders(1) FOR EACH loFolder IN loRootFolder.Folders ? loFolder.Name NEXTOf course, this assumes that your custom folder is under Personal Folders. If it is under the Inbox, you will have to modify the code above accordingly.