Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: palarm
' Удалить файл (путь к файлу) Function fDeleteFile(strPatchFile As String) As Boolean On Error GoTo Err_ Dim fs Set fs = CreateObject("Scripting.FileSystemObject") fs.DeleteFile strPatchFile Set fs = Nothing fDeleteFile = True Exit Function Err_: Err.Clear End Function
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.