Подскажите пожалуйста как прочитать сообщения из папки InBox а также вложения если они есть. Я покопался методом научного тыка и написал следующий код и нашел что это вторая папка а как следовать дальше не могу докопатся.
oOutLook = CreateObject("OutLook.Application",)
oNameSpace = oOutLook.GetNameSpace("MAPI")
oNameSpace.logoff()
oNameSpace.logon("OutLook","")

oMailBox = oNameSpace.Folders
FOR i=1 TO oMailBox.Folders.count
? 'I=',i,'Nume=',oMailBox.Folders(i).name
oOutBox = oMailBox.Folders
? 'Inreg',oOutBox.Items.Count

К счастью я сам откопал ответ.
Нашел шмат кода который позволяет прочитать сообщения при помощи OutLook Express. Если у когото возникеть нужда стучите и вам откроюь. Ибо ищущий найдет. )))):::::