Автор Тема: [Автоматизация] Автоматическая установка TightVNC  (Прочитано 6814 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн saturnus [?]

  • Новичок
  • *
  • Сообщений: 1
  • Репутация: 0
  • Пол: Мужской
    • Награды
В определенный момент возникает затырка с функцией ControlSend, не хочет отправлять текст в форму
Код: AutoIt [Выделить]
VNCactiv()
;устанавливаем пароль
Sleep(5000)
ControlSend("","","[CLASS:Edit;INSTANCE:1]", $pass )
Sleep(5000)
ControlSetText( "","", "[CLASS:Edit;INSTANCE:2]", $pass )
ControlSetText("","", "[CLASS:Edit;INSTANCE:3]", $pass )
ControlSetText( "","","[CLASS:Edit;INSTANCE:4]", $pass )
VNCactiv()
Sleep(5000)
ControlClick("TightVNC 2.0.4 Setup", "", "[CLASS:Button;INSTANCE:2]")
VNCactiv()
ControlClick("TightVNC 2.0.4 Setup", "", "[CLASS:Button;INSTANCE:2]")
VNCactiv()
ControlClick("TightVNC 2.0.4 Setup", "", "[CLASS:Button;INSTANCE:2]")
Exit
Func VNCactiv ()
    Local $hVNC
    $hVNC=WinWaitActive("TightVNC 2.0.4 Setup")
If  $hVNC=0 Then ; завершает работу установщика если окно не найдено.
    Exit
EndIf
EndFunc


Русское сообщество AutoIt

[Автоматизация] Автоматическая установка TightVNC
« Отправлен: Декабрь 05, 2013, 14:53:00 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
10 Ответов
17190 Просмотров
Последний ответ Январь 31, 2012, 16:44:25
от snoitaleR
5 Ответов
6483 Просмотров
Последний ответ Март 26, 2010, 14:23:33
от Kaster
1 Ответов
5567 Просмотров
Последний ответ Июль 15, 2011, 11:17:40
от snoitaleR
7 Ответов
17982 Просмотров
Последний ответ Июль 15, 2011, 20:15:38
от BlackCoreLogic
0 Ответов
6342 Просмотров
Последний ответ Июль 15, 2011, 11:39:16
от snoitaleR
1 Ответов
7455 Просмотров
Последний ответ Декабрь 26, 2011, 10:51:05
от Duero
6 Ответов
8033 Просмотров
Последний ответ Октябрь 18, 2013, 16:46:20
от Vovsla
0 Ответов
4783 Просмотров
Последний ответ Сентябрь 03, 2013, 16:11:53
от alex33
13 Ответов
5148 Просмотров
Последний ответ Март 07, 2015, 18:33:47
от AZJIO
10 Ответов
7766 Просмотров
Последний ответ Январь 25, 2017, 17:31:42
от InnI