Здравствуйте!
Как можно организовать сообщение об окончании выполнения скрипта без MsgBox и блокнота? Технология отправки в телеграмм есть, а как сформировать текст от окончании работы скрипта. Скрипт не цикличный, линейное выполнение от первого до последнего пункта, по окончании сформировать текст на подобие такого: "Выполнено, время, дата"
Как можно организовать сообщение об окончании выполнения скрипта без MsgBox и блокнота? Технология отправки в телеграмм есть, а как сформировать текст от окончании работы скрипта. Скрипт не цикличный, линейное выполнение от первого до последнего пункта, по окончании сформировать текст на подобие такого: "Выполнено, время, дата"
Код:
Func _Now_Times()
Return StringFormat('%02s:%02s:%02s %02s.%02s.%04s', @HOUR, @MIN, @SEC, @MDAY, @MON, @YEAR)
EndFunc
$sText = 'Выполнено в ' & _Now_Times()
Код:
Func Start()
ControlSend('Alpha Pro', '', '', "{F5}")
Sleep(1000)
ControlSend('Alpha Pro', '', '', "{F9}")
EndFunc
$iState = WinGetState('Alpha Pro', '')
if Not BitAND($iState, 16) Then
Start()
Else
WinSetState('Alpha Pro', '', @SW_RESTORE)
Start()
EndIf
$Den = @MDAY
$Mes = @MON
$Title = "360_STROKA_" & $Den & "_" & $Mes & ".SC"
$child = ControlGetHandle('Alpha Pro', '', "[TEXT:" & $Title & "]")
WinSetState($child, '', @SW_MAXIMIZE)
WinWait('Alpha Pro', '', "[TEXT:" & $Title & "]")
Sleep(1000)
WinClose(ControlGetHandle('Alpha Pro', '', "[TEXT:" & $Title & "]"))
Sleep(2000)
WinMenuSelectItem('Alpha Pro', '', 'Vide&o', '&Render')
Sleep(2000)
WinMenuSelectItem('Alpha Pro', '', '&File', '&Save')