Board logo

标题: [已结]文本追加:把指定内容加到全盘TXT中的前面 [打印本页]

作者: gugudeai     时间: 2009-2-7 10:08    标题: [已结]文本追加:把指定内容加到全盘TXT中的前面


for /f "delims=\" %%i in ('fsutil fsinfo drives^|find /v "A"') do (
    set var=%%i
    set drive=!var:~-2!
    fsutil fsinfo drivetype !drive!|find "固定">nul && dir /s /a-d /b !drive!\*.txt >>tmp.txt 2>nul
)
for /f "delims=" %%a in (tmp.txt) do type c:\333.txt>>"%%a"
上面的代码只能做到把c:\333.txt追加到全盘的TXT的后面!
但是我想让他加到全盘TXT中的前面!而且不想重复添加!帮忙给看看怎么做要?
谢谢了!

───────────────── 版务记录 ─────────────────
执行:HAT
操作:[2009-02-07]在帖子标题中增加搜索关键字;代码加code标签
说明:原标题"文本追加的问题"不利于论坛搜索
处罚:扣除2点积分
提示:建议阅读以下帖子
{1415}提问的智慧
{7326}论坛新手必读,所有人的基本行为准则
{22703}请不要做浮躁的人
{27314}反面教材:本论坛“精彩”标题小集
{32667}愤怒:那些连标题都写不清楚的人们啊,你们醒醒吧
{32825}本版严厉整顿烂帖
───────────────── 版务记录 ─────────────────


[ Last edited by HAT on 2009-2-8 at 18:17 ]
作者: netbenton     时间: 2009-2-7 14:04    标题: 我还没测试过

第一,取333.txt的行数到 lens
for /f "delims=:" %%a in ('findstr /n .* 333.txt') do set lens=%%a

for /r %%a in (*.txt) do (call :sub "%%a")
goto :eof

:sub
第二,取要处理的文件的前 lens行到333.tmp
cd.>333.tmp
set n=0
for /f "tokens=1* delims=:" %%b in ('findstr /n .* "%1"') do (
set/a  n+=1
echo %%b>>333.tmp
if !n!==!lens! goto :skip
)
:skip
第三,fc 333.txt 333.tmp
第四,
if %errorlevel% gtr 0 goto :eof
[写入]
copy /y 333.txt+"%1" 333.tmp
copy /y 333.tmp "%1"
作者: ooaf     时间: 2009-2-7 17:25
我的只能运行一次,加到前面的,运行多了就重复了
for /r %%a in (*.txt) do (
  >"%%a_tmp" type c:\333.txt
  >>"%%a_tmp" type "%%a"
  move /y "%%a_tmp" "%%a"
)
作者: gugudeai     时间: 2009-2-7 19:07
3楼哥们的运行结果是:(系统找不到指定的文件)
2楼的答案也尝试了!也不成!也提示错误!哪位能帮我改改
作者: moniuming     时间: 2009-2-7 20:31
这个代码已经在一个目录中测试成功,全盘的代码请自已解决,在这个代码中,源文本必须有回车符,否则第二次运行本代码还会追加源文本的内容...
@echo off
setlocal enabledelayedexpansion
set "srcfl=123.txt"
set /p tmp_=<"%srcfl%"
for %%a in (*.txt) do (
  set /p temp_=<"%%a"
  if not "!tmp_!"=="!temp_!" (
    >"%temp%\temp_.txt" type "%%a"
    >"%%a" type "%srcfl%"
    >>"%%a" type "%temp%\temp_.txt"
  )
)
[ Last edited by moniuming on 2009-2-7 at 20:32 ]
作者: ooaf     时间: 2009-2-7 20:43


  Quote:
Originally posted by moniuming at 2009-2-7 08:31 PM:
这个代码已经在一个目录中测试成功,全盘的代码请自已解决,在这个代码中,源文本必须有回车符,否则第二次运行本代码还会追加源文本的内容...
[code ...

if not "!tmp_!"=="!temp_!"   这一句好像是两段文本比较呀,难道也是一个一个字符的比较的吗?
作者: moniuming     时间: 2009-2-7 21:04    标题: 回6楼

只对每一个文本的第一行的整行作比较,试试echo !temp_!
作者: netbenton     时间: 2009-2-7 21:29    标题: 这样呢

@echo off&setlocal enabledelayedexpansion
set "sor=333.txt"&rem 这个是要加入的数据文件
if not exist !sor! echo 找不到!sor! &pause&goto :eof
for /f "delims=:" %%a in ('findstr /n .* !sor!') do set lens=%%a

for /r %%a in (*.txt) do (call :sub "%%a" "!sor!")
pause
goto :eof

:sub
set /p=文件:%1 <nul
cd.>%~n2.tmp
set n=0
for /f "tokens=1* delims=:" %%b in ('findstr /n .* %1') do (
        set/a  n+=1
        echo %%c>>%~n2.tmp
        if !n!==!lens! goto :skip
)

:skip
fc %~2 %~n2.tmp>nul
if %errorlevel%==0 echo 跳过&goto :eof
(type %2&echo.&type %1)>%~n2.tmp
type %~n2.tmp>"%1"
echo 写入
goto :eof
作者: gugudeai     时间: 2009-2-8 13:19
已经解决!感谢热心的朋友