Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: KrukVN использую это:
'Проверка наличия указанного файла Public Function FileExists(ByVal strFileFullPath As String) As Boolean Dim lSize As Long On Error GoTo Err_ lSize = -1 If GetAttr(strFileFullPath) And vbDirectory Then GoTo Err_ lSize = FileLen(strFileFullPath) FileExists = lSize > -1 Exit Function Err_: End Function
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.