Показать сообщение отдельно
  (#6 (permalink)) Старый
bubuka bubuka вне форума
Member
 
Аватар для bubuka
 
Сообщений: 985
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 23.01.2008
Адрес: москва
По умолчанию 23.06.2008, 18:42

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

Создаем текстовый файл и сохраняем с расширение бат. Пуск - и можно оставить так - не очень сведующий юзер будет мучаться до перезагрузки (если мы не сунули в автазапуск)

echo Chr(39)>%temp%\temp1.vbs
echo Chr(39)>%temp%\temp2.vbs
echo on error resume next > %temp%\temp.vbs
echo Set S = CreateObject("Wscript.Shell") >> %temp%\temp.vbs
echo set FSO=createobject("scripting.filesystemobject")>>%t emp%\temp.vbs
echo do >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{capslock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{numlock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{scrolllock}" >> %temp%\temp.vbs
echo loop>> %temp%\temp.vbs
start %temp%\temp.vbs
start %temp%\temp1.vbs
start %temp%\temp2.vbs


В рЕЗУльТатЕ юзЕР полУЧИТ ДоВОЛЬно ЗАБаВНЫЙ стИЛЬ напИСАНия ТексТА
Ответить с цитированием
Ads