level 1
不清楚你的实际文件/情况,仅以问题中的样例/说明为据;以下代码复制粘贴到记事本,另存为xx.bat,编码选ANSI,跟要处理的文件放一起双击运行
<# :
echo off&cls&mode con lines=3000
rem 将当前目录里名称中包含有不同字符串/关键字的文件的名称开头分别添加/插入不同数字序号
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312')))) -Args '%~f0'"
echo;%#% +%$%%$%/%_% %z%
pause
exit
#>
$dic=@{"路灯"="1-";"桌子"="2-";"椅子"="3-"}
$self=get-item -liter $args[0];
$path=$self.Directory.FullName;
[byte[]]$b=@(32,45,45,62,32);
$c=[Text.Encoding]::Default.GetString($b);
$files=@(dir -liter $path|?{($self.Name -ne $_.Name) -and ($_ -is [System.IO.FileInfo])});
for($i=0;$i -lt $files.length;$i++){
$oldbase=$files[$i].BaseName;
$newbase=$oldbase;
foreach($k in $dic.Keys){
if($oldbase.Contains($k)){
$newbase=$dic[$k]+$oldbase;
break;
}
}
if($oldbase -ne $newbase){
$newname=$newbase+$files[$i].Extension;
$files[$i].Name+$c+$newname;
}
}
2021年03月24日 07点03分