oOutlook = CREATEOBJECT( "Outlook.Application" ) oNameSpace = oOutlook.GetNameSpace('MAPI') oInbox = oNameSpace.GetDefaultFolder( 6 ) && Inbox folder for each loFolder in oInbox.Folders ? loFolder.Name, loFolder.Items.Count, loFolder.UnreadItemCount endfor oDeleted = oNameSpace.GetDefaultFolder( 3 ) && Deleted folder oSent = oNameSpace.GetDefaultFolder( 5 ) && Sent folder ? oDeleted.Items.Count, oSent.Items.CountCetin