Здравствуйте!
Как в этом скрипте добавить функцию циклического скринашота окна определённой программы!
То есть, надо чтобы после выполнения каждого цикла программы, делался скрин окна программы
и так по кругу!
Как в этом скрипте добавить функцию циклического скринашота окна определённой программы!
То есть, надо чтобы после выполнения каждого цикла программы, делался скрин окна программы
и так по кругу!
Код:
#include <File.au3>
#include <Array.au3>
HotKeySet("{ESC}", "Terminate")
Func Terminate()
Exit 0
EndFunc ;==>Terminate
Dim $aLogins, $aPasswords ;объявляем массивы
;читаем файл в массив
_FileReadToArray('E:\Auto Login\login.txt', $aLogins)
_FileReadToArray('E:\Auto Login\pass.txt', $aPasswords)
For $i = 1 To 125000 Step 1
WinWait("", "")
If Not WinActive("", "") Then WinActivate("", "")
WinWaitActive("", "")
Sleep(100)
MouseClick("left", 598, 399, 1, 50)
Sleep(100)
MouseClick("left", 598, 399, 2, 50)
MouseClick("left")
Sleep(500)
MouseClick("left")
Send("{BS 20}")
Sleep(500)
Opt("SendKeyDelay", 100)
Send($aLogins[$i]);Пользователь 1
MouseClick("left", 598, 421, 2, 50)
Sleep(600)
Opt("SendKeyDelay", 100)
Send($aPasswords[$i]);Пароль 1
Sleep(1000)
Send("{ENTER}")
Sleep(3000)
Send("{ENTER}"); подтверждение соглашения
Sleep(2000)
Next
