[文件操作] [已解决]求一个截取KB补丁号的批处理

stance

现在有一堆Windows XP 更新补丁在文件夹里，想从中提取出更新补丁号码到文本中。
原文件名有如下8种类型：
IE8-WindowsXP-KB971961-x86-CHS.exe
msxml4-KB954430-chs.exe
WindowsXP-KB923561-x86-CHS.exe
WindowsXP-WindowsMedia-KB952069-v2-x86-CHS.exe
ndp20sp2-kb976576-x86_8e8121a8bddfb2095453335c593ffa22ef8e95ec.exe
windows-kb890830-v4.13-delta_68a9d9cc7be6710084ea178dd427b63c7d763dfd.exe
windowsxp-kb2296011-x86-chs_0f105045c23834baa6dfb662f55152b71f1be67b.exe
windows-zh-cn-kb2564958_2fa3610df66fd668b67b9d6d30da008741903c67.exe

想要的结果:
KB971961
KB954430
KB923561
KB952069
kb976576
kb890830
kb2296011
kb2564958

因为还要用此批处理做其他用途，希望语句简洁，移植性强。

apang

@echo off
(for %%a in (*.exe) do (
  set "Name=%%~na"
  setlocal enabledelayedexpansion
  set "Name=!Name:-=" "!"
  for %%b in ("!Name:_=" "!") do (
    set "str=%%~b"
    set "a=%%~b"
    for /l %%c in (0 1 9) do set "a=!a:%%c=!"
    if /i "!str:~,2!"=="kb" if /i "!a!"=="kb" echo,!str!
  )
  endlocal
))>List.txt
复制代码

简洁、移植性强的偶写不出来啊。。。

stance

回复 2# apang


    谢谢谢谢！敬佩。

CrLf

回复 2# apang


    另一种写法，循环次数少，但是不太好理解...

@echo off
(for %%a in (*KB*.exe) do (
  set "Name=%%~na"
  setlocal enabledelayedexpansion
  for /f "delims=-_" %%b in ("!Name:*KB=KB!") do (
    endlocal
    for /f "tokens=1* delims=0123456789" %%c in ("%%b$") do (
       if /i %%c%%d==KB$ echo %%b.exe
    )
  )
))>List.txt
复制代码

不过现在想想其实不严谨，要是文件名中有多处 KB 可能会漏判，还是 apang 的代码比较通用

stance

回复 4# CrLf


   谢谢 CrLf！
不过，我运行一下，输出结果为空。
想改一下，又确实不好理解。是不是%%c%%d==KB.exe这一句？……

CrLf

回复 5# stance


    原先写的有逻辑误区，已修改

apang

回复 4# CrLf


    delims=0123456789 这个方法不错，学习了。

wc726842270

呵呵，ZM的SETLOCAL的位置很有意思，很值得学习，级时的结束以提高效率

CrLf

回复 8# wc726842270


    其实主要目的还是在确保 endlocal 与 setlocal 能一一对应的情况下，避免 %%b 含 ! 号产生意外结果...