Closes a read handle to the event log
#include <EventLog.au3>
_EventLog__Close ( $hEventLog )
$hEventLog | Handle to the event log |
Success: | True |
Failure: | False |
_EventLog__Notify, _EventLog__Open, _EventLog__OpenBackup, _EventLog__Read, _EventLog__Report
#include <EventLog.au3>
#include <FontConstants.au3>
#include <GUIConstantsEx.au3>
Global $g_idMemo
Example()
Func Example()
Local $hEventLog
; Create GUI
GUICreate("EventLog", 600, 300)
$g_idMemo = GUICtrlCreateEdit("", 2, 2, 596, 294, 0)
GUICtrlSetFont($g_idMemo, 9, $FW_NORMAL, $GUI_FONTNORMAL, "Courier New")
GUISetState(@SW_SHOW)
$hEventLog = _EventLog__Open("", "Application")
MemoWrite("Log full ........: " & _EventLog__Full($hEventLog))
MemoWrite("Log record count : " & _EventLog__Count($hEventLog))
MemoWrite("Log oldest record: " & _EventLog__Oldest($hEventLog))
_EventLog__Close($hEventLog)
; Loop until the user exits.
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>Example
; Write a line to the memo control
Func MemoWrite($sMessage)
GUICtrlSetData($g_idMemo, $sMessage & @CRLF, 1)
EndFunc ;==>MemoWrite