展开全部
不清32313133353236313431303231363533e78988e69d8331333433626532楚你的实际文件/情况,仅以问题中的样例/说明为据
复制粘贴到记事本,另存为xx.bat,编码选ANSI,跟要处理的文件放一起运行
cls
@echo off
rem 打乱多个文件的原有排序/顺序并在文件名称开头添加递增的数字序号前缀
mode con lines=5000
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]::Default))) -Args '%~dp0'"
echo;%#% +%$%%$%/%@% %z%
pause
exit
#>
$path=$args[0].trimend('\');
$ext=@('.mp3');
$files=@(dir -liter $path|?{($ext -contains $_.Extension) -and ($_ -is [System.IO.FileInfo])});
for($i=0;$i -lt $files.length;$i++){
$newname=$files[$i].Name -replace '^\d+_','';
if($newname -ne $files[$i].Name){
$newfile=$files[$i].Directory.FullName+'\'+$newname;
if(-not (test-path -liter $newfile)){
mv -liter $files[$i].FullName $newfile;
};
};
};
$n=[Math]::Pow(10, $files.length.toString().length);
$files=@(dir -liter $path|?{($ext -contains $_.Extension) -and ($_ -is [System.IO.FileInfo])});
$list=@(get-random -input $files -count $files.length);
for($i=0;$i -lt $list.length;$i++){
$m=$n+$i+1;
$newname=$m.toString().Substring(1)+'_'+$list[$i].Name;
$newfile=$list[$i].Directory.FullName+'\'+$newname;
write-host ($list[$i].Name+' --> '+$newname);
}