Условие выхода при ошибке в работе скрипта

[ShadowMas]

Люди вот столкнулся с такой проблемкой не как не получаеться написать коректное условие закрытия при ошибке выполнения скрепта?
Дело в том,что все окна в используемой мной програмке имеют одинаковое название!

Я решил выйти из положения каким образом поставил выскакивающее окно типа
MsgBox(64, "Ошибка установки", "Закройте все открытые окна и попробуйте заново")

Ну чёт получаеться не совсем то, что я планировал дело в том что когда ищёзает указаное мною окно то начинает действовать
часть скрипта "ложь" ну вообщем сейчас всё покажу на примере:

BlockInput(1)
DirCreate("D:\Test")
FileDelete("D:\Test\*.tib")
RegWrite('HKCU\SOFTWARE\Acronis\TrueImageHome\DontShow', 'IncrementalTip', 'REG_SZ', '1')
Run(@ProgramFilesDir & "\Acronis\TrueImageHome\TrueImage.exe")
WinWaitActive("Acronis*True*Image*Home")
Sleep(8000)
Send("{LALT}")
Send("{ENTER}")
Send("{ENTER}")
WinWaitActive("Мастер резервного копирования")
Send("{ENTER}")
WinWaitActive("Мастер резервного копирования")
Send("{ENTER}")
WinWaitActive("Мастер резервного копирования")
Send("{ENTER}")
Sleep(2000)
Send("{BS 25}")
Send("D:\Test\Образ.tib")
Send("{ENTER}")
WinExists("Мастер резервного копирования")
Sleep(1000)
Send("{ENTER}")
WinExists("Мастер резервного копирования")
Sleep(1000)
Send("{ENTER}")
WinExists("Мастер резервного копирования")
Sleep(1000)
ControlClick("Мастер резервного копирования", "", "FXWindow6")
WinWaitActive("Мастер резервного копирования")
ControlClick("Мастер резервного копирования", "", "FXWindow6")
Send("{ENTER}")
MsgBox(64, "Информация", "Дождитесь пока программа завершит работу", 5)
If WinExists("Информация")==1 Then
WinClose("Acronis*True*Image*Home")
RegDelete("HKCU\SOFTWARE\Acronis\TrueImageHome\DontShow")
Exit
Else
BlockInput(0)
MsgBox(64, "Ошибка установки", "Закройте все открытые окна и попробуйте заново")
Exit
EndIf


Люди может подскажите, может кто уневерсальный код придумал типа как на повторный запуск скрипта:

$g_szVersion = "My Script 1.1"
If WinExists($g_szVersion) Then Exit ; Он уже запущен
AutoItWinSetTitle($g_szVersion)


Или подскажите к примеру как сделать ,что бы при ошибке скрипт не на паузу ставал а завершал работу по умолчанию...

[Creat0R]

Я несколько раз перечитал пост, но так и не понял проблемы. Какое условие должен проверять скрипт, и что он должен делать при выходе?

Или просто нужно не запускать скрипт повторно? Для этого есть функция _SingleTon().

как сделать ,что бы при ошибке скрипт не на паузу ставал а завершал работу по умолчанию »
А почему он должен на паузу вставать? Если речь про msgbox, то да, он блокирует выполнение скрипта, но никто не принуждает его использовать :)

[beve]

Я так понял, что ты с помощью скрипта планируеш запуск Acronis и создавать резервную копию... Почему бы тебе не использовать встроенный в Acronis планировщик (Действие -->Создать новое задание и т.д.)? Если сделать так, то можно запланировать любое, задание, а потом выбрать режим запуска, который тебе подходит, или по времени, или по событию, единократно, или каждый день и т. д., или же выбрать режим запуска Вручную, а потом, когда это задание появится в списке заданий, то можеш с помощью скрипта, автоматом запустить Acronis, выбрать пункт Управление заданиями, и запустить на выполнение твое задание. Думаю так будет проще, и ошибок не будет...

[ShadowMas]

Да нет вопрос в другом нужнео сделать условие выхода если вдруг скрипт по какимто причинам не сработал или появилось неожиданое окно!

[Creat0R]

нужнео сделать условие выхода если вдруг скрипт по какимто причинам не сработал или появилось неожиданое окно! »
Другими словами, если скрипт потерпел крах? Это не столь тривиально как кажется.

Есть такой модуль называется AutoItErrorHandler (http://creator-lab.ucoz.ru/load/3-1-0-45), может помочь отслеживать крах скрипта.

[ShadowMas]

Ясно ну спасибо за участие думаю,чуть поменять условие и всё должно получиться!

Всем ещё раз огромное спасибо!!!

[ShadowMas]

Всё люди я розобрался с условием :)

Вот рабочий код на автоматическое создание архива для 10-го Акрониса + проверка на случайную ошибку или сбой при установке, думаю так будет работать нормально :)

BlockInput(1)
DirCreate("D:\Test")
FileDelete("D:\Test\*.tib")
RegWrite('HKCU\SOFTWARE\Acronis\TrueImageHome\DontShow', 'IncrementalTip', 'REG_SZ', '1')
Run(@ProgramFilesDir & "\Acronis\TrueImageHome\TrueImage.exe")
WinWaitActive("Acronis*True*Image*Home")
Sleep(8000)
Send("{LALT}")
Send("{ENTER}")
Send("{ENTER}")
WinWaitActive("Мастер резервного копирования")
Send("{ENTER}")
WinWaitActive("Мастер резервного копирования")
Send("{ENTER}")
WinWaitActive("Мастер резервного копирования")
Send("{ENTER}")
Sleep(2000)
Send("{BS 25}")
Send("D:\Test\Образ.tib")
Send("{ENTER}")
WinExists("Мастер резервного копирования")
Sleep(1000)
Send("{ENTER}")
WinExists("Мастер резервного копирования")
Sleep(1000)
Send("{ENTER}")
WinExists("Мастер резервного копирования")
Sleep(1000)
ControlClick("Мастер резервного копирования", "", "FXWindow6")
WinWaitActive("Мастер резервного копирования")
ControlClick("Мастер резервного копирования", "", "FXWindow6")
Send("{ENTER}")
If WinActive("Acronis*True*Image*Home") Then
WinWait("Информация")
Send("{ENTER}")
WinClose("Acronis*True*Image*Home")
RegDelete("HKCU\SOFTWARE\Acronis\TrueImageHome\DontShow")
BlockInput(0)
MsgBox(64, "Сообщение", "Запись успешно окончина!")
Else
BlockInput(0)
MsgBox(64, "ОШИБКА ВЫПОЛНЕНИЯ", "Закройте все активные окна и попробуйте заново")
WinClose("Мастер резервного копирования")
WinClose("Acronis*True*Image*Home")
EndIf