Что нового

[Автоматизация] Как перезапустить скрипт запущеный кнопкой из под GUI

general66

Пришел увидел наследил
Сообщения
211
Репутация
3
Нужен совет как реализовать рестарт скрипта, есть нечто наподобие этого скрипта это сокращенный вариант, для лучшего понимания итак
Код:
#include <IE.au3>
#Include <Restart.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
HotKeySet('{ESC}', '_Exit')
$oIE = _IECreateEmbedded()
$Form1 = GUICreate("Form1", 400, 500, 236, 0)
$GUIActiveX = GUICtrlCreateObj($oIE, -1, -1, 250, 600)
$Input1 = GUICtrlCreateInput("логин", 252, 39, 145, 21)
$Input2 = GUICtrlCreateInput("пароль", 252, 69, 145, 21)
$Button1 = GUICtrlCreateButton("пуск", 280, 101, 75, 25)
$Checkbox1 = GUICtrlCreateCheckbox("Авто вход при рестарте", 252, 136, 145, 17)
$Combo1 = GUICtrlCreateCombo("", 252, 8, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData($Combo1, '<пароль\логин>|первый|второй','<пароль\логин>')
GUISetState(@SW_SHOW)



While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Combo1
			Switch GUICtrlRead($Combo1)
				Case 'первый'
					GUICtrlSetData($Input1, 'логин1')
					GUICtrlSetData($Input2, 'пароль1')
				Case 'второй'
					GUICtrlSetData($Input1, 'логин2')
					GUICtrlSetData($Input2, 'пароль2')
			EndSwitch
		Case $Button1
			_IENavigate($oIE, 'http://autoit-script.ru/autoit3_docs/libfunctions/_ienavigate.htm')
			_IELoadWait($oIE)
			_Login()
			Sleep(5000)
			_ScriptRestart()
	EndSwitch
WEnd
Func _Login()
Sleep(100)
; тут функция парольного входа на сайт Оо
EndFunc

Func _Exit() ; Выход по горячей клавише
    $oIE = 0
    Exit
EndFunc

Нужна подсказка как сделать так чтоб при отмеченном $Checkbox1 скрипт после перезагрузки логинился с предыдущими логином и паролем т.е. при первом запуске выбираем в комбобоксе нужный пароль или вводим в ручную , затем отмечаем чекбокс нажимаем кнопку и скрипт под текущими паролем и логином циклично входит на сайт :stars:
 
Верх