[其他] [已解决] 批处理如何统计指定文件下图片文件的数量和有标记的图片的数量？

228630386

@echo off
set n=0
set m=0
for /f "delims=" %%a in ('dir /s /a-d /b *.jpg') do (
set /a n+=1
more "%%a" | find "rdf:Bag" >nul && set /a m+=1
)
set /a t=%n%-%m%
echo 该目录下共有%n%张JPG图片，其中%m%张有标记，%t%张无标记>"共有%n%张JPG图片，其中%m%张有标记，%t%张无标记.txt"
exit
复制代码

以上代码只能执行同一个目录下的有一个子文件夹下有好几个文件夹的批处理。

可否实现一个文件夹中有多个子文件夹，下面多很多很多个子文件夹都能通用的呢?需要改哪一个的代码?

asy666

来学习一下

228630386

回复 25# pcl_test


    非常感谢，终于可以了。代码在测试中，暂时没有问题。

pcl_test

回复 24# 228630386
回复 23# 228630386
使用CrLf  20楼的代码，你要运行完退出，只要改第6行代码为exit即可，即去掉pause &

228630386

回复 22# CrLf


    是喔，哪什么情况下可以自动关闭窗口呢? exit不可以的么?

228630386

回复 18# pcl_test


    http://pan.baidu.com/s/1kT67xVh
    亲，代码又遇到另一个问题，明明有标记，又被记录成没有标记了，这是有问题的图片。

CrLf

回复 21# 228630386


    你改过代码了吧，我第 20 行没出现过 exit

228630386

回复 20# CrLf


    但为什么有时候会弹出错误信息? exit，不能自动关闭窗口?

CrLf

来一个系统原生的办法

1>1/* :
@echo off
for /f "delims=" %%a in ('dir /a-d /b /s *.jpg ^| cscript -nologo -e:jscript "%~0"') do (
	echo %%a>"%%a.txt"
)
pause & exit /b
*/

var filelist = WScript.StdIn.ReadAll().split(/\r?\n/)

var fso = new ActiveXObject('Scripting.FileSystemObject')
var shell = new ActiveXObject('Shell.Application')

var FLAG=0,NOFLAG=0

for(var i in filelist){
	var fullpath = fso.GetFile(filelist[i]).Path
	var namespace = shell.Namespace(fullpath.replace(/[^\\]*$/,''))
	var parsename = namespace.ParseName(fullpath.replace(/.*\\/,''))
	var value = namespace.GetDetailsOf(parsename,namespace.GetDetailsOf('',18)==='标记'?18:5)
	if(/\S/.test(value)){FLAG++}else{NOFLAG++}
}

WSH.Echo('该目录下共有'+(FLAG+NOFLAG)+'张JPG图片，其中'+FLAG+'张有标记，'+NOFLAG+'张无标记')
复制代码

228630386

回复 18# pcl_test


    非常感谢，我明天回到公司再测试一下，辛苦两位大侠！！！

pcl_test

回复 17# 228630386

@echo off
setlocal enabledelayedexpansion
set n=0
set m=0
for /f "delims=" %%a in ('dir /a-d /s /b *.jpg') do (
set /a n+=1
set str=
for /f "delims=" %%b in ('findstr "rdf:Bag" "%%a"') do set str=%%b
set str=!str: =!
if "!str:~-8,-1!" == "rdf:Bag" set /a m+=1
)
set /a t=%n%-%m%
echo 该目录下共有%n%张JPG图片，其中%m%张有标记，%t%张无标记
pause
复制代码

228630386

回复 16# pcl_test


    请问有办法解决么? 因为我们通常都是用中文来标记的，但有些图片他来身自带空格，如果这也记录上，对我们统计数据带来不便。

pcl_test

回复 15# 228630386
嗯，是图片问题，19张的标记为空格，而系统把空格也当成没有，所以看上去是没有标记，但实际是有的

228630386

回复 14# pcl_test


    链接: http://pan.baidu.com/s/1jG3R6mi 密码: iehs
    我已经将有问题的图片上传到云盘中，图片共有57张JPG没错,但是图片一个标记也有没有,但两个命令都统计出了相同的标记数量，是图片的问题吗？

pcl_test

回复 13# 228630386
你看看这样列出的有标记的图片跟实际是否对得上？对不上的打包共享网盘发出来看看

@echo off
(for /f "delims=" %%a in ('findstr /s /m "rdf:Bag" *.jpg') do set /a 含标记+=1 & echo %%a
for /f "delims=" %%b in ('findstr /s /m . *.jpg') do set /a 总数+=1
set /a 无标记=总数-含标记
echo 该目录下共有%总数%张JPG图片，其中%含标记%张有标记，%无标记%张无标记)>统计信息.txt
复制代码