
CODE: [Copy to clipboard]如果允许多于5个逗号,将/nvx中的x去掉。@(echo 有错误的行:&more youtfile.txt|findstr /nvx "[^,]*,[^,]*,[^,]*,[^,]*,[^,]*,[^,]*")>err.txt
CODE: [Copy to clipboard]@echo off&setlocal enabledelayedexpansion
set file=newxso.txt
for /f "delims=" %%a in (%file%) do (
set/a m+=1 &set str=%%a &set str=!str: =#! &set str=!str:;=#!
for %%b in (!str!#) do set/a n+=1
set/a n-=1
if !m! equ 1 (set one=!n!
) else (
set/a other=!one!*!m!
if !other! neq !n! goto err
)
)
if %one% equ 0 goto err
echo %file% 中其它行的逗号数与第一行相同。
)
pause>nul
exit
:err
echo %file% 中其它行的逗号数与第一行不相同,或没有逗号。
pause>nul
exit
CODE: [Copy to clipboard]@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (newxso.txt) do (
set/a n+=1
call :vbs "%%a"
if !n! equ 1 (set one=!num!) else (if !one! neq !num! goto err)
)
if %one% equ 0 (echo 没有逗号。) else (echo 逗号数相同。)
pause>nul
exit
:vbs
echo WSH.Echo UBound(Split("%~1",","))>tmp.vbs
for /f %%a in ('cscript //nologo /e:vbs tmp.vbs') do set num=%%a
del tmp.vbs
goto :eof
:err
echo 逗号数不同。
pause>nul
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |