中国DOS联盟论坛 - Powered by Discuz! Board

标题: 一个文件名处理的小问题 [打印本页]

作者: groofy 时间: 2008-4-1 21:38 标题: 一个文件名处理的小问题

如何实现下面的功能？例： d:\tmp\11_223_321_42.txt d:\tmp\12_456.txt 读成 11 223 321 42 11 456

作者: bat-zw 时间: 2008-4-3 18:01 标题: 好不容易：

楼主的这个小问题好难啊，终于还是搞出来了：

@echo off
for /f "delims=: tokens=1" %%i in ('dir /a-d /b d:\temp ^| findstr /n .*') do (
    set str=%%i
    set /a str-=1
    call :lp %%str%%
)
pause
:lp
set var=skip=%1
if "%var%"=="skip=0" set var=
set n=1
:begin
for /f "%var% delims=_ tokens=%n%" %%i in ('dir /a-d /b d:\temp') do (  
    set /a n+=1
    set b=%%i
    setlocal enabledelayedexpansion
    set b=!b:.txt=!   
    echo !b!&goto begin
    endlocal
)
echo.&goto :eof

[ Last edited by zw19750516 on 2008-4-3 at 06:04 PM ]

作者: bat-zw 时间: 2008-4-3 18:37 标题: 看似好简单的问题，对此问题的一点分析：

::::::开始我还真的以为是个简单的问题，就看了一眼再没去想了。今天在论坛闲逛又进了这个帖子，想了一下也许实现起来还真有点问题。于 =================================================================================== 是，开始写代码，谁知道越写越觉得有困难，抱着不放弃的念头终于还是写出了能实现的代码，下面就简单地分析一下这个难题： =================================================================================== 首先用dir /a-d /b 列出文件夹下所有的txt文件，接着对各个长文件名进行拆分（这个当然容易，用delims=_就搞定了），然后要逐行提 =================================================================================== 取输出拆分文件名的各部分字符串并去除最后一部分字符串中的.txt字符，这就要求在for循环中只能按列去循环提取文件名的各部分字符串 =================================================================================== （也就是在没提取完之前不能跳到下一行也就是下一个文件名）。在这里开启了变量延迟并使用了变量替换set b=!b:.txt=!，同时加入了： =================================================================================== begin内循环来完成对列的循环。 =================================================================================== 最难的问题还是在于完成了列的循环后如何再进入下一行（也就是跳到下一个文件名）来重复列的循环，于是我想到了在前面加入了for循 =================================================================================== 环并逐次提取下一行（也就是一个一个文件来）并使用了call反复调用列循环，最终实现了依次对每个名件名各部分字符串的提取。 =================================================================================== 　　最后希望有高手能完善我这段显得繁杂的代码，在此先谢过了。 =================================================================================== [ Last edited by zw19750516 on 2008-4-3 at 06:57 PM ]

作者: plp626 时间: 2008-4-3 19:02

楼上,想得有点复杂了吧. 假设test.txt内为: d:\tmp\11_223_321_42.txt d:\tmp\12_456.txt

@echo off
for /f %%a in (test.txt)do set e=%%~na &call:d %%e:_= %%
pause
:d
if [%1]==[] goto :eof
echo.%1
shift
goto :d

作者: bat-zw 时间: 2008-4-3 19:22

Originally posted by abcd at 2008-4-3 19:05:

@echo off
setlocal enabledelayedexpansion
for /r d:\tmp %%i in (*) do (
  set str=%%~ni
  set str=!str:_=;!
  for %%j in (!str!) do echo %%j
  echo.
)
pause>nul

这样不 ...

自己测试吧。。。。。。。。。。。

作者: bat-zw 时间: 2008-4-3 19:28

Originally posted by plp626 at 2008-4-3 19:02: 楼上,想得有点复杂了吧. 假设test.txt内为: d:\tmp\11_223_321_42.txt d:\tmp\12_456.txt @echo off for /f %%a in (test.txt)do set e=%%~na &call:d %%e:_= %% pause :d i ...

shift变量移位确实妙！！！但这段代码对两个文件之间的分隔还是没实现，echo.%1中eho.是无效命令，改为：

@echo off
for /f %%a in (test.txt)do set e=%%~na &call:d %%e:_= %%
pause
:d
if [%1]==[] echo.&goto :eof
echo %1
shift
goto :d

即使这样通用性还是有问题，当文件名分分隔部分超过8个时，如1＿1＿1＿1＿1＿1＿1＿1_1_1_1.txt时就会出现问题了。 [ Last edited by zw19750516 on 2008-4-3 at 07:49 PM ]

作者: slore 时间: 2008-4-3 20:00

vbs的话replace就搞定了。

作者: 26933062 时间: 2008-4-3 20:05

楼上说超过8个就出问题，不知从何说起。。。应该是文件名含空格就会出错。 :

@echo off
for /f "delims=" %%i in (test.txt) do call :loop "%%~ni"
pause
:loop
for /f "tokens=1* delims=_" %%a in ("%~1") do (
  echo %%a
  if not "%%b"=="" call :loop "%%b"
)
goto :eof

作者: plp626 时间: 2008-4-3 20:05

Originally posted by zw19750516 at 2008-4-3 07:28 PM: shift变量移位确实妙！！！但这段代码对两个文件之间的分隔还是没实现，echo.%1中eho.是无效命令，改为： [code]@echo off for /f %%a in (test.txt)do set e=%%~n ...

10000个也照样分,你测试.

作者: abcd 时间: 2008-4-3 20:08

Originally posted by zw19750516 at 2008-4-3 07:22 PM: 自己测试吧。。。。。。。。。。。

你的意思是不行？？

作者: terse 时间: 2008-4-3 22:16

也发一个 @echo off for /f "delims=" %%i in (test.txt)do set str=%%~ni&call :lp "%%str:_= %%" pause goto :eof :lp for %%i in (%~1) do ( echo %%i ) echo.

作者: bat-zw 时间: 2008-4-4 11:04

不再说别的了，顶起诸位了！！！！！！！！！