[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
逐字符法在遇到大文本时效率会慢得让人无法忍受,本人的思路如下:
以a.txt b.txt第一行为例,设b.txt第一行字符串为str,a.txt第一行字符串为var
而str字符串可以分为n段:丢弃段 替换段 丢弃段 替换段...丢弃段
如此var字符串就可以依上也分为n段:保留段 被替换段 保留段 替换段...保留段
输出也是n段:保留段 替换段 保留段 替换段...保留段
其他行也就同样这样处理了
由于代码尽量从效率上予以考虑,所以显得复杂,中间用了一个call+lp循环,是因为字符数是不确实的,代码如下:
  1. @echo off
  2. for /f "delims=" %%a in (b.txt) do (
  3.     set "strs=%%a"&set "str=%%a"&set /a n=-1,m=0
  4.     setlocal enabledelayedexpansion&call :lp
  5.     for /f "delims=" %%a in (a.txt) do (
  6.         set "var=%%a"
  7.         for /l %%a in (1,1,!m!) do (
  8.             for /f "tokens=1-3 delims=-" %%a in ("!_%%a!") do set "code=!%%a!"&set /p=!code:~%%b,%%c!<nul
  9.         )
  10.         echo.
  11.      )
  12.      endlocal&echo.           
  13. )
  14. pause>nul&goto :eof
  15. :lp
  16. set /a n+=1
  17. if %n% equ 0 (
  18.    if "%strs:~,1%" equ "*" (
  19.       set "flag="
  20.       ) else (
  21.       set "flag=a"
  22.    )
  23. )
  24. if "%strs:~,1%" equ "*" (
  25.    if not defined flag (
  26.       set /a m+=1
  27.       set /a _!m!_1=n&set "flag=a"&set "k=var"
  28.    )
  29.    ) else (
  30.    if defined flag (
  31.       set /a m+=1
  32.       set /a _!m!_1=n&set "flag="&set "k=str"
  33.    )
  34. )
  35. set /a _%m%_2+=1&set "_%m%=%k%-!_%m%_1!-!_%m%_2!"&set "strs=%strs:~1%"
  36. if defined strs goto lp
复制代码

[ 本帖最后由 batman 于 2009-11-11 21:54 编辑 ]
***共同提高***

TOP

  1. @echo off&setlocal enabledelayedexpansion
  2. for /f %%i in (a.txt) do set/an+=1&set s!n!=%%i
  3. for /f %%i in (b.txt) do set/ai+=1&set t=%%i&(for /l %%a in (1,1,!n!) do set s=&(for /l %%j in (0,1,100) do if "!t:~%%j,1!"=="*" (set s=!s!!s%%a:~%%j,1!)else set s=!s!!t:~%%j,1!)&echo !s!)>>b!i!.txt
复制代码
突然想起来*是不能直接替换的..

TOP

不一样的呢,那个我只是举例方便而已!

TOP

A中一行的每个数字都一样么?就是说会不会有12311111?

TOP

哪位仁兄帮帮忙呗!!!

TOP

返回列表