![]() |
Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета. Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме. С уважением, ваш призрачный админ, BigMac... |
|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Помогите плиз со скриптом на удаление файлов. |
|
VBS/WSH/JS - Помогите плиз со скриптом на удаление файлов.
|
Новый участник Сообщения: 3 |
Условия такие:
1) В папке c:\windows\system32 2) удалить все файлы с расширениями: "exe","com","bat","txt","sys","vbs","dll","ini","doc","wsc","dat","msi","msc","mod","chm","cab","hlp " 3) с размером в 2445 байта. Буду очень признателен и благодарен за скорейшую помощь. |
|
Отправлено: 15:15, 13-11-2012 |
Ветеран Сообщения: 1759
|
|
Отправлено: 19:07, 13-11-2012 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Ветеран Сообщения: 2735
|
Профиль | Отправить PM | Цитировать Тема VBS, поэтому представляю скрипт на VBS. Очевидно, что с точки зрения быстроты написания и надёжности в данном случае батник многократно выигрывает.
' Скрипт удаляет в указанной папке файлы, ' определенного размера ' определённых расширений DelFolder = "C:\WINDOWS\system32" DelSize = 2445 DelExt = Array("exe", "com", "bat", "txt", "sys", "vbs", "dll", "ini", "doc", "wsc", "dat", "msi", "msc", "mod", "chm", "cab", "hlp") N = UBound(DelExt) Set FSO = CreateObject("Scripting.FileSystemObject") On Error Resume Next Set Folder = FSO.GetFolder(DelFolder) Set Re = New RegExp Re.IgnoreCase = True If Err.Number = 0 Then Set Files = Folder.Files For Each f In Files If f.Size = DelSize Then For i = 0 To N Re.Pattern = "^.*\." + DelExt(i) + "$" ' Маска файла If Re.Test(f.Name) Then On Error Resume Next FSO.DeleteFile DelFolder + "\" + f.Name, True If Err.Number <> 0 Then MsgBox CStr(Err.Number) + " " + Err.Description Exit For End If Next End If Next Else MsgBox CStr(Err.Number) + " " + Err.Description End If И, если это практическая задача, а не для преподавателя, то, очевидно ИМХО все эти файлы - проявление вирусной активности, надо с этим разбираться. |
------- Отправлено: 19:24, 13-11-2012 | #3 |
Новый участник Сообщения: 3
|
Профиль | Отправить PM | Цитировать Всем большое Спасибо за оба варианта! Именно это мне и требовалось.
Кстати верно подмечено, это следы вирусной активности, в данной папке их просто миллиарды и NTFS начинает сходить с ума и соответственно OS глючит безбожно. Сначала грешил на жёсткий диск, но когда обнаружил весь этот файловый мусор, стало сразу ясно в чём причина. |
Отправлено: 11:56, 14-11-2012 | #4 |
Новый участник Сообщения: 3
|
Профиль | Отправить PM | Цитировать К моему сожалению, эти "мусорные" файлы появляются снова...никак не могу найти источник вируса, т.к. сканирование всяческими антивирусными утилитами заканчиваются крахом...И в интернете никак не могу найти описание вируса по симптомам. Может кто-то сталкивался с подобным, подскажите пожалуйста.
|
|
Отправлено: 12:03, 28-11-2012 | #5 |
Сообщения: 53586
|
Профиль | Отправить PM | Цитировать Цитата t3rr0r:
Цитата t3rr0r:
Там и продолжайте. |
||
Отправлено: 16:26, 28-11-2012 | #6 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
CMD/BAT - [решено] Удаление файлов нулевого размера, а затем удаление пустых каталогов | ilyadud | Скриптовые языки администрирования Windows | 5 | 25-08-2012 10:57 | |
VBS/WSH/JS - Помогите плиз со скриптом переадресации почты | sigvar | Скриптовые языки администрирования Windows | 0 | 23-09-2011 13:17 | |
Блог - Удаление временных файлов скриптом по расписанию | Vadikan | Microsoft Windows 7 | 0 | 26-05-2011 11:30 | |
Удаление скриптом самого себя | skeeter | AutoIt | 6 | 07-11-2010 10:09 | |
[решено] закрытие открытых файлов скриптом как можно сделать???????? | Anatoliy2004 | Microsoft Windows NT/2000/2003 | 1 | 07-05-2009 15:45 |
|