如何写一个批处理文件(.bat)批量删除当前目录及子目录下的所有文件名中的‘_’？

发布网友发布时间：2022-04-29 14:58

共2个回答

热心网友时间：2023-10-13 11:53

把五个问号改成您要删除的字符。
set f=!f:_=!
其它字符的，按照这个样子写就行。

热心网友时间：2023-10-13 11:54

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起双击运行
<# :
cls&echo off&mode con lines=5000
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
#>
$word="_";
$self=get-item -liter $args[0];
$path=$self.Directory.FullName;
$files=@(dir -liter $path -recurse|?{($_.Name -ne $self.Name) -and ($_ -is [System.IO.FileInfo])});
for($i=0;$i -lt $files.length;$i++){
$oldbase=$files[$i].BaseName;
$newbase=$oldbase.replace($word,'');
if($oldbase -ne $newbase){
$newname=$newbase+$files[$i].Extension;
$newfile=$files[$i].Directory.FullName+'\'+$newname;
if(-not (test-path -liter $newfile)){
write-host ($files[$i].FullName+' --> '+$newname);
move-item -liter $files[$i].FullName $newfile -ErrorAction SilentlyContinue;
}else{
write-host ('[Duplicate]'+$files[$i].FullName+' --> '+$newname) -ForegroundColor red;
}
}
}