Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - помочь подправить синтаксис if ххх then sendkeys

Ответить
Настройки темы
VBS/WSH/JS - помочь подправить синтаксис if ххх then sendkeys

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


есть рабочии ОБРАЗЕЦ скрипта задача которого ждать появления окна программы с титлом "UNTITLED - NOTEPAD"
НО вместо вывода сообщения
"DA"

чтобы посылало sendkeys ESC

опыта к сожалению не хватает подправить самому заранее СПАСИБО

Set shell = WScript.CreateObject("WScript.Shell")
timeout = 10
title = "UNTITLED - NOTEPAD"
Do
If shell.AppActivate(title) Then
WScript.Echo "DA"
Exit Do
End If
If timeout = 0 Then
WScript.Echo "NET"
Exit Do
End If
WScript.Sleep 1000
timeout = timeout - 1
Loop

Отправлено: 03:57, 24-03-2013

 

Пользователь


Сообщения: 148
Благодарности: 39

Профиль | Сайт | Отправить PM | Цитировать


Код: Выделить весь код
set shell = WScript.CreateObject("WScript.Shell")
timeout = 10
title = "UNTITLED - NOTEPAD"
Do
    If shell.AppActivate(title) Then
        shell.sendkeys("{ESC}")
	WScript.Quit
    End if
    if timeout = 0 then exit do
    WScript.Sleep 1000
    timeout = timeout - 1
Loop
WScript.Echo "NET"

-------
Alex Dragokas


Отправлено: 03:26, 26-03-2013 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - помочь подправить синтаксис if ххх then sendkeys

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
VBS/WSH/JS - [решено] как при помощи SendKeys передать строку в CMD, русский - передает, латиница - нет boris_m Скриптовые языки администрирования Windows 4 04-03-2010 11:40
[решено] Баннер в браузере с ХХХ (не смешно) _Kaban_ Лечение систем от вредоносных программ 7 27-11-2009 20:17
Интернет - DNS-сервер (ххх.ххх.ххх.ххх) нет связи (табличка) Donila Microsoft Windows Vista 4 14-12-2008 11:21
Не удается найти файл ххх (или один из его компонентов) Slawa 2100 Microsoft Windows NT/2000/2003 6 27-08-2002 11:06




 
Переход