Просьба показать в виде кода программы, как добраться до объектов письма , находящегося в папке OULOOK (например в папке 'Входящие').
Вот код, где я добрался до списка писем в папке 'Входящие' и смог определить:
письмо прочинатнное или нет?

oOutLook = CreateObject("OutLook.Application")
oNameSpace = oOutLook.GetNameSpace("MAPI")
? oNameSpace.Folders[1].Name && Mailbox - karly
oMailBox = oNameSpace.Folders
? oNameSpace.Folders(1).Folders[2].Name && Outbox
oOutBox = oNameSpace.Folders(1).Folders[2]
nMessageCount = oOutBox.Items.Count
? nMessageCount
? oOutBox.Name
FOR nLoop = 1 TO 5 && nMessageCount может долго работать ограничим для примера
? oOutBox.Items[nLoop].Unread
ENDFOR

Если можно, то допишите этот код программы и
например получить тему письма в символьную переменную.
Спасибо!.