Разное

DedAlex · Отправлено: **13:34, 16-06-2008** | #2

ShadowMas, посмотрите If...ElseIf...Else...EndIf

ShadowMas · Отправлено: **14:47, 16-06-2008** | #3

Да я смотрел, что то не получается?
Ну вот к примеру:

Run("notepad.exe")
WinWaitActive("Безымянный - Блокнот")
Send("Привет")
WinClose("Безымянный - Блокнот")
If WinWaitActive("Блокнот", "Текст в файле Безымянный был изменен")Then
Send( "{RIGHT}")
Send("{ENTER}")
Else
Run("Любое приложение.exe")
WinWaitActive("Безымянный - Блокнот")
Send("ПриветShadowMas")
WinClose("Любое приложение - 1")
WinWaitActive("Любое приложение", "Текст в файле 1 был изменен")
Send( "{RIGHT}")
Send("{ENTER}")
EndIf

Может надо с переменными помудрить, я имею ввиду назначить переменной окно появляющееся (WinWaitActive("Блокнот", "Текст в файле Безымянный был изменен"))?

Можно если не трудно пример какой то маленький чтобы я наглядно увидел?

DedAlex · Отправлено: **16:54, 16-06-2008** | #4

ShadowMas, попробуйте

Код:

Run("notepad.exe")
WinWaitActive("Безымянный - Блокнот")
Send("Привет")
WinClose("Безымянный - Блокнот")
WinWaitActive("Блокнот", "Текст в файле Безымянный был изменен")
If WinExists ("Блокнот", "Текст в файле Безымянный был изменен")==1 Then
Send( "{RIGHT}")
Send("{ENTER}")
Else
Run("Любое приложение.exe")
WinWaitActive("Безымянный - Блокнот")
Send("ПриветShadowMas")
WinClose("Любое приложение - 1")
WinWaitActive("Любое приложение", "Текст в файле 1 был изменен")
Send( "{RIGHT}")
Send("{ENTER}")
EndIf

ShadowMas · Отправлено: **19:14, 16-06-2008** | #5

Ну спасибо за помощь обязательно попробую что получается

$g_szVersion = "TEST"
If WinExists($g_szVersion) Then Exit ; Он уже запущен
AutoItWinSetTitle($g_szVersion)
Run("notepad.exe")
WinWaitActive("Безымянный - Блокнот")
Send("Привет")
WinClose("Безымянный - Блокнот")
WinWaitActive("Блокнот", "Текст в файле Безымянный был изменен")
If WinExists ("Блокнот", "Текст в файле Безымянный был изменен")==1 Then
Send( "{RIGHT}")
Send("{ENTER}")
Else
Run("BreakingSWF.exe") ; крек проигрователя SWF.max 1.5.800
WinWaitActive("Установка — SWF.max", "Вас приветствует Мастер установки SWF.max")
Send("{SPACE}")
WinWaitActive("Установка — SWF.max", "Выбор папки установки")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{SPACE}")
WinWaitActive("Папка существует", "уже существует. Всё равно установить в эту папку")
Send("{SPACE}")
WinWaitActive("Установка — SWF.max", "Всё готово к установке")
Send("{SPACE}")
WinWaitActive("Установка — SWF.max", "Завершение Мастера установки SWF.max")
Send("{SPACE}")
EndIf

Ещё раз сенкс!