aa

http://d.hatena.ne.jp/replication/20130308/1362809696

http://ameblo.jp/syou007/entry-10022425617.html


http://jibun.atmarkit.co.jp/lcareer01/rensai/career33/data33.html

http://www.nsa.or.jp/make_jimu/committee/9/data/09001.pdf

EVENTLOG SAMPLE

echo off

CALL :GetDateTime

SET StartTEMPDATE=%TEMPDATE%
SET StartTEMPTIME=%TEMPTIME%

rem -↓↓↓---------------------------------------------------------------------------

pause

echo %StartTEMPDATE%

echo %StartTEMPTIME%


rem wevtutil qe Application /c:10 /rd:true /f:text
rem -↑↑↑---------------------------------------------------------------------------
rem IF NOT %RC% EQU 0 GOTO NG

IF NOT %ERRORLEVEL% EQU 0 GOTO NG

CALL :GetDateTime2 %StartTEMPDATE% %StartTEMPTIME%

SET event_Level=INFORMATION
SET event_ID=901
SET event_Description="%computername% HotBKUP %~n0 %1 Success %ERRORLEVEL% %StartTEMPDATE% %StartTEMPTIME% %TEMPSEC%s"

GOTO OK

:NG
CALL :GetDateTime2 %StartTEMPDATE% %StartTEMPTIME%

SET event_Level=ERROR
SET event_ID=902
SET event_Description="%computername% HotBKUP %~n0 %1 ERROR %ERRORLEVEL% %StartTEMPDATE% %StartTEMPTIME% %TEMPSEC%s "

:OK

echo %event_Level%_%event_ID%_%event_Description%

CALL :SetEVNTLOG %event_Level% %event_ID% %event_Description%

EXIT /B

rem *********************************************************************************
rem event log out
rem Input
rem Level
rem Description
rem *********************************************************************************

:SetEVNTLOG

SET event_Level=%1
SET event_ID=%2
SET event_Description=%3

SET event_Source="Acronis"
SET event_LogName=APPLICATION

EVENTCREATE /T %event_Level% /ID %event_ID% /D %event_Description% /SO %event_Source% /L %event_LogName%
IF %ERRORLEVEL% EQU 0 GOTO LOGEND

echo %ERRORLEVEL%
:LOGEND

EXIT /B

rem *********************************************************************************
rem Get start date time
rem Result
rem TEMPDATE
rem TEMPTIME
rem *********************************************************************************

:GetDateTime

rem FOR /F "tokens=1-3 delims=/" %%D IN ("%date%") DO set TEMPDATE=%%D%%E%%F
rem echo %TEMPDATE%

rem FOR /F "tokens=1-3 delims=:" %%D IN ("%time%") DO echo %%D%%E%%F
rem exit /b

SET TEMPDATE=%date:~-10,4%%date:~-5,2%%date:~-2,2%

SET TEMPTIME2=%time: =0%
SET TEMPTIME=%TEMPTIME2:~0,2%%time:~3,2%%time:~6,2%

EXIT /B

rem *********************************************************************************
rem Get end date time & GapTime
rem
rem Input
rem StartTEMPDATE
rem StartTEMPTIME
rem Result
rem TEMPDATE
rem TEMPTIME
rem TEMPSEC
rem *********************************************************************************

:GetDateTime2

SET StartTEMPDATE=%1
SET StartTEMPTIME=%2

SET TEMPDATE=%date:~-10,4%%date:~-5,2%%date:~-2,2%

SET TEMPTIME2=%time: =0%
SET TEMPTIME=%TEMPTIME2:~0,2%%time:~3,2%%time:~6,2%

rem ----------------------------------------------------
SET EndTEMPDATE=%TEMPDATE%
SET EndTEMPTIME=%TEMPTIME%

SET /a Gapdate=(%EndTEMPDATE%-%StartTEMPDATE%) * 3600 * 24


SET /a Esec=%EndTEMPTIME:~0,2% * 3600 + %EndTEMPTIME:~2,2% * 60 + %EndTEMPTIME:~4,2%

SET /a Ssec=%StartTEMPTIME:~0,2% * 3600 + %StartTEMPTIME:~2,2% * 60 + %StartTEMPTIME:~4,2%

SET /a TEMPSEC=%Gapdate% + (%Esec% - %Ssec%)

echo GetDateTime2=%TEMPSEC%

EXIT /B

rem *********************************************************************************