Подсчет размера большого файла передачей названия файла из bat в vbs

@alex723 · Регистрация: 03.04.2017

Студворк — интернет-сервис помощи студентам

Нужно подсчитать размер большого файла и присвоить его переменной в бат-файле.
Так как размер более 5Гб., то в чистом батнике это сделать не выходит.

Накопал пока такое:

Windows Batch file
1
2
3
4
5
for /f %%i in ('cscript //nologo "size.vbs"') do @set f.Size=%%i
echo %f.Size%
 
pause
exit

и далее сам size.vbs

Visual Basic
1
2
3
4
5
Dim objFso
    Dim f
    Set objFso = CreateObject("Scripting.FileSystemObject")
    Set f = objFso.GetFile("file.zip")
WScript.Echo Int(f.Size/1024/1024)

Это все примеры подсмотренные из интернета. На большее ума не хватает, поэтому обращаюсь за помощью.
Мне надо передать из bat-файла в vbs имя файла. В данном случае file.zip Потом присвоить получившийся размер в мегабайтах переменной, чтобы далее использовать в bat-файле.

@Punkt5 · 21.02.2021, 09:10

Сообщение от alex723

Потом присвоить получившийся размер в мегабайтах переменной, чтобы далее использовать в bat-файле.

Так может сразу в bat-файле и делать? Стандартный обходной манёвр для такой ситуации 30 лет назад выглядел бы примерно так:

Windows Batch file
1
2
3
setlocal enabledelayedexpansion
for /F "usebackq tokens=1-3" %%I in (`Dir /-C "имя вашего файла"`) do @if %%I%%J == 1файлов (@Set RAZMER=%%K&@set RAZMER=!RAZMER:~0,-6!)
@echo !RAZMER! MБ

@alex723 · 21.02.2021, 09:58 **[ТС]**

Да, это еще проще. Большущее спасибо! Вопрос решен.

FlasherX · 21.02.2021, 10:20

Сообщение от Punkt5

!RAZMER:~0,-6!

Подобное обрезание некорректно. Правильно так:

Windows Batch file
1
2
3
4
@for %%i in (file.zip) do @set size=%%~zi
@set /a size=%size%/1024/1024
@echo Size: %size% MB
@pause>nul

@Punkt5 · 21.02.2021, 11:02

Сообщение от FlasherX

Подобное обрезание некорректно. Правильно так:

Set /A при больших числах не работает, во что и упёрся ТС. При размере файла > 4 ГБ, bat в годы моей молодости при попытке стандартного деления через Set /A, ругался что его вычисления ограничены 32 битными числами. Потому и проще всегда было обрезать хвост у полученной строки через обычный Set, чтобы не вкрячивать в тело bat функцию деления длинных чисел.
Или мелкомягкие в последних версиях довели размерность bat-арифметики до 64 бит, и cmd перестал ругаться?

P.S. Понятно, что использовать %%~zI первым приходит в голову. И, думаю, ТС тоже его использовал в своём батнике до этого затыка. Просто мне хотелось дать ТС дополнительную не столь очевидную альтернативу c dir.

FlasherX · 21.02.2021, 11:12

Punkt5, всё верно, проблему давно знаю, извиняюсь за спешку. ТС задал уместное направление:

Windows Batch file
1
2
3
4
5
6
7
8
9
@set @a=0/*
@echo off
for %%i in (file.zip) do for /f %%s in ('cscript /e:jscript "%~f0" %%~zi') do set size=%%s
echo %size% MB
pause
 
:: в конец кода:
exit
*/WSH.echo(Math.round(WSH.Arguments(0)/1024/1024))

Сообщение от Punkt5

думаю, ТС тоже его использовал в своём батнике до этого затыка.

Зачем "до"? Затык же никак не связан с получением размера в байтах.

@alex723 · 22.02.2021, 14:31 **[ТС]**

Сообщение от Punkt5

P.S. Понятно, что использовать %%~zI первым приходит в голову. И, думаю, ТС тоже его использовал в своём батнике до этого затыка. Просто мне хотелось дать ТС дополнительную не столь очевидную альтернативу c dir.

Все как раз так и было с точностью до байта.

Все работало как надо до тех пор, пока не пришла потребность измерять размер довольно больших файлов.

FlasherX · 22.02.2021, 15:33

alex723, вы так и не поняли, зачем нужен именно последний код?
5369233408 байт в округлении — это 5121 Мб, но никак не 5369.

@alex723 · 22.02.2021, 17:32 **[ТС]**

Сообщение от FlasherX

alex723, вы так и не поняли, зачем нужен именно последний код?
5369233408 байт в округлении — это 5121 Мб, но никак не 5369.

Прошу прощения, что сразу не оценил ваш код.
Дело в том, что:
а) для моей задачи не так важна абсолютная точность в размере и даже такие расхождения при округлении вполне приемлемы
б) сразу не понял ваш код. Сначала подумал, что эта доработка первоначальных моих двух файлов. И только сейчас, когда вставил текст кода в батник увидел, что это законченное работоспособное решение

А если учесть, что в свойствах через проводник размер тестового файла у меня показывается - 4,71 (5 061 351 966)
В вашем примере - 4827
В примере уважаемого Punkt5 - 5 061
То в вашем действительно точнее. Но там в коде реально какое-то волшебство для меня.

Хотя использовать его буду. Спасибо!

@alex723 · 23.02.2021, 17:47 **[ТС]**

Сообщение от FlasherX

Punkt5, всё верно, проблему давно знаю, извиняюсь за спешку. ТС задал уместное направление:

Windows Batch file
1
2
3
4
5
6
7
8
9
@set @a=0/*
@echo off
for %%i in (file.zip) do for /f %%s in ('cscript /e:jscript "%~f0" %%~zi') do set size=%%s
echo %size% MB
pause
 
:: в конец кода:
exit
*/WSH.echo(Math.round(WSH.Arguments(0)/1024/1024))

К сожалению в батниках, где есть exit /b, такой код не работает.

@Punkt5 · 23.02.2021, 18:27

Сообщение от alex723

К сожалению в батниках, где есть exit /b, такой код не работает.

Замена

Code
1
exit /b

на

Code
1
goto :EOF

не помогает?

Добавлено через 16 минут
alex723можно попробовать вариант ограниченной годности, слегка приподнимающий верхнюю границу, но дающий вполне приемлемый результат:

Code
1
for %%I in (file.zip) do (set size=%%zI&set /A size=!size:~0,-2!/10485)

@alex723 · 23.02.2021, 19:10 **[ТС]**

Сообщение от Punkt5

Замена

Code
1
exit /b

на

Code
1
goto :EOF

не помогает?

Добавлено через 16 минут
alex723можно попробовать вариант ограниченной годности, слегка приподнимающий верхнюю границу, но дающий вполне приемлемый результат:

Code
1
for %%I in (file.zip) do (set size=%%zI&set /A size=!size:~0,-2!/10485)

1. exit /b там не случайно и он не один, поэтому не избавиться
2. к сожалению приведенный код выдал мне "Отсутствующий операнд"

@Punkt5 · 23.02.2021, 19:19

Или так:

Windows Batch file
1
2
3
setlocal enabledelayedexpansion
@for %%i in ("ваш файл") do @(set AA=%%~zi & Set /A BB=!AA:~0,8!%%1048576 & Set /A BB=!BB!!AA:~8!/1048576 & Set /A AA=!AA:~0,8!/1048576 & Set size=!AA!!BB!)
@echo Size: %size% MB

Добавлено через 8 минут

Сообщение от alex723

exit /b там не случайно и он не один, поэтому не избавиться

Странно. В моей практике exit /b, используемый для возврата из подпрограммы, спокойно заменялся на GOTO :EOF. Но в моей практике не было вставок в bat на других языках, потому и не могу сказать что-то определённое для данного случая.

FlasherX · 23.02.2021, 19:21

Сообщение от alex723

К сожалению в батниках, где есть exit /b, такой код не работает.

Только сегодня бат выложил с exit /b. Всё работает.

@Punkt5 · 23.02.2021, 19:40

Сообщение от alex723

к сожалению приведенный код выдал мне "Отсутствующий операнд"

А так?

Windows Batch file
1
2
3
setlocal enabledelayedexpansion
for %%I in ("ваш файл") do @(set size=%%~zI&set /A size=!size:~0,-2!/10485)
@echo Size: %size% MB

@alex723 · 23.02.2021, 19:48 **[ТС]**

Сообщение от FlasherX

Только сегодня бат выложил с exit /b. Всё работает.

Вероятно у меня в большом скрипте что-то мешается.
Выдает: Ошибка компиляции Microsoft JScript: Предполагается наличие ';'

FlasherX · 23.02.2021, 19:52

alex723, кодировка в ANSI? Там нигде больше /* не попадается?

@alex723 · 23.02.2021, 19:55 **[ТС]**

Сообщение от Punkt5

А так?

Windows Batch file
1
2
3
setlocal enabledelayedexpansion
for %%I in ("ваш файл") do @(set size=%%~zI&set /A size=!size:~0,-2!/10485)
@echo Size: %size% MB

Это работает нормально.

Добавлено через 1 минуту

Сообщение от FlasherX

alex723, кодировка в ANSI? Там нигде больше /* не попадается?

OEM 866
/* больше нет

FlasherX · 23.02.2021, 19:59

alex723, я бы попробовал в ANSI.

@Punkt5 · 23.02.2021, 19:59

Сообщение от alex723

Выдает: Ошибка компиляции Microsoft JScript: Предполагается наличие ';'

Очень похоже на то, что часть бат-команд находятся над строчкой

Сообщение от alex723

@set @a=0/*

тогда как я понял, их надо внести внутрь комментария /* */
То есть первой строчкой обязательно идёт

@set @a=0/*

А после /* со второй строки уже вставляете свой скрипт, который завершаете */ после которого идёт вставка кода на другом языке

@set @a=0/*
setlocal enabledelayedexpansion
@echo off
...
*/ и здесь уже код на другом языке

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

Подсчет размера большого файла передачей названия файла из bat в vbs

Решение

Решение

@alex723 0 / 0 / 0 Регистрация: 03.04.2017 Сообщений: 23
	21.02.2021, 09:58 [ТС]
	Да, это еще проще. Большущее спасибо! Вопрос решен. 0

FlasherX 6981 / 2873 / 1104 Регистрация: 06.06.2017 Сообщений: 9,752
	22.02.2021, 15:33
	alex723, вы так и не поняли, зачем нужен именно последний код? 5369233408 байт в округлении — это 5121 Мб, но никак не 5369. 0

FlasherX 6981 / 2873 / 1104 Регистрация: 06.06.2017 Сообщений: 9,752
	23.02.2021, 19:52
	alex723, кодировка в ANSI? Там нигде больше /* не попадается? 0

FlasherX 6981 / 2873 / 1104 Регистрация: 06.06.2017 Сообщений: 9,752
	23.02.2021, 19:59
	alex723, я бы попробовал в ANSI. 0