中国DOS联盟

　　看来set命令无法区分大小写，纯批处理恐怕难以实现，楼主还是去试试无奈何兄提供的sed命令吧，没必要强求用纯批处理来解决吧？

在9楼namejm版主代码的基础上修改了一下, 可以区别大小写.

@echo off

cd.>2.txt

setlocal enabledelayedexpansion

for /f "delims=" %%i in (test.txt) do (

    set var=%%i

    call :go

    set "var=!var:1=o!"

    set "var=!var:2=e!"

    set "var=!var:3=u!"

    set "var=!var:4=i!"

    set "var=!var:5=u!"

    set "var=!var:6=v!"

    set "var=!var:7=l!"

    set "var=!var:9=y!"

    >>2.txt echo !var!

)

start 2.txt

exit



:go

set tmp=%var%@

set var=

:go_

if not "%tmp:~0,1%"=="@" (

    set var_=%tmp:~0,1%

    if "!var_!"=="A" set var_=啊

    if "!var_!"=="a" set var_=阿

    if "!var_!"=="B" set var_=不

    if "!var_!"=="b" set var_=把

    if "!var_!"=="C" set var_=才

    if "!var_!"=="c" set var_=出

    set var=!var!!var_!

    set tmp=!tmp:~1!

    goto go_

)

goto :eof

[ Last edited by pengfei on 2006-10-16 at 21:36 ]

　　pengfei 的代码是通过探测每一个字符来替换的，用了 if 可以区别大小写的特性，思路确实不错。

　　使用这段代码来处理小块文本内容还是可行的，如果文本内容很多的话，速度就会比较慢了。楼主可以综合考虑一下。

Originally posted by zouzhxi at 2006-10-15 22:51:
TO redtek:
这是别人给我的一个文件,,告诉我说,只要用特定字符替换掉里边的字母数字就可以知道是什么东东了.我也没办法,,,,

TO lxmxn:
你说用记事本 ...

别人给你的这个文件，用个工具替换一下就可以～：）
因为这只是一次性的，你的朋友或许给你这样类型的文件只有这一次，不会经常，
而且解码要求只有一小部分，就是做完了自动处理也只是个半成品，
（从心理因素讲：做半成品给朋友用自己也接受不了，没有挑战性和成就感，象是在打杂儿）
（　　　　　　　就像是走了一半将要到美丽公园的路，而中途不去就回家了一样，哈哈）

一次的文件还是用一些工具替换比较好～：）

但我猜这可能不是一次性的文件处理，
有可能是ＳＱＬ存储上要用的私人性质编码和解码、
或是某个ＪａｖａＳｃｒｉｐｔ上要用到的简单加密方式、
或是聊天要用到的明文简单加密编码，可能防止特殊字符或命令过滤或方便处理、
或是自定义上的象ＢＡＳＥ６４一样的编码和解码的应用、
或是某种日记等带有保密性的文档的自定义私有编码与解码等、
或是公司内部要求对某个文件内容进行的类似性的解码（如输入法、对照码表……）

所以，实际你上面的问题，如果每行数量不固定，如果有上万行，还含有特殊符号，等等……很多问题都会影响批处理的解决速度和解决办法。
例：几万行和几行的处理方法和算法也是不一样的：）

所以，如果你的内容不保密可以全上传上来让大家帮助你一起想办法。
请说明这件事的非常详细的应用（如果没有私人或企业秘密等条件所约束的话）～：）


）　一次的转换还是用工具好～：）
）　天天要用到的用批处理或调用工具的方便～：）
）　必须要用ＤＯＳ而不是其它外部工具，这不太明白……（似乎要经常处理这些对吧？）

TO redtek:

是的,我朋友发给我的文件都是这样的,我不得不重复翻出来,所以我想写一个批处理,,,不想用其他工具(因为烦琐),批处理我一次执行就可以了....

『第 17 楼』:

在9楼namejm版主代码的基础上修改了一下, 可以区别大小写.
CODE:
--------------------------------------------------------------------------------

@echo off
cd.>2.txt
setlocal enabledelayedexpansion
for /f "delims=" %%i in (test.txt) do (
set var=%%i
call :go
set "var=!var:1=o!"
set "var=!var:2=e!"
set "var=!var:3=u!"
set "var=!var:4=i!"
set "var=!var:5=u!"
set "var=!var:6=v!"
set "var=!var:7=l!"
set "var=!var:9=y!"
>>2.txt echo !var!
)
start 2.txt
exit

:go
set tmp=%var%@
set var=
:go_
if not "%tmp:~0,1%"=="@" (
set var_=%tmp:~0,1%
if "!var_!"=="A" set var_=啊
if "!var_!"=="a" set var_=阿
if "!var_!"=="B" set var_=不
if "!var_!"=="b" set var_=把
if "!var_!"=="C" set var_=才
if "!var_!"=="c" set var_=出
set var=!var!!var_!
set tmp=!tmp:~1!
goto go_
)
goto :eof

我弄了好久，用上面的办法太慢了。不太理想。有没有精简一点的，。。

还有一种方法（只是原理）：


）　读全部变量到数组（可以模拟出数组功能来）
）　以数组内容为目的标签直接跳转

）　大写Ａ与小写ａ同样指向标签Ａ，在标签Ａ内用ＩＦ判断大小写并替换
　　优点：二选一的方式只针对指定的字母，节省了每个字母都用ＩＦ判断的时间。

　　　　　也就是说：只要替换内容分为大小写的，一次判断就够：
　　　　　因为：如果 IF判断字母为大写（每个数组只装一个字符，省去了:~的提取运算），
　　　　　　　　那么就按大写的方式替换，否则一定是小写！所以一次判断解决。

　　如果是遇到其它符号，不管！反正是按数组内容跳标签的，到了属于它的标签内想怎么操作就怎么替换。

）　当数组全部走一遍之后，意味着内存中的数组内变量已全部更改替换完成
）　然后ｆｏｒ循环再将数组内容从头到尾写回文件。

　

例如：

）　提取全部文本到数组，每个字符占一个数组元素。

）　以下面标签跳转：

　　CALL :数组元素１的内容
　
　　就上面这一行就足够了：）


　　在下面是标签：

　　:A
　　　　　在标签Ａ内来一个ＩＦ判断它是不是大写（是：替换什么字符），
　　　　　如果它不是大写，那一定是小写，替换什么。
　　　　　（所以这里一个判断就地了）
　
　　:1　　在１的标签内，不要判断了，直接替换就行了。
　　　　　优点：　通用，想替什么就替什么。

）　还有多少个要替换的内容往标签上加：）


）　最后当数组循环全走了一遍以后，一个ＦＯＲ写文本内。
　　至于写进文本内的内容是不是一个元素就占一行的问题（要多少个元素占一行）
　　同样可以计算和 +=　什么出来。

用记事本的替换功能好了。

sed 解决这类问题最爽了

这个问题差点忘了，，，
此问题未解决，，，
本人还在郁闷，，，
有没有更好的办法，，，
。。。。

无奈何斑竹发的很详细了,怎么还没有解决?

不嫌麻烦可以这样写:

sed "s/A/啊/g;s/a/阿/g;......................" life (..........继续添加)

没说的,顶一下

文本文档里不是有查找替换功能?