Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
AAA
Зарегистрирован: 08.06.2003 Сообщения: 7
|
Добавлено: Ср Апр 10 2002 12:31 Заголовок сообщения: Не получается эмулировать нажатие CTRL-SHIFT |
|
|
Не получается эмулировать в VBS-скрипте нажатие сочетания клавиш CTRL-SHIFT для переключения раскладки клавиатуры. Например, при открытии окна InputBox для ввода имени или пароля нужно,чтобы раскладка была английская,т.к. при загрузке виндов стоит по-умолчанию русская. |
|
Вернуться к началу |
|
|
and3008
Зарегистрирован: 12.10.2001 Сообщения: 14893 Откуда: Н.Новгород
|
Добавлено: Ср Апр 10 2002 20:08 Заголовок сообщения: Re: Не получается эмулировать нажатие CTRL-SHIFT |
|
|
Очень сомневаюсь, что у вас что-то получится. Нельзя сие осуществить.
Иначе весь Интернет бы был полон сайтами-убийцами. Заходишь на такой сайт, а комп сам нажимает "Пуск", "Выполнить", format c: "Yes" )) |
|
Вернуться к началу |
|
|
AAA
Зарегистрирован: 08.06.2003 Сообщения: 7
|
Добавлено: Чт Апр 11 2002 10:36 Заголовок сообщения: Re: Не получается эмулировать нажатие CTRL-SHIFT |
|
|
>>Иначе весь Интернет бы был полон сайтами-убийцами. Заходишь на такой сайт, а комп сам нажимает "Пуск", "Выполнить", format c: "Yes" >>)) Хорошо.А как же такой проверенный на "кошках" код в FormatA.vbs:
Dim WshShell 'Создаем объект WshShell Set WshShell=CreateObject("WScript.Shell") 'Открываем окно форматирования флоппи-диска WshShell.Run "rundll32.exe shell32,SHFormatDrive",,false 'Устанавливаем задержку перед нажатием Tab WScript.Sleep 10000 'эмулируем нажатие "Tab" WshShell.SendKeys "{TAB}" 'Устанавливаем задержку перед нажатием Enter WScript.Sleep 200 'эмулируем нажатие "Enter" WshShell.SendKeys "~"
Затем запускаем этот скрипт. И смотрим как пойдёт процесс форматирования диска A. Здесь я продемонстрировал как можно отформатировать гибкий диск, наверняка есть способ отформатировать C-диск(из под виндов это не получится),например так: в скрипте закладывается операция на запись в autoexec.bat(для Win9xx) строчки "format c:" и что-то для подтверждения начала процесса форматирования. Затем пишется комманда для перезагрузки винды и что происходит дальше ты уже и сам можешь догадаться. К чему я перед тобой так распинался? А потому, что переключение раскладки клавиатуры намного безобиднее и бозопаснее,чем форматирование чего-бы то ни было. Поэтому,если есть способ отформатировать диск(для флоппа приведено выше),то наверняка есть способ нажать скриптом по клавишам CTRL-SHIFT. |
|
Вернуться к началу |
|
|
and3008
Зарегистрирован: 12.10.2001 Сообщения: 14893 Откуда: Н.Новгород
|
Добавлено: Чт Апр 11 2002 11:01 Заголовок сообщения: Тогда попробуй так (+) |
|
|
Попробуй послать WshShell.SendKeys "+(^)" - комбинация (Shift+Ctrl)
Или WshShell.SendKeys "+(%)" - комбинация(Shift+Alt) |
|
Вернуться к началу |
|
|
|