Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: час Function CheckDir(MyPath As String) As Boolean 'Функция проверки на наличие файла по указанному пути CheckDir = False On Error Resume Next If Dir(MyPath) <> "" Then CheckDir = True End Function Может есть получшее?
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.