UNIX,Linux,Retele,Programare
Homespacer Tutorialespacer Forumspacer Utilizatorispacer Cautarespacer Webmailspacer Director web


Instalare automata AutoIt

Scris de Neagu Ionut (aka SmLex)

Acesta este primul tutorial in AutoIt asa ca o sa incepem cu lucruri simple cum ar fi instalarea automata a AutoIt-ului. In aceasta versiune a tutorialului vom folosi comanda “Send”, in tutorialul urmator vom folosi “ControlClick”.

Comanda “Send” simuleaza apasarea unei/unor taste in fereastra activa. Poate sa simuleze orice combinatie de taste chiar si taste speciale precum : ALT (!), SHIFT (+), tasta Win (#), CTRL (^) in afara de : “CTRL-ALT-DEL”.

In acest tutorial am folosit ca setup, setup-ul de AutoIt versiunea 3.2.2.0

setup_autoit = FileOpenDialog(“Alege setup-ul”, “”, “Setup (*.exe)”)

Atribuim variabilei $setup_autoit calea catre Setup daca a fost apasat butonul “Cancel” programul iese daca a fost alest Setup-ul executa codul de mai jos, si primul lucru pe care il face esre sa ruleze setup-ul

If Not @error Then
Run($setup_autoit)

Dupa ce a rulat Setup-ul asteapta sa apara fereastra cu tilul “AutoIt v3.2.2.0 Setup” si sa contina textul “This wizard will guide….” ca sa poate trimite in fereastra combinatia de taste ALT + n (”!n”) care corespunde butonului “Next” iar acest lucru se va repeta pentru fiecare etapa de instalare.

Prima etapa

WinWaitActive(“AutoIt v3.2.2.0 Setup”,“This wizard will guide you through the installation of AutoIt v3.2.2.0.”)
Send(“!n”)
WinWaitActive(“AutoIt v3.2.2.0 Setup”,“License Agreement”)
Send(“!a”)
Sleep(100)

Urmatoare bucata de cod citeste textul din fereastra (WinGetText) si verifica daca in acel text exista un alt text (StringInStr). Aceasta verifica daca exista deja instalat AutoIt-ul (si probabil o sa existe), deoarece daca exista aparetape in plus.

$text = WinGetText(“AutoIt v3.2.2.0 Setup”)
If StringInStr($text, “Previous Installation Found”) <> 0 Then
Send(“!n”)
WinWaitActive(“AutoIt v3.2.2.0 Setup”,“What do you want to do when you double-click a *.au3 file?”)
Send(“!n”)

Daca nu exista instalat (hmmm sunt curios cum rulezi fisierul AU3)

Else
Send(“!n”)
EndIf
WinWaitActive(“AutoIt v3.2.2.0 Setup”,“Choose the folder in which to install AutoIt v3.2.2.0.”)
Send(“!i”)

Urmatoarea linie de cod este pentru atunci cand rulati direct fisierul .au3 si apare un mesaj de eroare la instalare care spune ca fisierul “AutoIt3.exe” nu poate fi scris. Daca rulati fisierul au3 compilat (exe) nu va aparea aceasta eroare asa ca la “WinWaitActive” am pus un parametru (ultimul) in plus care specifica timpul in secunde cat sa astepte fereastra sa apara, daca nu apare trece mai departe.

Mesaj de eroare

WinWaitActive(“AutoIt v3.2.2.0 Setup”,“Error opening file for writing:”,1)
Send(“!i”)

Iar in ultima etapa trimite comanda ALT+f, asociata butonului “Finish”

WinWaitActive(“AutoIt v3.2.2.0 Setup”, “AutoIt v3.2.2.0 has been installed on your computer.”)
Send(“!f”)
EndIf

Categoria: Programare

 
© 2008 SkullBox, all rights reserved