|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - [решено] узнать размер папок. экспорт в txt |
|
CMD/BAT - [решено] узнать размер папок. экспорт в txt
|
Старожил Сообщения: 267 |
Профиль | Отправить PM | Цитировать
как реализовать через bat либо vbs
чтобы узнать полный размер всех папок, которые находятся с .bat в одной папке. и сохранить список размеров по порядочку в txt (без названия папок. просто столбик размеров в Мб (желательно) либо в Кб) как сделать чтобы полный размер папок считался так, как будто я на нее в винде нажал alt+enter |
|
Отправлено: 20:36, 21-05-2010 |
Пользователь Сообщения: 54
|
Профиль | Отправить PM | Цитировать Как оказалось время исполнения имеет значение,
Пишу Но не записывает конец Что бы считало размер только одной верхней директории за комментировал строки :: FOR /F "usebackq delims=" %%z IN (`Cscript //NoLogo /E:jscript "%~dpnx0" "%~1\%%d" "%~2"`) DO Call :Out "%%z" "%%d" "%~2" Этого достаточно для скорости подсчёта ? |
Отправлено: 20:22, 11-11-2018 | #31 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Ветеран Сообщения: 2708
|
Профиль | Отправить PM | Цитировать palexa, переименуйте скрипт в txt, приложите к сообщению
|
------- Отправлено: 20:37, 11-11-2018 | #32 |
Пользователь Сообщения: 54
|
Профиль | Отправить PM | Цитировать Вот, прикладываю
|
Отправлено: 20:42, 11-11-2018 | #33 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать Цитата palexa:
|
|
Отправлено: 20:46, 11-11-2018 | #34 |
Ветеран Сообщения: 2708
|
Профиль | Отправить PM | Цитировать palexa, Не делайте комментарии ::
|
------- Отправлено: 21:48, 11-11-2018 | #35 |
Пользователь Сообщения: 54
|
Профиль | Отправить PM | Цитировать Первый батник, ууу считает, устал ждать, и это самый маленький по размеру сервер
11.11.2018 - 19:58 - TS4 - Начало 122897 File(s) 43*007*258*445 bytes c:\Users\ 11.11.2018 - 21:08 - TS4 - Конец Последний обломался , странно как то 11.11.2018 - 21:14 - TS4 - Начало on denied "c:\Users\" 11.11.2018 - 21:14 - TS4 - Конец 1 Цитата megaloman:
Я думал оно раз в пять быстрее будет считать, скажу админу что можно задачу эту в планировщик поставить, пусть думает, вместо того что бы меня эксплуатировать ручным трудом Спасибо за помощь |
|
Последний раз редактировалось palexa, 11-11-2018 в 22:43. Отправлено: 22:23, 11-11-2018 | #36 |
Пользователь Сообщения: 94
|
Профиль | Отправить PM | Цитировать Доброго времени суток!
Не стал создавать новую тему, решил написать в подобную: Есть перечень каталогов: O:\Folder1 O:\Folder1\podFolder1 O:\Folder2\podFolder2\podpodFolder2 O:\Folder3\podFolder3 ... ... ... ... ... O:\Folder4 O:\Folder5\podFolder5 O:\Folder6 ... ... ... ... ... размер которых необходимо вывести в *.txt/*.csv (Формат: Папка -> Размер). Прошу помощи. |
Отправлено: 06:26, 21-08-2019 | #37 |
Пользователь Сообщения: 94
|
Профиль | Отправить PM | Цитировать Цитата megaloman:
|
|
Отправлено: 07:10, 21-08-2019 | #38 |
Ветеран Сообщения: 2708
|
Профиль | Отправить PM | Цитировать CMD+JS Есть перечень каталогов, размер которых необходимо вывести в *.txt
@set @E=1; /* @Echo Off CHCP 1251 >nul Set "Out3=D:\Мой контент гигабайт.txt" 2>nul Del "%Out3%" rem 0-байты, 1-килобайты, 2-мегабайты, 3-гигабайты >>"%Out3%" Call :InDir "D:\Мой контент" 3 >>"%Out3%" Call :InDir "D:\Мой контент\Музыка" 3 >>"%Out3%" Call :InDir "D:\Мой контент\Музыка\_Скопировано.wd" 3 >>"%Out3%" Call :InDir "D:\Мой контент\Музыка\_Скопировано.wd\Vivaldi-1" 3 >>"%Out3%" Call :InDir "D:\CMD_Forum\Муз" 3 GoTo :Eof :InDir FOR /F "usebackq delims=" %%z IN (`Cscript //NoLogo /E:jscript "%~dpnx0" "%~1" "%~2"`) DO Call :Out "%%z" "%~1" "%~2" GoTo :Eof :Out SetLocal Echo %~2 -^> %~1 EndLocal GoTo :Eof */ var oArg = WScript.Arguments; if (oArg.Count() < 1) { WScript.Echo("Arguments absent"); WScript.Quit(1); } var FSO=WScript.CreateObject("Scripting.FileSystemObject"); if (!FSO.FolderExists(oArg(0))) { WScript.Echo("not found"); WScript.Quit(2); } try {var sFold=FSO.GetFolder(oArg(0)).Size} catch (err) {if (err != 0) { WScript.Echo(err.description); WScript.Quit(3)} } if (oArg.Count() == 2) { if (oArg(1)==1) sFold = Math.round(sFold/1024); if (oArg(1)==2) sFold = Math.round(sFold/1024/1024); if (oArg(1)==3) sFold = Math.round(sFold/1024/1024/1024); } WScript.Echo(sFold); WScript.Quit(0) |
------- Отправлено: 07:58, 21-08-2019 | #39 |
Пользователь Сообщения: 94
|
Профиль | Отправить PM | Цитировать |
Отправлено: 08:50, 21-08-2019 | #40 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Разное - [решено] Размер папок | NIC444 | Microsoft Windows 7 | 5 | 15-09-2014 09:32 | |
Отображаемый размер квотируемых папок | rrev | Microsoft Windows NT/2000/2003 | 7 | 29-09-2009 09:46 | |
[решено] Вставить строчку из одного txt в оределённое место другого txt | ZeroCrash | AutoIt | 7 | 13-07-2009 07:35 | |
Ограничения на размер профиля+исключение папок из профиля | Grug | Microsoft Windows NT/2000/2003 | 2 | 04-03-2009 11:09 | |
Доступ - Ограничение на размер папок | Xavier Teodonius | Microsoft Windows 2000/XP | 2 | 10-04-2008 12:12 |
|