Question

如何用BAT删除文件名中特定的几个字？

我有个文件夹中有几十个文件，是不同格式的，
我想删除每个文件名字中的“ - airvideo”两字
请高手帮我写个批处理命令

文件名中有空格，不知道有没有影响
还有因为某些原因，BAT最好是可以指定文件夹，因为BAT不能放在文件夹里面

我的文件夹目录是G:\AirVideo提取处\

Answer 1

说明（重要）：set str=- airvideo就是设置你要替换的字符。
如果字符哗誉饥（- airvideo）前面有空格，就这样虚派（set str= - airvideo）
也就是说一个空格也是按一个字符处理的。
@echo off
set fol=G:\乱返AirVideo提取处\
set str=- airvideo
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /s /b "%fol%*.*"') do (set a=%%~fi& set b=%%~ni& set c=%%~xi
set b=!b:%str%=!
ren "!a!" "!b!!c!")

Answer 2

文件名中有空格，没有影响

“- airvideo”前面是部分文件名吗？必须完整保留一模一样吗？如果“是”采用方法一，“否”采用方法二。

方法一：
你复制下面完整的这一行：
dir "G:\AirVideo提取处" >c:\tmp.txt
打开“命令提示符”，右击黑色的命令提示符窗口，粘贴
然后把c:\tmp.txt发给我，我看看文昌余件名的样子编好BAT发给你。 我的邮箱：wdzlg@126.com

方法二：握唤
用我的电脑打开“G:\AirVideo提取处”文件夹，
然后按Ctrl+A全选，
按F2键，
输入：XXX.M4V
回车。文件名就自动重命名为段迅凯：
XXX (1).M4V
XXX (2).M4V
XXX (3).M4V
XXX (4).M4V
……

Answer 3

Dim fso
Set fso = CreateObject("scripting.filesystemobject")
Dim target,tmp
target=choosefolder()
If Len(target)<>闹镇0 Then
Set fs=fso.GetFolder(target).Files
For Each f In fs
tmp=Replace(f.name," - airvideo","")
f.Name=tmp
Next
End If
set fso=nothing

Function choosefolder()
Dim aShell
set aShell = CreateObject("Shell.application")
Set folder=aShell.BrowseForFolder(0,"选择目标文件夹",0)
If Not folder Is nothing then 'MsgBox folder.self.path
choosefolder=folder.self.path
Else
choosefolder=""
End If
End Function

'存液游粗磨简成vbs，有选择文件夹的对话框。

Answer 4

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /s "G:\AirVideo提取处\*.*"') do (for /f "usebackq delims=" %%j in ("%%~fi") do (set a=%%j
set a=!a:- airvideo=!
echo !a! >>%%~dpinew%%~nxi
)
)
::会把腊穗修改的文件都放在“new原文肆没件名”中。
::如果轮雹卜文件较多，运行的时间会很长。

Answer 5

@echo off& setlocal enabledelayedexpansion
for /f "delims=" %%1 in ('dir /a /b'衫镇简) do (set wind=%%1
ren "或裤%%~1" "!wind:文档旅则=!")