Outlook. Oткрыть аттачмент.B теле письма имя файла

[pshik]

Не знаю Outlook и не знаю как сделать

Приходят Excel файлы с письмом.Файлы с одинаковым именем в каждом письме
В теле письма название файла

Так как файлов много, нужно автоматизировать
-открыть письмо
-открыть аттачмент
-прочитать в теле письма имя
-переименовать файл и сохранить

проблема только с самим Outlook.Нет опыта совсем

Спасибо

[pshik]

решил проблему
код внизу

Set olApp = CreateObject("Outlook.Application")
Set myFolder = olApp.GetNamespace("MAPI").GetDefaultFolder(6)
Set myFileFolder = myFolder.folders(sFolder)

Set myItem = myFileFolder.items

For i = 1 To myItem.Count

Set myItem = myFileFolder.items(i)

Application.StatusBar = "Reading Outlook folder " & sFolder & " information..."

Set myAttachments = myItem.Attachments

sBody = myItem.body
str = "AP Invoice:"

iSer = InStr(sBody, str)
iSer = iSer + 12
sTitle = Mid(sBody, iSer, 23)
sTitle = Trim(sTitle)

Application.StatusBar = "Found file information " & sTitle & "...."

For x = 1 To myAttachments.Count
sAttName = myAttachments.Item(x).displayname
If LCase(Left(sAttName, 3)) = "exp" Then
sAttName = "Expenses-"
Else
sAttName = "Labour-"
End If

myAttachments.Item(x).SaveAsFile strPath & "\" & sAttName & "" & sTitle & ".xls "


Next

Next

[Estro]

Всем привет! Мучает вопрос!
В MS Outlook у меня работает правило:
1. входящее сообщение в зависимости от отправителя и темы переносится в созданную в папке "ВХОДЯЩИЕ" дополнительную папку "ИМЯ ПАПКИ1" (и таких папок много)
2. запускается скрипт, который вытаскивает из последних пяти сообщений в папке "ИМЯ ПАПКИ1" вложения и копирует (эти вложения) на сервер в папку (C:\ДАННЫЕ\ВЛОЖЕНИЯ ОТ ОТПРАВИТЕЛЯ1\)

проблема вот в чем!

Когда приходит сообщение с соответствующей темой и соответствующим отправителем то правило срабатывает и сообщение переносится в дополнительную папку и скрипт работает НО! Срипт почему то не обрабатывает вложение, которое пришло с этим сообщением а которые были раньше обрабатывает!

Т.Е создается ощущуние что скрипт работает а сообщения еще в папке
"ИМЯ ПАПКИ1" нет . а после работы скрипта оно там появляется. Как тут разрулить не знаю......