Проверка существования файла

Источник: vbfaq

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

Вот 1 вариант:

Option Explicit

Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" _
    (ByVal pszPath As String) As Long

Private Sub Form_Load()
'1 - существует, 0 - нет
MsgBox PathFileExists("C:\autoexec.bat")
End
End Sub

Страница сайта http://185.71.96.61
Оригинал находится по адресу http://185.71.96.61/home.asp?artId=21178