Задача: закрыть всплывающее окно в Windows 2000/2003 (окошко в котором кнопка OK и все) при его появлении.

Я так понимаю по eventtrigger (а в журнале событий появляется сообщение о всплывающем окне PopUp с ID 26) по событию в журнале запустить батник, в котором будет производиться закрытие этого окошка.

Загвоздка в том, что при нажатии OK на первом окошке обязательно возникает следующее, в котором также в свою очередь надо нажать OK и после этого перезапустить определенную службу (пока не нажмешь на Ok закрыв всплывшие окна службу перезапустить не удается)

Как это реализовать ?
Поможет ли закрыть эти окна команда kill (taskkill) ?

--null--можно попробовать из WSH SendKeys

а можно поподробнее как это и чем ?

--null--есть такой WSH

делаем файлик с close.vbs

имя окна указываем как у этой заразы - он не нее переведет фокус и нажмет Enter - должно закрыться.
Если окон несколько - вставьте дальше код аналогично.


запускаем cscript close.vbs

А для работы этого скрипта, необходимо ли что то устанавливать (VisualBasic,...) или прям в Win2000/2003 будет работать ?

Потому как все это дело надо организовать на сервере и не хотелось бы туда устанавливать дополнительный софт/приложения/...

Все вроде понятно что делает
А что означает строка ?
"WScript.sleep 1000"

Просто дает время на то чтобы окно стало активным ?

vkle

PS наверно, скрипт изначально был с циклом, который выкинули :)

Posted via ActualForum NNTP Server 1.3


А можно в этот скрипт вписать выполнение какой-либо Виндовой команды с параметрами (запускной *.exe сопределенными параметрами), если да то как именно это пишется ?

--null--... А в особо ответственных случаях можно даже и 10-секундные паузы делать - гораздо спокойнее.
При активации можно делать и более сложные вещи - скажем, цикл с маленькими sleep-ами, который повторять, пока приложение не активизируется (apppactivate, насколько я помню, при неудаче возвращает 0)

А не рассматриваете такой ситуации, что пока вы активировали окно и сделали паузу, может запуститься какой то иной процесс (новое окно всплыть, через шедулер что то запуститься) и в итоге активным стало иное окно и вы уже в ем senkey делаете - нехорошо получиться !!!

Так что вопрос с паузой неоднозначен !!!

В моем случае видимо не надо паузы т.к. полностью задача выглядит так.

Некая служба сбоит, при этом выводит окно с сообщением, в котором только кнопку OK нажать можно (других просто нет), нажимая OK тут же возникает второе окно, все от той же службы (просто с несколько иным сообщением), и нажимая в ней OK необходимо сделать перезапуск службы.

Вывод этих окон фиксируется в журнале событий.
Автоматизаия:
1. прописать trigger который по определенному событию в журнале будет запускать то что пропишем - пропишем как раз этот скрипт для запуска
2. скрипт активирует окно (на всякий случай) и посылает в нем нажатие enter.
3. скрипт продолжает выполняться и активирует новое (возникшее окно) и так же посылает в него нажатие Enter.
4. Выполняет команду перезапуска службы

В итоге паузу нужно поставить разве что в скрипте между выполнением 3. и 4. пунктов.

rrrrrrrrrrХм, вообще-то логичнее по дескриптору процесса делать рестарт. А в упрощенной постановке - может, nnCron поставите? - он умеет жать на кнопки в заданных окнах :)

Пробовал конечно так сначала.
Беда в том что никак не останавливается/рестартуется/.... процесс, пока не нажаты (закрыты) окна всплывающие.

--null--[quot автор]...
в Вашем случае действительно можно забить на паузу.
Так как очевидно в момент срабатывания триггера окно уже будет присутствовать.
Думаю, после некоей отладки все будет OK!


Испробовал пока без триггера - просто ручками запустил *.vbs когда появилось первое всплывшее окно (внутри vbs прописал закрытие обоих окон последовательно с паузой в 1 секунду между закрытиями окон) - все отлично сработало.

Осталось триггер забацать и в скрипт добавить запуск службы.

А можно как то добавить в скрипт послать сообщение по PoP3 нзаданный адрес ? (чтобы как то оповещать о происходящих сбоях)

vkle

Собственно, вот на этой страничке оба скрипта
http://www.microsoft.com/technet/scriptcenter/resources/qanda/nov04/hey1129.mspx


на этой странице скрипты то есть, но по сути оба одинаковы (просто во 2-м добвлен аттач)

Я честно говоря не понял как изменить на свои параметры (на свой сервер) строки :

Set objEmail = CreateObject("CDO.Message")
objEmail.From = "helpdesk@fabrikam.com"
objEmail.To = "administrator@fabrikam.com"
objEmail.Subject = "Server down"
objEmail.Textbody = "Server1 is no longer accessible over the network."

objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
"smtpmailer"
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send


И что с этим делать, что менять на свое (кроме 1-го абзаца - первые 5 строк)
И почему там http мелкомягкие указаны... ?

vkle
рядом же описалово оказалось :)
http://www.microsoft.com/technet/scriptcenter/guide/sas_ent_wbpa.mspx?mfr=true

К сожалению мне описалово абсолютно не помогло (я вообще никогда не писал скриптов и не знаю о них ничего), потому одна на вашу помощь надежда.

Я так понимаю знак "_" означает что продолжение скрипта на след. строке ?
А как записать без подчеркивания в одну строку всю команду (как она должна выглядеть)
Но как переписать учитывая то что надо мне вот эти строки :

objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
"MySMTPHost"
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update

vkle
...

Так а что вся эта лабудень про http:.... должна остаться ? т.е. комп должен иметь выход в инет на мелкомягких чтоль чтобы отправить на нужный smtp server сообщение ?

vkle
Да, похоже что это описания полей а не реальный сервер
Неа. В ответ все равно всегда возвращается HTTP/1.x 404 Not Found



Вот вопрос то и остается как отправить оповещение по сети о событии (точнее по почте). Вот приходят же письма от NOD и от WEB по почте (да кстати я не сказал почта внутренняя корпаративная)

--null--есть такой WSH

делаем файлик с close.vbs

имя окна указываем как у этой заразы - он не нее переведет фокус и нажмет Enter - должно закрыться.
Если окон несколько - вставьте дальше код аналогично.


запускаем cscript close.vbs

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

--null--привет.
Думаю, это не сложно: ведь appactivate возвращает boolean и возвратит false если окно не удалось активизировать, т.е. его нету.
А вот GoTo нет в обсуждаемом языке (VBScript), только кастрированный GoTo 0 в обработке ошибок.
Так что предлагается условный оператор использовать



1) что означает строка -= if sh.appactivate("cmd") =-
2) как задать несколько действий после THEN и ELSE
3) можно ли прервать выполнение vbs по команде из самого скрипта (типа breake)

--null--.............

т.е. после THEN если идет много команд их заключить в кваджратные скобки ?