Board logo

标题: [文本处理] 求助批处理解决文本查找替换 [打印本页]

作者: gigiqb    时间: 2009-8-3 09:21     标题: 求助批处理解决文本查找替换

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

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

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

就好下面类推
作者: gigiqb    时间: 2009-8-4 15:23

看来大家都不热情啊,我弄了一个
@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    时间: 2009-8-4 17:49

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

作者: batman    时间: 2009-8-4 17:54

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




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2