Может кто-либо подсказать что либо дельное по работе с файлами. (поиск в каталогах, проверка существования и др. (чтение и запись - не надо))

Мучаюсь через Application.FileSearch - что-то он файлы то находит, то нет (хотя они 100% есть), да и не очень-то удобная штука.

Может кто скинет ссылочку на уже готовые заготовки "удобных" функций ну или еще-чтолибо в этом роде. (Диалоговые Окошки открытия файлов не нужны - у самого дофига)

Владимир СанычЯ человек старомодный, все делаю через функцию Dir, мне хватает...

MyPath = "c:\" ' Set the path.
MyName = Dir(MyPath, vbDirectory) ' Retrieve the first entry.
Do While MyName <> "" ' Start the loop.
' Ignore the current directory and the encompassing directory.
If MyName <> "." And MyName <> ".." Then
' Use bitwise comparison to make sure MyName is a directory.
If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
Debug.Print MyName ' Display entry only if it
End If ' it represents a directory.
End If
MyName = Dir ' Get next entry.
Loop

ИЗВРАТ!!!!!

Хочу что б как в Application.FileSearch , но только работало!!

Не может быть, что бы ни кто не нарисовал приличную библиотечку.