VBCoding Библиотека кодов Visual Basic 6 Файловая система Проверить - существует ли файл?

Visual Basic 6
Проверить - существует ли файл?
Public Function FileExists(ByVal FilePath$) As Boolean
On Error Resume Next
If Dir(FilePath, vbArchive Or vbHidden Or vbNormal Or vbReadOnly Or vbSystem) <> "" Then FileExists = True
End Function
 

Добавить комментарий


Защитный код
Обновить

 
VBCoding Библиотека кодов Visual Basic 6 Файловая система Проверить - существует ли файл?  
Powered by Exponenta -