sjzong

第二题代码如下：

@echo off
setlocal enabledelayedexpansion
set/p var1=请输入要查找的内容：
set/p var2=请输入要替换的内容：
:len
if not "!var1:~%num1%,1!"=="" (set/a num1+=1&goto :len)
for /f "delims=" %%a in (a.txt) do (
set str=%%a
set/a num+=1
call :replace !str! !num1!
)
pause
goto :eof

:replace
set ss=%1
set/a n=0
:a
set/a m=%n%+%2
if not "!ss:~%n%,1!"=="" (
if "!ss:~%n%,%2!"=="!var1!" (
set ss=!ss:~0,%n%!!var2!!ss:~%m%!
set/a n+=1
goto :a
) else (set/a n+=1&goto:a)
) else (echo !ss!>>aa.txt)
复制代码

[ 本帖最后由 sjzong 于 2009-4-24 11:47 编辑 ]

sjzong

对了，你说的我已经试过了，可以的！这边有个问题：就是我的这批处理中是已经知道a.txt有十行，所以，我这边直接if !num!==10 goto :b 用来判断是否结束！

如果你把你说的那一行放在a.txt的最后一行，就不能显示了，因为已经是十一行，所以就没有结果！

我还是改过来！用for语句来直接判断a.txt的行数了！！

[ 本帖最后由 sjzong 于 2009-4-23 15:56 编辑 ]

sjzong

@echo off
setlocal enabledelayedexpansion
set "var=abdefg ABDEFG kmli KMLI socsd SOCSD pdxy PDXY nq NQ"
set/a n=0
for %%i in (%var%) do (set !n!=%%i&set/a n+=1)
cd.>a.txt
set/a m=0
:a
if !m! lss 10 (
set/a n=0
set str=
:b
set/a s=%random%%%10
set str=!str!!%s%!
if !n!==9 (
echo !str!>>a.txt
set/a m+=1
goto :a) else (set/a n+=1&goto :b)
)
start a.txt
pause
复制代码

[ 本帖最后由 sjzong 于 2009-4-25 00:10 编辑 ]