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

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Логирование выполнения скрипта

Ответить
Настройки темы
Логирование выполнения скрипта

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


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

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


Добрый вечер. Собственно сабж - какими средствами логировать выполнение скрипта?
В самой AutoIt'е я не нашел как это реализовать.

Отправлено: 21:02, 29-08-2013

 

Аватара для Creat0R

Must AutoIt


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

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


Код: Выделить весь код
#include <GUIConstantsEx.au3>
#include <Date.au3>

Global $sLog_File = @ScriptDir & '\Events.log'
Global $hLog = _Log_Open($sLog_File)

$hGUI = GUICreate('Log Demo', 300, 200)
_Log_Write($hLog, 'GUI created')

$iButton = GUICtrlCreateButton("Button", 20, 40, 60, 20)
_Log_Write($hLog, 'Button created')

GUISetState(@SW_SHOW, $hGUI)
_Log_Write($hLog, 'GUI shown')

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            _Log_Write($hLog, 'Exit the program')
            _Log_Close($hLog)
            Exit
        Case $iButton
            _Log_Write($hLog, 'Button (' & $iButton & ') clicked')
    EndSwitch
WEnd

Func _Log_Open($sFile, $iRewrite = 0, $iUTF8 = 0)
    If $iUTF8 Then
        $iUTF8 = 128
    EndIf

    If $iRewrite Then
        $iRewrite = 2
    Else
        $iRewrite = 1
    EndIf

    Local $hLog = FileOpen($sFile, $iRewrite + $iUTF8)

    If $hLog = -1 Then
        Return SetError(1, 0, 0)
    EndIf

    FileWrite($hLog, '-------------- Log started at ' & _NowCalc() & ' --------------' & @CRLF)

    Return $hLog
EndFunc

Func _Log_Close(ByRef $hLog)
    If Not $hLog Then
        Return SetError(1, 0, 0)
    EndIf

    FileWrite($hLog, '-------------- Log ended at ' & _NowCalc() & ' --------------' & @CRLF & @CRLF)

    FileClose($hLog)
    $hLog = 0
EndFunc

Func _Log_Write($hLog, $sData)
    If Not $hLog Then
        Return SetError(1, 0, 0)
    EndIf

    Return FileWrite($hLog, _NowCalc() & '>> ' & StringReplace(StringStripCR($sData), @LF, '\n') & @CRLF)
EndFunc

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community

Это сообщение посчитали полезным следующие участники:

Отправлено: 22:02, 29-08-2013 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


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


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

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


Спасибо. Еще бы понять что где Этот код можно в мой скрипт вставить, или Date.au3 и есть мой скрипт? Я еще плохо разбираюсь в AutoIt.

Отправлено: 23:02, 29-08-2013 | #3


Аватара для Creat0R

Must AutoIt


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

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


Цитата Alkantel:
Этот код можно в мой скрипт вставить »
Это пример.

Цитата Alkantel:
Date.au3 и есть мой скрипт? »
Это библиотека для функции времени и даты.

В свой скрипт нужно подключить библиотеку (в начало скрипта) и функции которые начинаются с Func (поместить в конец скрипта).
Далее вызывать функции как показано в примере.

Цитата Alkantel:
Я еще плохо разбираюсь в AutoIt »
Тогда читай справку.

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 13:36, 30-08-2013 | #4



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Логирование выполнения скрипта

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
CMD/BAT - [решено] пауза перед началом выполнения скрипта Genka Скриптовые языки администрирования Windows 5 25-01-2014 21:00
[решено] Как проследить дествия autoit при выполнения скрипта? HFShak AutoIt 1 28-11-2011 16:48
как произвесит расчет времени выполнения скрипта Vlad Drakula Вебмастеру 1 10-12-2003 00:05
подсчет времени выполнения скрипта на PHP Vlad Drakula Вебмастеру 2 13-10-2003 16:20
log выполнения Perl CGI-скрипта CBMen Вебмастеру 1 23-03-2003 14:18




 
Переход