qixiaobin0715

最好能在网盘中传一份CSV文件看看。

qixiaobin0715

回复 7# yyz219

@echo off
setlocal enabledelayedexpansion
for %%x in (.txt .ini .bat .vbs) do set %%x=true
(for /f "delims=" %%i in (1.csv) do (
    for %%j in (%%i) do (
        set str=%%j
    )
    for /f "delims=-" %%k in (!str!) do (
        if defined %%~xk echo,%%k
    )
))>1.txt
pause
复制代码

看看显示是否正确

qixiaobin0715

回复 11# yyz219
已修改

qixiaobin0715

如果数据像你提供的那么规整的话，这样效率应当更高些：

@echo off
setlocal enabledelayedexpansion
(for /f "delims=" %%i in ('findstr "\.txt \.ini \.bat \.vbs" 1.csv') do (
    for %%j in (%%i) do set str=%%j
    for /f "delims=-" %%k in (!str!) do echo,%%k
))>1.txt
pause
复制代码

未经测试。

qixiaobin0715

回复 16# yyz219
那就去掉变量延迟：

@echo off
(for /f "delims=" %%i in ('findstr "\.txt \.ini \.bat \.vbs" 1.csv') do (
    for /f tokens^=17^ delims^=^" %%j in (%%i) do (
        for /f "delims=-" %%k in ("%%j") do echo,%%k
    )
))>1.txt
pause
复制代码

qixiaobin0715

22楼代码化简为：

@echo off
(for /f tokens^=17^ delims^=^" %%j in ('findstr "\.txt \.ini \.bat \.vbs" 1.csv') do (
    for /f "delims=-" %%k in ("%%j") do echo,%%k
))>1.txt
pause
复制代码

qixiaobin0715

如果文件扩展名都是4个字符（包括.），用一个for循环+变量延迟即可：

@echo off
for /f tokens^=17^ delims^=^" %%j in ('findstr "\.txt \.ini \.bat \.vbs" 1.csv') do (
    if "%%j"=="%%~fj" (
        set "Filen=%%~dpnj"
    ) else (
        set "Filen=%%~nj"
    )
    set "Extn=%%~xj"
    setlocal enabledelayedexpansion
    echo,!Filen!!Extn:~,4!
    endlocal
)
pause
复制代码

这个可以忽略，主要是自己想练练手。