AutoIt Q&A 對於教學文有問題的直接在這發問

rictirse

對於教學的部分有問題請全部發文在這帖內

rictirse

gary8349 發表於 2013-1-30 10:21
請問這幾個的使用時機是?

（1 Click；2 Check；3 UnCheck；4 SetText ）

Click = 左鍵按下
check = 勾選
UnCheck = 不勾選
SetText = 修改或輸入訊息

rictirse

liuchinlang 發表於 2013-2-6 10:04
請教：類似此無控件ID指令！要做成自動安裝，要如何處理！
除了用發送Send()鍵外，還有什麼方法可外解決！
...

VM應該可以用呀，給我載點我試看看。

rictirse

liuchinlang 發表於 2013-2-6 22:50
因為最近在學au3，問題較多！抱歉
請教這要如何解決！
C:\Users\Administrator\Desktop\123.au3(14,31) :  ...

我剛剛看過VM9 改的介面的確是抓不到子控了
所以只能使用send 去操作，但是準確度可能就略顯不足
相對的VM可以使用 comments去做操作

1. VMware-workstation-full-9.0.0-812388.exe Usage:
   
2. 
   
3. Modes:
   
4.   /e or /extract <Folder to extract to> : Extract package contents to the specified folder.
   
5.   /l or /list : List the contents of the package.
   
6.   /p or /pack : Generate a package.
   
7.   /? or /help : Print this help window.
   
8. 
   
9. Options:
   
10.   /c or /cfgfile <Path to configuration file> : Specify a configuration file to use.
    
11.   /T or /Temp <Path to temporary directory> : Specify a directory to use as a temporary extraction location.
    
12.   /S or /SearchPaths <Path(s) to search for files> : Specify a set of paths to search, in addition to the package, for files.
    
13.   /P or /Package <Path to package file> : Specify a package file to use.
    
14.   /s or /silent : Perform a silent install or uninstall.
    
15.   /nsr or /noSilentReboot : Suppress an automatic reboot after a successful silent install (does not affect installs with UI).
    
16.   /f2 or /log <Path to log file> : Specify the location of the log file.
    
17.   /d or /debug : Output debugging information to the log file.
    
18.   /V or /verbose : Enable verbose logging.
    
19.   /L or /lang <English language name> : Specifies a language to run the installer.
    
20.   /L or /lang <Localized language name> : Specifies a language to run the installer.
    
21.   /L or /lang <Three letter language abbreviation> : Specifies a language to run the installer.
    
22.   /L or /lang <Language id> : Specifies a language to run the installer.
    
23.   /z or /var <"Key"="value" pairs> : Specify a set of variables to override.
    
24.   /x or /uninst : Uninstalls the product.
    
25.   /v or /msi_args <"Key"="value" pairs> : Specify a set of arguments to pass to the MSI.
    
26.   /clean : Clean out installation registration information.
    

複製代碼

rictirse

風飄雪 發表於 2013-2-8 12:09
你好，我根據教學文步驟，但是依然卡住~"~
無論是用send或是ControlClick都沒有反應

軟體載點可以提供嗎，幫你測試看看

rictirse

測試OK沒問題

順便幫你壓成EXE了
http://www.fileswap.com/dl/z8HLVsSCXf/

[code=autoit]#cs ----------------------------------------------------------------------------

AutoIt Version: 3.3.8.1
Author:        Dang Wang

Script Function: Snort 2.9.4
        Template AutoIt script.

#ce ----------------------------------------------------------------------------
#Region
#AutoIt3Wrapper_icon=C:\NewDang.ico
#AutoIt3Wrapper_Compression=5
#AutoIt3Wrapper_Res_Comment=Snort
#AutoIt3Wrapper_Res_Description=Snort
#AutoIt3Wrapper_Res_Fileversion=2.9.4
#AutoIt3Wrapper_Res_LegalCopyright=噹噹
#EndRegion

#NoTrayIcon
#RequireAdmin
#include <Misc.au3>
AutoItSetOption ( "WinTitleMatchMode", 4)

Dim Const $FileName=  "Snort_2_9_4_Installer.exe"
Dim Const $FormName1 = "Snort 2.9.4 Setup "
Dim Const $FormName2 = "Snort 2.9.4 Setup"

_Singleton ($FormName2)

;－－－－－－－ （1 Click；2 Check；3 UnCheck；4 SetText ）－－－－－－－
Dim $Text[5][5] = [ [ $FormName1, "Please review the license terms before installing Snort 2.9.4.", "Button2", 1, ""], _
              [ $FormName1, "Choose which features of Snort 2.9.4 you want to install.", "Button2", 1, ""], _
              [ $FormName1, "Choose the folder in which to install Snort 2.9.4.", "Button2", 1, ""], _
              [ $FormName1, "Show &details", "Button2", 1, ""], _
              [ $FormName2, "Snort has successfully been installed.", "Button1", 1, ""] ]

$begin = TimerInit()

FileInstall  ( "Snort_2_9_4_Installer.exe", @TempDir&"\"&$FileName)
ShellExecute (@TempDir&"\"&$FileName)
While 1
  For $i = 0 To UBound ( $Text, 1)-1
    Select
      Case WinExists ( $Text[$i][0], $Text[$i][1])
        If $Text[$i][3] = 1 Then
          ControlClick ( $Text[$i][0], $Text[$i][1], $Text[$i][2])
        ElseIf $Text[$i][3] = 2 Then
          ControlCommand ( $Text[$i][0], $Text[$i][1], $Text[$i][2], "Check", "")
        ElseIf $Text[$i][3] = 3 Then
          ControlCommand ( $Text[$i][0], $Text[$i][1], $Text[$i][2], "UnCheck", "")
        ElseIf $Text[$i][3] = 4 Then
          ControlSetText ( $Text[$i][0], $Text[$i][1], $Text[$i][2], $Text[$i][4])
        EndIf
        If $i = (UBound ( $Text, 1)-1) Then ExitLoop(2)
    EndSelect
  Next
WEnd

$dif = TimerDiff  ($begin)
MsgBox ( 0, "安裝完成", StringFormat ( "總安裝時間：%s秒", $dif/1000))[/code]

rictirse

bunnie 發表於 2013-2-10 11:23
想請問一下各位高手，請問網頁上要怎麼Handle 到 Restricted Access 的 Form，

希望能幫我解答一下，或是 ...

要看到網站才有辦法幫你想辦法=.=

不知道 他那是什麼類型的視窗

圖片已經幫你編輯上去了