我有一堆TXT文本文件
如
asdd.txt
okghg.txt
lili.txt
每个文本文件里都有*号
我想将每个文本文件里的*号都换成该文本文件的文件名
asdd.txt里的*号换成asdd.txt
okghg.txt里的*号换成okghg.txt
兄弟帮忙写个批处理。谢谢。作者: qazwsx99 时间: 2009-1-23 23:52 这个用批处理是不是要求太高了。:)
哪位仁兄帮帮忙。作者: netbenton 时间: 2009-1-24 04:49 @echo on&setlocal ENABLEDELAYEDEXPANSION
::字符串替换里,*是通配符
::for /r 里用时也是通配符
::确实难搞,这样试试看吧,如果文档不是很多特殊字符的话还是可以用的
set /p=正在处理: <nul
for /r %%a in (*.txt) do (
set "filename=%%~nxa"
set /p=%%~nxa<nul
for /f "tokens=1,2* delims=:" %%i in ('findstr /o .* %%~fa^&cd.^>!filename!') do (
set "_cc=%%j"&call :sub
echo.!_cc!>>!filename!
set /a k=!k!+1
if !k!==10 (set k=0 &set /p=.<nul)
)
echo.
)
pause
goto :eof
:sub
if not defined _cc goto :eof
:next
set "_bb=!_cc:**=!"
call :get _len1 !_cc!
call :get _len2 !_bb!
if !_len1!==!_len2! goto :qu
set /a _m=_len2+1
set "_cc=!_cc:~0,-%_m%!!filename!!_bb!"
goto :next
:qu
goto :eof
:get
set "str=%2%3%4"&set n=0&set s=!str!
if not defined str set %1=0&goto :eof
:loop
set /a n=!n!+16
set "m=!s!fedcba9876543210"
set s=!str:~%n%!
if not "!s!"=="" goto loop
set /a %1=0x!m:~16,1!+!n!-15
goto :eof作者: yishanju 时间: 2009-1-24 05:30 我疯了
@echo off&setlocal ENABLEDELAYEDEXPANSION
::字符串替换里,*是通配符
::for /r 里用时也是通配符
::确实难搞,自己的最新发现:在开启变量扩展后不允许变量的内容里有!符号
::以下可以处理特殊字符了,只是如果文本里有!字符的话将被丢弃。
echo 正在处理:
for /r %%a in (*.txt) do (
set "fn=%%~nxa"
set /p=%%~nxa <nul
for /f "tokens=* delims=" %%i in ('findstr /o .* %%~fa^&cd.^>%%~fa') do (
set "_str=%%i"&set "_str=!_str:*:=!"&call :sub
echo.!_str!>>%%~fa
set /a k=!k!+1
if !k!==10 (set k=0 &set /p=.<nul)
)
echo.完成
)
pause
goto :eof
:sub
if not defined _str goto :eof
set "_str=!_str:2=22!"
set "_str=!_str:%%=323!"
:next
set "_str2=!_str:**=!"
if !_str!==!_str2! goto :qu
call :get _skip "!_str2!"
set /a _skip+=1
set "_str=!_str:~0,-%_skip%!121!_str2!"
goto :next
:qu
set "_str=!_str:121=%fn%!"
set "_str=!_str:22=2!"
set "_str=!_str:323=%%!"
goto :eof
:get
set "str=%~2"&set n=0&set s=!str!
if not defined str set %1=0&goto :eof
:loop
set /a n=!n!+16
set "m=!s!fedcba9876543210"
set "s=!str:~%n%!"
if not "!s!"=="" goto loop
set /a %1=0x!m:~16,1!+!n!-15
goto :eof作者: netbenton 时间: 2009-1-26 06:05 标题: 还要学习才行
@echo off
::因“自己的最新发现:在开启变量扩展后不允许变量的内容里有!符号”;
::此句若对谁产生了误导的,在这里表示道谦。
echo 正在处理(请稍候):
for /r %%a in (*.txt) do (
set "fn=%%~nxa"
set /p=%%~nxa <nul
for /f "tokens=* delims=" %%i in ('"(type %%~fa^&cd.^>%%~fa)"^|findstr /o .*') do (
set "_str=%%i"
setlocal ENABLEDELAYEDEXPANSION
rem 为了读取空行进行的处理,丢弃:号前的偏移号
set "_str=!_str:*:=!"
call :sub
echo.!_str!>>%%~fa
set /p=.<nul
endlocal
)
echo.完成
)
pause
endlocal
goto :eof
:sub
if not defined _str goto :eof
rem 对特殊字符进行转换处理
set "_str=!_str:"=""!"
set "_str=!_str:2=22!"
set "_str=!_str:""=525!"
set "_str=!_str:%%=323!"
:next
rem 因为*号的特殊,不能在变量内替换,只好在*号的处打断后换成代号121
rem 把*号前的去掉,取剩余字符串的长度,用来进行截串处理
set "_str2=!_str:**=!"
if "!_str!"=="!_str2!" goto :qu
set "str=!_str2!"&call :get _skip
set /a _skip+=1
set "_str=!_str:~0,-%_skip%!121!_str2!"
goto :next
:qu
rem 转换后的特殊字符恢复
set "_str=!_str:323=%%!"
set "_str=!_str:121=%fn%!"
set "_str=!_str:525="!"
set "_str=!_str:22=2!"
goto :eof
:get
rem 取字符的长度,返回值存在%1指定的变量
set n=0&set s=!str!
if not defined str set %1=0&goto :eof
:loop
set /a n=!n!+16
set "m=!s!fedcba9876543210"
set "s=!str:~%n%!"
if not "!s!"=="" goto loop
set /a %1=0x!m:~16,1!+!n!-15
goto :eof