AutoIt介绍

朴灿烈づ我的快乐病毒、 2022-05-30 05:18 216阅读 0赞

AutoIt的下载网址： [https://www.autoitscript.com/site/autoit/downloads/][https_www.autoitscript.com_site_autoit_downloads]  
AutoIt在线文档：[http://www.autoit3.cn/Doc/][http_www.autoit3.cn_Doc]

AutoIt的优势：

*  简单易懂的类BASIC 表达式
 *  模拟键盘,鼠标动作事件
 *  操作窗口与进程
 *  直接与窗口的”标准控件”交互(设置/获取文字,移动,关闭,等等)
 *  脚本可以编译为标准可执行文件
 *  创建用户图形界面接口(GUI)
 *  COM 支持
 *  正则表达式
 *  直接调用外部DLL 和Windows API 函数
 *  程序运行为功能(让程序运行于其它账户)
 *  详细易懂的帮助文件于基于社区的支持论坛
 *  完全兼容于Windows 2000 / XP / 2003 / Vista / 2008
 *  Unicode 与64位运算支持
 *  高精度,易使用的数学运算
 *  可以运行于Windows Vista Account Control (UAC)

运行AutoIt程序：

1.先打开SciTE Script Editor, 在Editor中输入以下程序：

Msgbox(0,"Autoit窗口","欢迎来到Autoit的世界")

2.编译：Tools –> Complie, 会生成.exe文件  
3.双击.exe文件，就能看到运行结果

![70][]

## Autoit程序例子 ##

例1： 消息框显示

Msgbox(0,"Autoit窗口","欢迎来到Autoit的世界")

![70][]  
  
例2：带交互的消息框显示

Dim $name
    $name=InputBox("您好","请输入姓名：")
    Msgbox(0,"欢迎",$name&",欢迎来到Autoit的世界")

![70 1][] ![70 2][]  
  
例3： 变量的使用

在AU3中变量使用关键字Dim, Local 和Global 来声明并创建变量。一般变量是以美元符号$  
开头的。

Dim $a, $b
    $a=InputBox("运算","输入a：")
    $b=InputBox("运算","输入b：")
    Msgbox(0,"结果",$a&'*'&$b&'='&($a*$b))

![70 3][] ![70 4][] ![70 5][]  
  
例4 条件判断语句

Dim $age
    $age=inputbox("您好","请输入年龄")
    if $age < 18 then
    msgbox(0,"结果","未成年人")
    else
    msgbox(0,"结果","年龄"& $age &",成年人")
    endif

![70 6][] ![70 7][]  
  
例5 循环结构 While…WEnd

Dim $sum, $i, $end
    $sum = 0
    $end = inputbox("输入","输入结尾数字")
    $i = 1
    While $i <= $end
        $sum = $sum + $i
        $i = $i +1
    WEnd
    MsgBox(0,"输出","1到"& $end &"的和是："& $sum)

![70 8][] ![70 9][]  
  
例6 循环结构 For…Next

Dim $sum, $i, $end
    $sum = 0
    $end = inputbox("输入","输入结尾数字")
    For $i = 1 To $end
        $sum = $sum + $i
    Next
    MsgBox(0,"输出","1到"& $end &"的和是："& $sum)

![70 8][] ![70 9][]

例7 九九乘法表

@CRLF 换行  
@TAB 制表符  
ACSII值：Chr(9)=@TAB

Dim $i, $j
    Dim $s
    For $i=1 To 9
        For $j=1 To $i
            $s = $s&$i&"*"&$j&"="&($i*$j)&@TAB
        Next
        $s = $s & @CRLF
    Next
    MsgBox(0,"九九乘法表",$s)

![70 10][]  
  
例8 数组的使用

Const $N=50
    Dim $a[$N], $i, $s=""
    For $i=0 To $N-1
        $a[$i] = $i
    Next
    For $i=0 To $N-1
        $s = $s&$a[$i]&" "
    Next
    MsgBox(0,"数组的使用", $s)

![70 11][]  
  
例9 数组的显示及随机数

#include<Array.au3>
    Const $N=11
    Dim $i, $RandomArray[$N]
    For $i=0 To $N-1
        $RandomArray[$i] = Random(1,100,1)
    Next
    _ArrayDisplay($RandomArray,"随机数组")

![70 12][]

例10 函数的使用

Func <函数名>([参数1][,参数2]...[,参数n])
     [函数体]
     [Return 数据]
    EndFunc

样例代码：

Func Max($x, $y)
        Local $max
        If $x >= $y Then
            $max = $x
        Else
            $max = $y
        EndIf
        Return $max
    EndFunc
    
    Local $a, $b, $c
    $a = 10
    $b = 20
    $c = Max($a, $b)
    MsgBox(0,"函数", $a&"和"&$b&"的最大值为："&$c)

![70 13][]

Autoit中的函数参考网址： [http://kone-wu.iteye.com/blog/1910019][http_kone-wu.iteye.com_blog_1910019]

例11 自动化控制1：新建txt文件, 往记事本里输文字并不保存

#include <Constants.au3>
    
    ; Script Function:
    ;   Opens Notepad, types in some text and then quits the application.
    ;
    
    ; Prompt the user to run the script - use a Yes/No prompt with the flag parameter set at 4 (see the help file for more details)
    Local $iAnswer = MsgBox(BitOR($MB_YESNO, $MB_SYSTEMMODAL), "AutoIt Example", "This script will run Notepad, type in some text and then quit. Do you want to run it?")
    
    ; 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 $iAnswer = 7 Then
        MsgBox($MB_SYSTEMMODAL, "AutoIt", "OK. Bye!")
        Exit
    EndIf
    
    ; Run Notepad
    Run("notepad.exe")
    
    ; Wait for the Notepad to become active. The classname "Notepad" is monitored instead of the window title
    WinWaitActive("[CLASS:Notepad]")
    
    ; Now that the Notepad window is active type some text
    Send("Hello from Notepad.{ENTER}1 2 3 4 5 6 7 8 9 10{ENTER}")
    Sleep(500)
    Send("+{UP 2}")
    Sleep(500)
    
    ; Now quit by pressing Alt-F and then scrolling down (simulating the down arrow being pressed six times) to the Exit menu
    Send("!f")
    Sleep(1000)
    Send("{DOWN 6}{ENTER}")
    
    ; Now a screen will pop up and ask to save the changes, the classname of the window is called
    ; "#32770" and simulating the "TAB" key to move to the second button in which the "ENTER" is simulated to not "save the file"
    WinWaitActive("[CLASS:#32770]")
    Sleep(500)
    Send("{TAB}{ENTER}")
    
    ; Now wait for Notepad to close before continuing
    WinWaitClose("[CLASS:Notepad]")
    
    ; Finished!

Send 函数参考网址：[http://blog.csdn.net/u012248603/article/details/52706093][http_blog.csdn.net_u012248603_article_details_52706093]

例12 自动化控制2： 自己新建txt文件，然后往记事本里面写入文字并保存

自己新建txt文件放在桌面， 利用AutoIt Window Info工具查到其位置(x,y)

![70 14][]

; using AutoIt Window Info to find the location of new created txt file
    MouseClick('left', 409, 234, 2)
    
    ; sleep for 2 seconds, then type some words into txt file
    sleep(2000)
    Send("Hello{Enter}{Space}from{Enter}{Space}Autoit{Enter}{!}{Enter}")
    
    ; Now quit by pressing Alt-F and then scrolling down (simulating the down arrow being pressed six times) to the Exit menu
    Send("!f")
    Sleep(1000)
    Send("{DOWN 6}{ENTER}")
    
    ; Now a screen will pop up and ask to save the changes, the classname of the window is called
    ; "#32770" and simulating the "TAB" key to move to the second button in which the "ENTER" is simulated to not "save the file"
    WinWaitActive("[CLASS:#32770]")
    Sleep(500)
    Send("{ENTER}")
    
    ; Now wait for Notepad to close before continuing
    WinWaitClose("[CLASS:Notepad]")

编译上述文件，生成first\_au3.exe, 并将exe文件E盘中。这样就能通过CMD来运行exe文件了，该命令为： E://first\_au3.exe.

--------------------

本地分享到此结束，欢迎大家交流~

[https_www.autoitscript.com_site_autoit_downloads]: https://www.autoitscript.com/site/autoit/downloads/
[http_www.autoit3.cn_Doc]: http://www.autoit3.cn/Doc/
[70]: /images/20220530/5b71d8a99bb045daa0af5390429f8723.png
[70 1]: https://img-blog.csdn.net/20180305204448332?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQvamNsaWFuOTE=/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70
[70 2]: /images/20220530/5a8ddfdf22b54d87b5397cd29c2d2910.png
[70 3]: https://img-blog.csdn.net/20180305204721358?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQvamNsaWFuOTE=/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70
[70 4]: https://img-blog.csdn.net/20180305204728670?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQvamNsaWFuOTE=/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70
[70 5]: /images/20220530/677a9206b05947349cef4de48aa118fd.png
[70 6]: https://img-blog.csdn.net/20180305204926441?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQvamNsaWFuOTE=/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70
[70 7]: /images/20220530/1151219d0992410a9887423054359d5b.png
[70 8]: https://img-blog.csdn.net/20180305205337364?watermark/2/text/aHR0cDovL2Jsb2cuY3Nkbi5uZXQvamNsaWFuOTE=/font/5a6L5L2T/fontsize/400/fill/I0JBQkFCMA==/dissolve/70
[70 9]: /images/20220530/2f8da112ad0b4ec4851e4d4f85135d1c.png
[70 10]: /images/20220530/aa11ba8373954208ad47187ae9a2cba8.png
[70 11]: /images/20220530/8a7048f9db77421d997d247aca8ee413.png
[70 12]: /images/20220530/b4ed8c35cb6945108dc2538f3a297d81.png
[70 13]: /images/20220530/53beab23cd0c4e269c6cf8cc9f9a1000.png
[http_kone-wu.iteye.com_blog_1910019]: http://kone-wu.iteye.com/blog/1910019
[http_blog.csdn.net_u012248603_article_details_52706093]: http://blog.csdn.net/u012248603/article/details/52706093
[70 14]: /images/20220530/2dea31c499804951a134514aec1b3254.png