标题: [求助]非常感谢HAT的帮助：删除文本中的指定字符串 [打印本页]
作者: xugq 时间: 2008-9-23 15:55 标题: [求助]非常感谢HAT的帮助：删除文本中的指定字符串
昨天有幸得到论坛上HAT朋友的帮助不胜感激.激发了我学习dos批处理的热情.
经过我今天一天的努力,终于有了结果.真的非常高兴.
我把HAT兄弟提供的代码给改写了一下.希望大家能帮我看看有什么问题没有
HAT 朋友的源代码:
@echo off
>b.txt type nul
for /f "tokens=1-2 delims==" %%a in (a.txt) do (
if "%%b" equ "" (
>>b.txt echo %%a
) else (
set str=%%b
setlocal enabledelayedexpansion
if "!str:~1,1!" neq ":" (
>>b.txt echo %%a=%%b
) else (
>>b.txt echo %%a=e!str:~1!
)
endlocal
)
)
move /y b.txt a.txt
后来经过我一天的研究给改成>b.txt type nul
for /f "tokens=1-2 delims==" %%a in (a.txt) do (
if "%%b" equ "" (
>>b.txt echo %%a
) else (
set str=%%b
setlocal enabledelayedexpansion
if "!str:~1,1!" neq ":" (
>>b.txt echo %%a=%%b
) else (
>>b.txt echo %%a=e!str:~1!
)
endlocal
)
)
move /y b.txt a.txt
@echo off
>b.txt type nul
for /f "tokens=1* delims=:" %%a in (a.txt) do (
if "%%b" equ "" (
>>b.txt echo %%a %%b
) else (
set str=%%b
set atr=%%a
setlocal enabledelayedexpansion
if "!str:~0,1!" neq "\" (
>>b.txt echo %%a:%%b
) else (
>>b.txt echo !atr:~0,-1!E:%%b
)
endlocal
)
)
move /y b.txt a.txt
这里边还好多问题不明白为什么.反正是能运行.哈哈.>b.txt type nul
for /f "tokens=1* delims=:" %%a in (a.txt) do (
if "%%b" equ "" (
>>b.txt echo %%a %%b
) else (
set str=%%b
set atr=%%a
setlocal enabledelayedexpansion
if "!str:~0,1!" neq "\" (
>>b.txt echo %%a:%%b
) else (
>>b.txt echo !atr:~0,-1!E:%%b
)
endlocal
)
)
move /y b.txt a.txt
我想大家热心是热心,但是归根结底自己还是要明白为什么.
谢谢HAT朋友了.啥也不说了.
───────────────── 版务记录 ─────────────────
执行：HAT
操作：在帖子标题中增加搜索关键字；代码加code标签
说明：原标题"[求助]非常感谢HAT兄弟的无私帮助"不利于论坛搜索
处罚：因属论坛新人，不予积分处罚
提示：请访问 {7326}论坛新手必读，所有人的基本行为准则[转帖]
───────────────── 版务记录 ─────────────────
[ Last edited by HAT on 2008-9-24 at 09:13 PM ]
作者: xugq 时间: 2008-9-23 16:06
啊.刚刚自己试运行又发现了个小问题.又改了一下
改完如下
@echo off
>b.txt type nul
for /f "tokens=1* delims=:" %%a in (a.txt) do (
if "%%b" equ "" (
>>b.txt echo %%a:%%b
) else (
set str=%%b
set atr=%%a
setlocal enabledelayedexpansion
if "!str:~0,1!" neq "\" (
>>b.txt echo %%a:%%b
) else (
>>b.txt echo !atr:~0,-1!E:%%b
)
endlocal
)
)
move /y b.txt a.txt
这个批处理命令实现的目的就是删除文本中第一个包含:\的字符串的前一个字符
基本打到目的了.哈哈.就是要是比较长的文本运行起来比较慢..
作者: xugq 时间: 2008-9-23 16:36
另外还有几个问题想麻烦大家
就是在上边的代码中后的地方我一开始想这样的:
) else (
set ccc=%%a:~0,-1%
>>b.txt echo %ccc%E:%%b
)
但是怎么试都不成功.后来从if "!str:~0,1!" 这段中得到启发最后想干脆试试,
没相到居然能行.我就不明白.这是为什么呢?
还有就是为什么非要是!atr:~0,-1!而%atr%:~0 -1%不行呢?
是语法有问题么?
作者: HAT 时间: 2008-9-23 17:06
%%a
这种for循环的控制变量不允许进行变量扩展
作者: terse 时间: 2008-9-23 17:33
你是删除全部:\的字符串的前一个字符 还是文本的第一个呢？
如果是删第一个 试下面的是否快点
@echo off&setlocal enabledelayedexpansion
cd.>b.txt
for /f "delims=" %%i in (a.txt) do (
set /a n+=1
set str1=%%i
set str2=!str1::\=!
if "!str1!" neq "!str2!" goto lp
>>b.txt echo %%i
)
:lp
for /f "tokens=1* delims=:" %%i in ("%str1%") do set str=%%i&set E=%%j
>>b.txt echo %str:~0,-1%E:%E%
>>b.txt more +%n% a.txt
move /y b.txt a.txt
cd.>b.txt
for /f "delims=" %%i in (a.txt) do (
set /a n+=1
set str1=%%i
set str2=!str1::\=!
if "!str1!" neq "!str2!" goto lp
>>b.txt echo %%i
)
:lp
for /f "tokens=1* delims=:" %%i in ("%str1%") do set str=%%i&set E=%%j
>>b.txt echo %str:~0,-1%E:%E%
>>b.txt more +%n% a.txt
move /y b.txt a.txt
作者: xugq 时间: 2008-9-23 19:00
楼上的兄弟.不是文本的第一个.有可能在文本中的任意一行中的任意一个地方.