Board logo

标题: [文件操作] [已解决]用批处理检查文件名数字名问题? [打印本页]

作者: czvde    时间: 2019-11-20 21:37     标题: [已解决]用批处理检查文件名数字名问题?

本帖最后由 czvde 于 2019-11-21 19:33 编辑

文件夹里面的文件:
IMG_001.pdf
IMG_003.pdf
………………
IMG_100.pdf

批处理效果
abc.txt文本内容如下:
IMG_002.pdf

问题已解决
作者: terse    时间: 2019-11-21 09:24

IMG01_002
IMG01_396
上面这两个怎么来的
作者: flashercs    时间: 2019-11-21 12:04

本帖最后由 flashercs 于 2019-11-21 18:47 编辑
  1. <#*,:&cls
  2. @echo off
  3. pushd "%~dp0"
  4. Powershell -NoProfile -ExecutionPolicy RemoteSigned -Command ". ([ScriptBlock]::Create((Get-Content -LiteralPath \"%~0\" -ReadCount 0 | Out-String ))) "
  5. popd
  6. pause
  7. exit /b
  8. #>
  9. $hash = @{ }
  10. Split-Path -Path (Convert-Path -Path *_*) -Leaf | ForEach-Object {
  11.   if ((Test-Path -LiteralPath $_ -PathType Leaf) -and ($_ -match '^([^_]+_)(\d+)')) {
  12.     if (-not $hash.ContainsKey($Matches[1])) {
  13.       $hash.Add($Matches[1], (New-Object 'System.Collections.Generic.List[int]'))
  14.     }
  15.     $hash.Item($Matches[1]).Add($Matches[2] -as [int])
  16.   }
  17. }
  18. $hash.GetEnumerator() | ForEach-Object {
  19.   $iList = $_.Value
  20.   $iList.Sort()
  21.   $ii = $iList.Item($iList.Count - 1) -as [int]
  22.   for ($i = 1; $i -le $ii; $i++) {
  23.     if (-not $iList.Contains($i)) {
  24.       '{0}{1}' -f $_.Key, ([string]$i).PadLeft(3, [char]'0')
  25.     }
  26.   }
  27. } | Set-Content .\abc.txt
复制代码

作者: czvde    时间: 2019-11-21 17:38

本帖最后由 czvde 于 2019-11-21 19:33 编辑

回复 2# terse


问题已解决
作者: czvde    时间: 2019-11-21 18:05

本帖最后由 czvde 于 2019-11-21 19:34 编辑

回复 3# flashercs



感谢!
作者: flashercs    时间: 2019-11-21 18:48

回复 5# czvde


    修改了




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