#@&cls&powershell "type %~s0|out-string|iex"&pause&exit
$a=gc a.txt
$shell=(new-object -com Shell.Application).namespace("$pwd")
$a|%{
$n=$_ -split ','
$shell.items()|?{$_.name -eq $(gi "$($n[0])*").name}|{
$wh=if($shell.GetDetailsOf($_, 31) -ne ''){
$shell.GetDetailsOf($_, 31) -split 'x' -replace '[^\d]'
$type='视频'
}elseif($shell.GetDetailsOf($_, 285) -ne ''){
$shell.GetDetailsOf($_, 285)
$shell.GetDetailsOf($_, 283)
$type='图片'
}
if($wh -ne $null){
$nn='{0:d6}' -f [int]$($_.name -replace "$n[0]" -split '.')[0]
ren $_.name $('{0}{1}__{2}--({3}x{4})--{5}' -f $type,$n[1],$nn,$wh[0],$wh[1],$_.name)
rv wh
}
}
}
复制代码

Invoke-Expression : 只允许将表达式作为管道的第一个元素。
所在位置 行:1 字符: 36
+ type d:\测试\a.bat|out-string|iex <<<<
    + CategoryInfo          : ParserError: (:) [Invoke-Expression], ParseExcep
   tion
    + FullyQualifiedErrorId : ExpressionsMustBeFirstInPipeline,Microsoft.Power
   Shell.Commands.InvokeExpressionCommand

请按任意键继续. . .
复制代码

$shell.items()|?{$_.name -eq $(gi "$($n[0])*").name}|%{
复制代码

请按任意键继续. . .
复制代码

#&cls&@cd /d "%~dp0" & powershell -c "Get-Content '%~0' | Out-String | Invoke-Expression" & pause&exit
$shell = New-Object -ComObject 'Shell.Application'
$folder = $shell.NameSpace($PWD.Path)
#打开txt
$txts = Get-Content 'a.txt'
#找索引
$i = $index1 = $index2 = $index3 = $index4 = 0
while(!($index1 -and $index2 -and $index3 -and $index4)){
	if($folder.GetDetailsOf($null,$i) -eq '高度'){
		$index1 = $i
	}
	elseif($folder.GetDetailsOf($null,$i) -eq '宽度'){
		$index2 = $i
	}
	elseif($folder.GetDetailsOf($null,$i) -eq '帧高度'){
		$index3 = $i
	}
	elseif($folder.GetDetailsOf($null,$i) -eq '帧宽度'){
		$index4 = $i
	}
	++$i
}
#重命名
$folder.Items() | foreach {
	$__ = $_
	$t = $name = $null
	if($_.Name -match '^(.*?)\d+\.((png)|(jpg))$'){
		$t = '图片'; $name = $Matches[1]; $a = $index1; $b = $index2
	}
	elseif ($_.Name -match '^(.*?)\d+\.mp4$'){
		$t = '视频'; $name = $Matches[1]; $a = $index3; $b = $index4
	}
	if($t -ne $null -and $a -match '\d'){
		$b_find = $true
		$txts | foreach{ 
			if($b_find -and ($_ -match ('^{0}\d*,(.*?)$' -f $name)) ){
				$h = $folder.GetDetailsOf($__,$a) -replace '[^\d]',''
				$w = $folder.GetDetailsOf($__,$b) -replace '[^\d]',''
				$new_name = '{0}{1}__123--({2}x{3})——{4}' -f $t,$Matches[1],$h,$w,$__.Name
				$__.Name
				$new_name
				Rename-Item $__.Path $new_name
				$b_find = $false
				'---------------------------'
			}
		}
	}
}
复制代码

请按任意键继续. . .
复制代码

@echo off
REM 根据自己电脑实际情况设置ffmpeg的路径
set "path=C:\Program Files\ffmpeg-n4.4-83-gb1f2d203c0-win64-gpl-4.4\bin;%path%"
setlocal enabledelayedexpansion
cd /d "%~dp0"
for /f "tokens=1-2 delims=," %%i in ('type "a.txt"') do (
    for /f "delims=" %%a in ('dir /b /a-d *.mp4 *.jpg *.png ^| findstr /v /i /b /c:"视频" /c:"图片" ^| findstr /i /b "%%i"') do (
        if /i "%%~xa" equ ".mp4" (
            call :GetVideoInfo "%%a"
            ren "%%a" "视频%%j__123--（!str!）——%%a"
        ) else if /i "%%~xa" equ ".jpg" (
            call :GetJpgInfo "%%a"
            ren "%%a" "图片%%j__123--（!str!）——%%a"
        ) else if /i "%%~xa" equ ".png" (
            call :GetPngInfo "%%a"
            ren "%%a" "图片%%j__123--（!str!）——%%a"
        )
    )
)
goto :eof

:GetVideoInfo
for /f "tokens=10" %%x in ('ffmpeg -i "%~1" 2^>^&1 ^| find "Video:"') do (
    set "str=%%x"
)
goto :eof

:GetJpgInfo
for /f "tokens=8" %%x in ('ffmpeg -i "%~1" 2^>^&1 ^| find "Video:"') do (
    set "str=%%x"
)
goto :eof

:GetPngInfo
for /f "tokens=6" %%x in ('ffmpeg -i "%~1" 2^>^&1 ^| find "Video:"') do (
    set "str=%%x"
)
goto :eof
复制代码