Created
July 20, 2016 15:46
-
-
Save JRGGRoberto/e6e91dc350bffd3788ba282de7166439 to your computer and use it in GitHub Desktop.
Preenchimento semi automatico, com confirmação
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <MsgBoxConstants.au3> | |
AutoMac() | |
Func AutoMac() | |
MsgBox($MB_SYSTEMMODAL, "Automação", "Selecione o edit onde receberá o preenchimento automático", 10) | |
For $aeee = 74 to 90 | |
$confirm = MsgBox(4, "Confirmation", "Yes or No?") | |
If $confirm = 6 Then ; Checks for 'Yes' | |
Call(unexpected, $aeee) | |
EndIf | |
If $confirm = 7 Then ; Checks for 'No' | |
Exit ; Closes script | |
EndIf | |
Next | |
EndFunc | |
Func unexpected($var) | |
$texto1 = "51000" | |
Send($texto1 & $var) | |
Sleep(151) | |
Send ("{TAB}") | |
Sleep(351) | |
Send ("{SPACE}") | |
Sleep(5701) | |
For $var2 = 1 to 55 | |
Send ("{TAB}") | |
Sleep(11) | |
Next | |
Send ("Skill_SFR_2" & $var) | |
Sleep(51) | |
Send ("{TAB}") | |
For $i = 1 to 3 | |
Send ("{DOWN}") | |
Sleep(51) | |
Next | |
Send ("{TAB}") | |
Sleep(151) | |
Send ("{DOWN}") | |
Sleep(151) | |
Send ("{TAB}") | |
EndFunc |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
Melhorar usando
https://www.autoitscript.com/autoit3/docs/appendix/SendKeys.htm