Выход из бесконечного цикла

[GAGArin]

Накидал скрипт решающий целевую задачу, неожиданно на VBS, но он висит в бесконечной петле и хотелось бы 2 вещи - видеть его присутствие в системе и иметь возможность его убить, в идеале окошко типа "Я тут" и Ок по которому он дохнет. Понимаю, что это слегка противоречит концепции "скрипта" т.к. любое окно ожидающее ввода по идее прерывает скрипт. Но вдруг есть какой-то известный (всем кроме меня) хак чтобы сделать это.

Насчет "Видеть" я нашел вроде вариант кинуть MsgBox в другой поток, но вообще меня больше волнует желание его убить по необходимости, а с этим проблемы.

[GAGArin]

Ну в качестве конции: стартовый скрипт взводит какой-то флаг работы в системе, запускает основной скрипт, выводит сообщение "Я работаю", после этого гасит флаг работы и завершается.
Основной рабочий скрипт в своем главном цикле мониторит всё время флаг и в случае его отсутствия самовыпиливается.

В качестве флага можно файлик создать, создать мэйлбокс, проверять имя какого-то процесса, вобщем всё что угодно что можно повесить глобально на Windows не привязывая к конкретному скрипту. Тогда основной скрипт будет пахать пока висит окошко "Я работаю" стартового скрипта

[Хакер]

Использование внешних компонентов, написанных да хоть на VB6, в рамках этой задачи — под запретом или нет?

[GAGArin]

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

[Хакер]

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

Во-первых, я не знаю твоей мотивации, использование VBScript-а может быть вызванным не тем, что ничего другого там тет, а тем, что его, например, легко править и не надо перекомпилировать.

Во-вторых, компилятор не должен быть там. Он может быть где угодно. Вопрос в том, можно ли туда забросить необходимый DLL файл, зарегистрировать его.

Если нет, то как ты собрался создавать мэйлслоты и прочие объекты синхронизации?

Впрочем, у меня уже на примете вариант с использованием только встроенных средств, но тут вопрос в том: как запускается каждый из скриптов?

[ALX_2002]

А использовать HTA не вариант ? Он считай сразу с окном.

[GAGArin]

Во-первых, я не знаю твоей мотивации, использование VBScript-а может быть вызванным не тем, что ничего другого там тет, а тем, что его, например, легко править и не надо перекомпилировать.

Это тоже конечно.

Впрочем, у меня уже на примете вариант с использованием только встроенных средств, но тут вопрос в том: как запускается каждый из скриптов?

CreateObject("WScript.Shell").Run

А использовать HTA не вариант ? Он считай сразу с окном.

А вот это ок, хороший вариант сразу запустить в одном окружении оба скрипта. Им же можно внутри скрипта написать что-то типа этого?

Код: Выделить всё

<script language="VBScript">
  dim a as integer 
  Sub Sub1
  a=1
    while a = 1
    loop
  End Sub

  Sub Sub2
    a=2
  End Sub
</script>

И создать две кнопки соответственно.

[ALX_2002]

Можно. Можно даже использовать JavaScript и VBScript с общей видимостью переменных. Можно подгружать объекты по классиду тэгом OBJECT. Можно управлять оформлением окна и многое другое. )

Рекомендую к ознакомлению: http://www.script-coding.com/HTA.html

P.S В дополнение хотел бы предложить, по возможности отказаться от бесконечных циклов. Так как, Вы правильно заметили, у вас скрипт заходит в бесконечный цикл. Возможно Вашу задачу можно решить с помощью использования событий или конечного числа итераций ?