作者:Jonathan Bennett 主頁(英文):
http://www.hiddensoft.com/AutoIt/?
說明: 陶清 (
taoqing@163.net )
本地下載:AutoItx是免費(fèi)組件! cool!
1.4版本??
http://www.pdriver.com/pb02/10/autoit14.zip (size: 62kb)
2.63版本?
http://www.pdriver.com/pb02/10/AutoIt263.exe (size: 612kb)
? VB 3.0就已經(jīng)提供了一個很特別很有用的函數(shù)Sendkeys,能模擬鍵盤的操作,能以極為簡單的方式實(shí)現(xiàn)許多演示或自動化工作。可惜PB中一直不能實(shí)現(xiàn)(即使用API實(shí)現(xiàn)在起來非常復(fù)雜,功能也不AutoITx內(nèi)核好并且調(diào)用方便)
? 本系統(tǒng)是老外寫的一個com組件,原理是根據(jù)從windows98開始windows自帶提供了Microsoft's scripting engines來包裝的調(diào)用。
? Microsoft's scripting engines類似于DOS時代的.bat處理文件,提供了許多方法(以com對象的方式)來方便用戶調(diào)用windows的許多功能。
? 如果你在電腦中搜索 *.vbs文件(一般都在windows目錄下)會找到一些例程,仔細(xì)閱讀這些例題你將會發(fā)現(xiàn)非常有用。包括了有控制excel,網(wǎng)絡(luò)共享名的聯(lián)接方式。
本AutoItX提供了許多強(qiáng)大的功能,如下,其中第1,2點(diǎn)是我認(rèn)為最有用的功能。
(cool!)1.支持sendkeys ,除ctrl+alt+del不允許外,其余的任何鍵你都可以模擬發(fā)送。包括組合鍵。還有特殊按鍵.
例如最常見的組合鍵, ctrl + a , 只需要使用sendkeys (
(cool!)2.重啟,開機(jī),注冊銷等操作(2.63版本支持windows98/me/nt/2000),如你使用nt 4.0,強(qiáng)烈推薦要升級到sp6
3.支持窗口控制函數(shù),最小化,隱藏,恢復(fù),等待某窗口出現(xiàn)(如某messagebox),將指定的窗口放到最前面
4.sleep命令(pb中有)
5.ini的讀寫(pb中有)
6.對windows的剪貼板的copy, paste操作
7.模擬mouse的移動,點(diǎn)擊,拖拽。
調(diào)用示范(test.hta代碼)
如果你下載的是1.4版本,先使用regsvr32 AutoItX.dll的方式注冊
<script language="VBScript">
Sub RunProgram
Dim oShell
Dim oAutoIt
Set oShell = CreateObject("WScript.Shell")
Set oAutoIt = CreateObject("AutoItX.Control")
oShell.Run "C:\Progra~1\swglxt\SWGLXT.exe", 1, FALSE
oAutoIt.WinWaitActive "登陸", ""
'oAutoIt.Send "myname"
'oAutoIt.Send "{TAB}"
'oAutoIt.Send "mypassword"
'oAutoIt.Send "{ENTER 2}"
End Sub
</script>
<input type="button" value="test" onclick="RunProgram">
下面的命令是在屏幕x=50, y=200的位置模擬點(diǎn)擊mouse左鍵
myoleobject.LeftClick( 50, 200)
下面的命令是模擬按下組合鍵ctrl + v
myoleobject.send("{CTRLDOWN}v{CTRLUP}")
關(guān)于具體的鍵盤代碼對應(yīng)表可見其幫助文件. 1.4版本的幫助文件名是 AutoItX.chm
? 注意截止到寫本文的時候最新版本是 2.63, 因?yàn)槲矣?.4版本測試后已經(jīng)完全滿足了sendkeys功能,如果你需要在xp或2000下調(diào)用AutoItX的關(guān)機(jī)等功能,則建議你下載2.63版本。
? 2.63已經(jīng)支持 windows 2000/xp,同時提供activex或dll方式的調(diào)用,還提供了書寫script并編譯成exe獨(dú)自執(zhí)行的功能(即你可以不用第三方的軟件,如pb,vb,delphi來寫)
? 2.63下載后可以直接安裝。
? 1.4版本的提供的.vbs例程我已經(jīng)修改了,可以用于簡體windows下面,而2.63版本因?yàn)槠溽槍τ⑽膚indows所寫的sample,所以有些地方你需要修改,例如其中一個例程
C:\Program Files\AutoIt\Examples\_Run_Me_First.aut
其中有一個等待寫字板出現(xiàn)的函數(shù)調(diào)用如下:
WinWait, Untitled - Notepad
你需要將它改為
WinWait, 無標(biāo)題 - 記事本
才能正常運(yùn)行。否則winwait會一直等到有一個窗口標(biāo)題為Untitled - Notepad的窗口出現(xiàn)才繼續(xù)執(zhí)行script