![]() |
Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета. Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме. С уважением, ваш призрачный админ, BigMac... |
|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Свернуть окно |
|
VBS/WSH/JS - Свернуть окно
|
Новый участник Сообщения: 22 |
Доброе время суток. Пытаюсь сделать скрипт WSH который будет наверняка сворачивать программу. Поскольку мой опыт в написании скриптов совсем небольшой возникло несколько проблем, надеюсь на вашу помощь.
Сначала о этой вредной программе. По моей задумке она должна запускаться при старте виндовc (XP), есть собственный автозапуск, но я использую папку Автозагрузка. Программа при запуске принудительно открывает окно - в этом вся проблема. Программа - сворачивается умеет только в трей; - не работает запуск "только в процессах", полностью в этом не уверен, проверял только так: (.js) Чтобы свернуть программу в трей использовал отправку нажатия клавиши "Enter". 1 вариант. Set WshShell = CreateObject("WScript.Shell") Set WshExec = WshShell.Exec("""Quick Point.exe""") WshShell.AppActivate(WshExec.ProcessID) WshShell.SendKeys "{ENTER}" WScript.Quit Без AppActivate программа не получала нажатие ENTER т.к. запускается программа через автозагрузку и из-за других запускающихся программ теряется активность окна. 2 вариант. Использовал SLEEP, чтобы исключить случай когда программа просто не успевала бы показаться на экране из-за обилия запускаемых приложений. При этом зацикливание пропало. Set WshShell = CreateObject("WScript.Shell") Set WshExec = WshShell.Exec("""Quick Point.exe""") WScript.SLEEP 2000 WshShell.AppActivate(WshExec.ProcessID) WshShell.SendKeys "{ENTER}" WScript.Quit И такой вопрос, может кто знает способ передать нажатия клавиши "Enter" не взирая на то активно ли окно программы. На мой взгляд в этой активности/неактивности окна кроется ненадежность. |
|
Отправлено: 15:54, 17-01-2012 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать
Укажите полный путь.
Цитата Riavenger:
Используйте библиотеку AutoItX3.dll для работы с окнами, либо переходите на использование PowerShell. |
|
Отправлено: 17:48, 17-01-2012 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать Цитата Iska:
|
|
Отправлено: 22:25, 17-01-2012 | #3 |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать От лишней задержки избавился, но все равно срабатывает сворачивание не каждую загрузку ОС.
Set WshShell = CreateObject("WScript.Shell") Set WshExec = WshShell.Exec("""Quick Point.exe""") WScript.SLEEP 2000 WScript.SLEEP 1 WshShell.AppActivate(WshExec.ProcessID) WshShell.SendKeys "{ENTER}" WScript.Quit Iska, за ссылку спасибо. Хотелось конечно без сторонних библиотек и вообще разобраться в реальных возможностях VBS на этом примере. |
Отправлено: 20:01, 19-01-2012 | #4 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать Riavenger, к сожалению, отсылка нажатий клавиш работает, увы, не стабильно. То есть, если оно и сработает для данной конкретной машины для данного конкретного приложения — не факт, что мы получим аналогичный (и, главное, стабильный) результат для другой машины (или для той же, но в ином программном окружении).
Проблема с установкой сторонних библиотек во многом надумана. Чем сие Вам не подходит? |
|
Отправлено: 21:43, 19-01-2012 | #5 |
Новый участник Сообщения: 22
|
Профиль | Отправить PM | Цитировать Цитата Iska:
Отпишусь помогла ли библиотека, когда появится время собственно написать новый скрипт. Зы. по поводу последнего варианта на vbs: похоже скрипт работает 100% если не притрагиваться к мышке с начала загрузки ос до того пока скрипт не проработает. |
|
Последний раз редактировалось Riavenger, 20-01-2012 в 12:37. Отправлено: 12:27, 20-01-2012 | #6 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Система - Как свернуть определенное окно в трей (Tray) | Guest | Программное обеспечение Windows | 21 | 06-02-2020 18:35 | |
VBS/WSH/JS - vbs - свернуть окно | bk99 | Скриптовые языки администрирования Windows | 6 | 21-12-2011 19:25 | |
Ресурсы - [решено] Изменение размера Свернуть/Свернуть в окно/Закрыть | minos66 | Оформление Windows 11/ 10 / 8 / 7 / Vista | 2 | 20-06-2011 15:48 | |
[решено] Как сделать чтобы дочернее окно при выходе не закрывало основное окно | assch | AutoIt | 5 | 19-07-2010 02:11 | |
свернуть несворачиваемое | wale | Хочу все знать | 5 | 02-11-2008 02:05 |
|