Add(Button,5437802,77,119)
{
 Left=125
 Top=95
 link(onClick,11765865:doEvent1,[])
}
Add(Hub,11765865,133,119)
{
 link(onEvent1,10797090:doExecute,[])
 link(onEvent2,10760802:doShellExec,[(243,132)(243,139)])
}
Add(WinExec,10760802,273,126)
{
 Param="Print"
 Mode=8
 link(FileName,12567020:GetData,[])
}
Add(EventFromData,12567020,273,70)
{
}
Add(ODialog,10797090,189,119)
{
 link(onExecute,12567020:doData,[(244,125)(244,76)])
}

Add(MainForm,16526511,21,105)
{
 Left=20
 Top=105
}
Add(Button,5437802,63,182)
{
 Left=125
 Top=95
 link(onClick,11765865:doEvent1,[])
}
Add(Hub,11765865,119,182)
{
 link(onEvent1,10797090:doExecute,[])
 link(onEvent2,14246114:doWork,[(215,195)(215,202)])
}
Add(VBJScript,14246114,280,196)
{
 WorkPoints=#6:doWork|
 DataPoints=#5:HTMLF|
 Script=#27:Function doWork(Data,Index)|16:HTMLF= sys.HTMLF|56:Set objIE = CreateObject("InternetExplorer.Application")|20:objIE.Navigate HTMLF|16:While objIE.Busy|22:    'Wscript.Sleep 200|4:Wend|17:objIE.Visible = 0|41:'objIE.ExecWB 6, 1 'выдача диалога печати|37:objIE.ExecWB 6, 2 'немедленная печать|0:|12:End Function|
 link(HTMLF,12567020:GetData,[])
}
Add(EventFromData,12567020,280,133)
{
}
Add(ODialog,10797090,175,182)
{
 Filter="Файлы HTML|*.html"
 FileName=""
 link(onExecute,12567020:doData,[(230,188)(230,139)])
}