-
AutoIt
(
http://forum.oszone.net/forumdisplay.php?f=103)
Art Money Pro 7.33
Вложений: 4
- 1.png (15.10 KB, скачиваний: 27)
- 2.png (14.70 KB, скачиваний: 23)
- 3.png (46.60 KB, скачиваний: 23)
- 4.png (45.10 KB, скачиваний: 24)
Подскажите пожалуйста, как вызвать прогу из "%ProgramFiles%\ArtMoney\artmoney733.exe", затем вставить пароль в окно (скрин1), нажать OK (скрин2), согласиться с лицензией(скрин3),нажать OK (скрин4), и выйти из проги (убить процесс artmoney733.exe).Т.е автоматизировать процесс регистрации.Пишу т.к не силён в AutoIT.
Спасибо.Концовку сам доделал:
Код:
$sPassword = "XXXX"
...........
ControlClick($sAbout_Title, "", "TTeButton3")
Sleep(50)
If ProcessExists("artmoney733.exe") Then ProcessClose("artmoney733.exe")
|
Код:
$sPassword = "MyPass"
$sRegister_Title = "[CLASS:TForm18;TITLE:Регистрация]"
$sAbout_Title = "[CLASS:TForm10;TITLE:О программе]"
Run(@ProgramFilesDir & "\ArtMoney\artmoney733.exe")
WinWait($sRegister_Title, "", 5)
If Not BitAND(WinGetState($sRegister_Title), 2) Then Exit
ControlSetText($sRegister_Title, "", "TEdit1", $sPassword)
ControlClick($sRegister_Title, "", "TBitBtn2")
WinWait($sAbout_Title, "", 5)
If Not BitAND(WinGetState($sAbout_Title), 2) Then Exit
ControlCommand($sAbout_Title, "", "TTeCheckBox1", "Check")
ControlClick($sAbout_Title, "", "TTeButton3")
|
Время: 16:56.
© OSzone.net 2001-
