Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Новый участник


Сообщения: 11
Благодарности: 1

Профиль | Отправить PM | Цитировать


Iska, наверно его нет)

Код: Выделить весь код
dim log, text
log = C:\hikka\log.txt

Text = "START " & Date &  " "  & time  
set FSO = CreateObject("Scripting.FileSystemObject")
set OFile = FSO.OpenTextFile(" log ", 8, True)
 OFile.Write(Text & vbCrLf)
OFile.Close

Отправлено: 16:18, 11-12-2015 | #5