2
Сентябрь
2008
Проверка существования файла
Перед работой с файлами иногда стоит для начала проверить, а есть ли он – этот файл, методов много, да и способов применения тоже много, все зависит от ситуации и исходной задачи.
Вот 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