DUMPEL 을 이용한 이벤트로그 저장

dumpel.exe 툴은,, 이벤트로그를 추출하는 유틸입니다.

Windows2000 리소스킷에 포함되어 있으며,. dumpel.exe은 이벤트로그를 텍스트 파일로 저장하는 기능을 제공합니다.

다음은 이를 이용한 vbscript로,. 예약 작업관리자에 등록하면 정기적으로 백업이 가능합니다.

Option Explicit
Const strBackupPath = "C:\Temp\" '로그파일저장경로

On Error Resume Next
Dim wshShell
Set wshShell = WScript.CreateObject("WScript.Shell")

Dim intYear, intMonth, intDay
Dim dateToday

dateToday = now
intYear = Year(dateToday)
intMonth = Month(dateToday)
intDay = Day(dateToday)

Dim strToday
strToday = CStr(intYear)
If intMonth < 10 Then
 strToday = strToday + "0"
End If
strToday = strToday + CStr(intMonth)
If intDay < 10 Then
 strToday = strToday + "0"
End If
strToday = strToday + CStr(intDay) '오늘일자 파일명

Dim strArrayEvent
strArrayEvent = Array("system", "application", "security")
'이벤트로그파일 종류

Dim strBackupFile
Dim nI
For nI = LBound(strArrayEvent) To UBound(strArrayEvent)
 strBackupFile = Left(strArrayEvent(nI), 3) & "_" & strToday & ".txt"
 wshShell.Run "dumpel -f " & strBackupPath & strBackupFile & " -l " & _
    strArrayEvent(nI) & " -t", 0
Next

물론,. 위 예제 스크립트에서는 dumpel.exe 를 이용했으나,. WMI가 가능하시면 WMI 쿼리를 통해서도 가능합니다.

여기에,. CDO.SYS를 이용해서 메일로도 받아볼수 있는 루틴을 추가할수도 있겠죠..