Example1
; AutoIt Version: 3.0
; Language: English
; Platform: Win9x/NT
; Author: Jonathan Bennett (jon@hiddensoft.com)
;
; Script Function:
; Plays with the calculator.
;
; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
$answer = MsgBox(4, "AutoIt Example (English Only)", "This script will run the calculator and type in 2 x 4 x 8 x 16 and then quit. Run?")
; Check the user's answer to the prompt (see the help file for MsgBox return values)
; If "No" was clicked (7) then exit the script
If $answer = 7 Then
MsgBox(0, "AutoIt", "OK. Bye!")
Exit
EndIf
; Run the calculator
Run("calc.exe")
; Wait for the calulator become active - it is titled "Calculator" on English systems
WinWaitActive("Calculator")
; Now that the calc window is active type 2 x 4 x 8 x 16
; Use AutoItSetOption to slow down the typing speed so we can see it :)
AutoItSetOption("SendKeyDelay", 400)
Send("2*4*8*16=")
Sleep(2000)
; Now quit by sending a "close" request to the calc
WinClose("Calculator")
; Now wait for calc to close before continuing
WinWaitClose("Calculator")
; Finished!
Example2
; AutoIt Version: 3.0
; Language: English
; Platform: Win9x/NT
; Author: Jonathan Bennett (jon at hiddensoft com)
;
; Script Function:
; Counts to 5 using a "do" loop
; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
$answer = MsgBox(4, "AutoIt Example", "This script will count to 5 using a 'Do' loop. Run?")
; Check the user's answer to the prompt (see the help file for MsgBox return values)
; If "No" was clicked (7) then exit the script
If $answer = 7 Then
MsgBox(0, "AutoIt Example", "OK. Bye!")
Exit
EndIf
; Set the counter
$count = 1
; Execute the loop "until" the counter is greater than 5
Do
; Print the count
MsgBox(0, "AutoIt Example", "Count is: " & $count)
; Increase the count by one
$count = $count + 1
Until $count > 5
; Finished!
MsgBox(0, "AutoIt Example", "Finished!")
được đăng bởi Toi La Ai @ 05:33
0 Nhận xét:
Đăng nhận xét
Đăng ký Đăng Nhận xét [Atom]
<< Trang chủ