------------ Дoбавленo в 22.28:
В общем вот что наваял
Может у кого то лучше получится, с VBS например
Add(MainForm,14611475,112,119)
{
Width=306
Height=124
Caption="Мой журнал"
Position=1
Point(onClose)
}
Add(Button,10951088,105,203)
{
Left=10
Top=10
Width=280
Height=70
Caption="Создать событие в журнале приложений"
link(onClick,15840231:doEvent1,[])
}
Add(WinExec,2443716,252,189)
{
FileName="cmd"
Point(doConsoleExec)
Point(doConsoleInput)
}
Add(FormatStr,16118066,198,210)
{
Mask="%1%2"
link(onFString,2443716:doConsoleInput,[])
link(Str1,7152637:Value,[])
link(Str2,13111499:Value,[])
}
Add(Memory,7152637,198,112)
{
Default=String(eventcreate /t error /id 666 /so MyProg /l application /d "Test message")
}
Add(Memory,13111499,205,147)
{
Default=String(
exit
)
}
Add(Hub,15840231,154,203)
{
link(onEvent1,2443716:doConsoleExec,[])
link(onEvent2,16118066:doString,[])
}