[baddl]

1. Система - [addon] Удаление папки Xerox и Frontpage
2. [решено] Удаление MSN Explorer, MovieMaker, NetMeeting, FrontPage

[Wu-Tang]

Кому интересно, сделал vbs для удаления основного мусора:

Код:

On Error Resume Next

Set WshShell = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")

AllUsersProfile = WshShell.ExpandEnvironmentStrings("%AllUsersProfile%")
UserProfile = WshShell.ExpandEnvironmentStrings("%UserProfile%")
ProgramFiles = WshShell.ExpandEnvironmentStrings("%ProgramFiles%")

fso.DeleteFile AllUsersProfile & "\Главное меню\Программы\*.*", True
fso.DeleteFile AllUsersProfile & "\Главное меню\*.*", True
fso.DeleteFile UserProfile & "\Главное меню\Программы\*.*", True
fso.DeleteFile UserProfile & "\Главное меню\*.*", True
fso.DeleteFile AllUsersProfile & "\Главное меню\Программы\Стандартные\Знакомство с Windows XP.*", True
fso.DeleteFile AllUsersProfile & "\Главное меню\Программы\Стандартные\Мастер совместимости программ.*", True
fso.DeleteFile UserProfile & "\Главное меню\Программы\Стандартные\Знакомство с Windows XP.*", True
fso.DeleteFile UserProfile & "\Главное меню\Программы\Стандартные\Мастер совместимости программ.*", True
fso.DeleteFile UserProfile & "\SendTo\Адресат.*", True
fso.DeleteFile UserProfile & "\SendTo\Мои Документы.*", True
fso.DeleteFile UserProfile & "\SendTo\Сжатая ZIP-папка.*", True
fso.DeleteFile AllUsersProfile & "\SendTo\Адресат.*", True
fso.DeleteFile AllUsersProfile & "\SendTo\Мои Документы.*", True
fso.DeleteFile AllUsersProfile & "\SendTo\Сжатая ZIP-папка.*", True

fso.DeleteFolder ProgramFiles & "\WindowsUpdate", True

[Pozia]

Возникло еще пару вопросов:
1. Для удаления нужных мне ярлыков пользуюсь DEL /F /Q "%systemdrive%\Documents and Settings\Pozia\Главное меню\Программы\Internet Explorer.lnk" которую помещаю в XP.cmd, который в свою очередь запускается при первом запуске винды через [GuiRunOnce]. Так вот ярлыки не удаляются. Если же эту команду на удаление вставить в командную строку после установки винды то ярлык удаляется. В чем дело? Что я делаю не так?

Спасибо за ответы

[rizz]

DEL /F /Q "%systemdrive%\Documents and Settings\Pozia\Главное меню\Программы\Internet Explorer.lnk" »

а кодировка 866?

[Drongo]

Pozia,

а кодировка 866? »

В начале .cmd пусть поставит такую строку

Код:

chcp 1251

И можно русскими буквами.

[rizz]

Drongo, круто, из под винды работает проверил, а на T12/T13 и из SFX сработает?
странно почему авторы не написали об этом в учебнике по автоустановке? Удаление ненужных файлов и папок после установки ОС
хотя я уже привык благодаря авторам перегонять AkelPad из одной кодировки в другую, да и во всех аддонах вижу, где кириллические пути используются, кодировка 866

[Wu-Tang]

Drongo,
У меня тоже не удалился vbs-ой ярлык IE и WMP!
И в Send To тоже ничего не удалилось!
Хотя при запуске в винде, все удаляется, что прописано!
А здесь как быть в случае с vbs?

[Drongo]

rizz,

из под винды работает проверил, а на T12/T13 и из SFX сработает? »

Этого не проверял, не знаю. Меня этому yurfed научил.
Wu-Tang,

А здесь как быть в случае с vbs? »

Если честно, я не знаю, так как не пробовал ещё.

[Wu-Tang]

Я подгружаю: Reboot.exe и Vbs (удаление файлов и папок) из под:
[GuiRunOnce]
Command0="%windir%\Del Files & Folders.vbs"
Command1="%windir%\Reboot.exe"
Загрузка которых происходит до загрузки оболочки, а как их же подгрузить после загрузки оболочки?

[Wu-Tang]

Неужели так нельзя сделать, тогда решится проблема удаления остаточных ярлыков, которые не удаляются из под GuiRunOnce, просто я не знаю куда прописать команды, чтоб файлы подгрузились после загрузки оболочки!
Подскажите пожалуйста!