[文本处理] 求助批处理解决文本查找替换

gigiqb

首先谢谢各位了。
文档在附件中要求如下：

1.txt文档内容公司名称那里在2.TXT中找到并且替换成2.TXT每行后面那个名字
入第一个

71001-00003236285AAA~~5~~新雅办公用品有限公司~~无~~竹岛办南竹岛D区5-4号 无~~无 无~~~~~~~~~~20090728~~
71001-00003236285AAA~~5~~大新雅集团~~无~~竹岛办南竹岛D区5-4号 无~~无 无~~~~~~~~~~20090728~~

就好下面类推

gigiqb

看来大家都不热情啊，我弄了一个
@echo off
for /f "tokens=1-2 delims= " %%i in (2.txt) do (set "%%i=%%j")
set n=0
for /f "tokens=1-7 delims=~" %%a in ('findstr "71001" 1.txt') do (
    if defined %%c (
    set /a n+=1
    call set "%%n%%=%%%%c%%"
))                                             
for /f "tokens=1-9 delims=:~" %%a in ('findstr /n ".*" 1.txt') do (
    if defined %%d (
       call echo %%b~~%%c~~%%%%d%%~~%%e~~%%f~~%%g~~~~~~~~~~%%h~~
     ) else (
       call echo %%b~~%%c~~%%d~~%%e~~%%f~~%%g~~%%h~~~~~~~~~~%%i~~
))>>op.txt
start op.txt
exit

terse

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1*" %%i in (2.txt) do set "%%i=%%j"
    (for /f "delims=" %%i in (1.txt) do (
      set str=%%i
      for /f "tokens=3 delims=~" %%a in ("%%i") do (
      if defined %%a for %%b in (!%%a!) do set str=!str:%%a=%%b!
      )
      echo !str!
    ))>test.txt
start "" "test.txt"
复制代码

batman

将两个文本都导入excel表，再用vlookup函数就可以轻松解决。