Подскажите, можно ли из аксеса считать сообщения из папки "Входящие" аутлука. Пробовал поиск по форуму на эту тему, но там полно как отправить, но как прочитать - ничего нет.

Hummer, спасибо тебе за ссылку, она очень в тему, но что-то не работает

Кто знает, гляньте, что неправильно, откуда вырастает долб. ошибка 13 "несоответствие типа"

Sub MailMes()
Dim olApp As Outlook.Application
Dim inNameSpace As Outlook.NameSpace
Dim MesItems As Outlook.Items
Dim InFolder As Outlook.MAPIFolder 'это может быть лишнее, но хоть выйти на имя папки
Dim MailIt As Outlook.MailItem

Set olApp = New Outlook.Application
Set inNameSpace = olApp.GetNamespace("MAPI")
Set InFolder = inNameSpace.GetDefaultFolder(olFolderInbox)
Set MesItems = inNameSpace.GetDefaultFolder(olFolderInbox).Items


For Each MailIt In MesItems 'здесь ошибка 13 "несоответствие типа"
MsgBox MailIt.Body
Next MailIt

End Sub

Может быть надо написать что-то типа Set MailIt = ..., но что - ?

Спамажитееееее !!!!

Для справки: это Office 97

Люди, ну помогите же кто-нить. Мне домой скоро, не дайте уйти дураком.

Ух, мир не без добрых людей. РА! я тя расцелую !!!

ЛП, что касается Outlook.mailItem, то так было в первой ссылке, предложенной Hummero-м, всё равно ему спасибо. Эту проблему я решил на XP, но этот дол-ный 97 меня уже просто достал. Чертову контору душит жаба на новый WIN и изволь извращаться. Действительно всё зло от жадности.