Аналог FileSearch в VBA-Outlook

[МоКом]

Во встроенном VBA-редакторе excel-ля для поиска файлов можно использовать FileSearch.

Встроенный VBA-редактор Outlook-ка метод FileSearch не поддреживает. Предлагает мне воспользоваться AdvanceSearch, который осуществляет поиск только по письмам. А нафиг мне письма - мне файлы на диске искать нужно!

Не подскажите аналог FileSearch в VBA-Outlook?

[Димитрий]

Можно воспользоватся Dir или используй FSO

[МоКом]

лады - буду пробовать
а не подскажешь как узнать кол-во файлов в папке?

[Sedge]

Код: Выделить всё

Dim oFso As New FileSystemObject
Dim oFolder As Folder
Set oFolder = oFso.GetFolder("d:\temp")
MsgBox oFolder.Files.Count