[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 6# WHY

非常感谢指出这个问题!
目前,!不是问题。需要提取的内容当中不包含符号!
可能有*** ---- 等符号。

感谢Bahome高手热心指点!
学习批处理,休息一下午

TOP

本帖最后由 soarhu 于 2019-1-16 23:01 编辑

回复 3# Batcher

非常感谢Batch的关注和热心回复,
经过单次测试,好消息是新的Batcher大概快一分钟。

有个问题,只输出了最后一个的内容。可能是哪里有些许问题。

再次感谢!

Batcher
学习批处理,休息一下午

TOP

本帖最后由 yhcfsr 于 2019-1-16 22:51 编辑

回复 6# WHY

题主都说这么用可以实现,只是差点效率.所以我也就偷懒了.
如果要避免!号的问题,我看只能混编了
QQ 33892006

TOP

回复 5# yhcfsr


    如果文件中存在 ! 符号,会被丢弃!!!
1

评分人数

    • 523066680: 你不是人造革,你是真的皮PB + 6

TOP

更新

本帖最后由 yhcfsr 于 2019-1-16 23:45 编辑
  1. @echo off
  2. set "new_name=newf01.txt"
  3. for /L %%i in (1,1,10) do if exist "pf_s%%i.f01" call :next "pf_s%%i.f01"
  4. pause&exit
  5. :next
  6. setlocal enabledelayedexpansion
  7. (for /F "delims=" %%i in ('type "%~1"') do (
  8.     set "str=%%i"
  9. if "!str:DATABASE USAGE=!" neq "!str!" goto :break
  10. if "!str:BUFFER POOL AND=!" neq "!str!" (set "begin=1") else if defined begin echo;!str!
  11. ))>>"%new_name%"
  12. :break
  13. endlocal
复制代码
QQ 33892006

TOP

回复 2# soarhu


    可以点击楼层左下角的“编辑”
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

试试这样需要几分钟:
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set "new_name=newf01"
  4. for /l %%i in (1,1,10) do (
  5.     set cc_i=%%i
  6.     call :next !cc_i!
  7. )
  8. goto :eof
  9. :next
  10. set file_name=pf_s%1.f01
  11. (for /f "delims=" %%i in (%file_name%) do (
  12.     set "s=%%i"
  13.     if not "!s:BUFFER POOL AND=!" == "!s!" (
  14.         set flag=
  15.     ) else if defined flag (
  16.         echo,!s!
  17.     )
  18.     if not "!s:DATABASE USAGE=!" == "!s!" (
  19.         set "flag=1"
  20.     )
  21.     if not "!s:DATABASE USAGE=!" == "!s!" (
  22.         echo ---%~dp0 --- %file_name% --- %date% ---
  23.     )
  24. ))>>"%new_name%.txt"
复制代码
1

评分人数

    • soarhu: 极大地提高了效率!++赞👍技术 + 1
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

稍微修改一下,在第九行之后和:next之前添加一行
goto :eof
学习批处理,休息一下午

TOP

返回列表