求高手给一代码：批量将文件名小写改为大写(后辍为小写)
(后辍名为小写)［不管本身后辍名是大写还是小写最终结果后辍名为小写］
批命令在当前文件夹下运行，并只针对当前文件夹以及当前文件夹的子目录孙目录及所有文件。不要软件，要用批处理命令代码来达到要求。万谢！！！
批量将文件名中的字母改成大写:
第一步，电脑上安装“优速文件批量重命名”软件后打开，然后点击【添加文件按钮】将需要修改名称的文件全部添加到软件中，支持批量处理，所以可以将不同文件夹内的文件全部添加到里面。
第二步，然后在软件左边进行设置，命名方式选择“替换”；大小写转换选择“全部大写”，这时可以在新文件名中可以看到小写的字母全部变成了大写。
第三步，如果预览效果没有问题，就可以点击【批量重命名】按钮，开启批量处理了，当软件弹出“批量重命名成功”的弹窗，说明操作完成了。
第四步，通过对比处理前后的文件，可以看出文件名中的小写字母全部转换成了大写。
温馨提示：答案为网友推荐，仅供参考
第1个回答 推荐于2017-11-25
亲你好请用以下代码试试吧
请在需要换名的文件夹下使用
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /s/b/a') do (
set "h=%%~ni"&set "k=%%~xi"
for %%j in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do set "h=!h:%%j=%%j!"
for %%p in (.) do set "k=!k:%%p=%%p!"
ren "%%i" "!h!!k!")本回答被提问者和网友采纳
请在需要换名的文件夹下使用
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /s/b/a') do (
set "h=%%~ni"&set "k=%%~xi"
for %%j in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do set "h=!h:%%j=%%j!"
for %%p in (.) do set "k=!k:%%p=%%p!"
ren "%%i" "!h!!k!")本回答被提问者和网友采纳
第2个回答 2020-03-03
不清楚你的实际文件/情况，仅以问题中的说明为据
复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起运行/*&cls
@echo off
rem 将文件名中的小写字母转成大写字母
mode con lines=3000
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
for /f "tokens=1* delims=|" %%a in ('dir /a-d/b/s^|cscript -nologo -e:jscript "%~f0"') do (
if /i "%%~nxa" neq "%~nx0" (
echo;"%%a" --^> "%%b"
rem ren "%%a" "%%b"
)
)
:end
echo;%#% +%$%%$%/%@% %z%
pause
exit
*/
var fso=new ActiveXObject('Scripting.FileSystemObject');
while(!WSH.StdIn.AtEndOfStream){
var line=WSH.StdIn.ReadLine();
var f=fso.GetFile(line);
var basename=fso.GetBaseName(f.Path);
var extname=fso.GetExtensionName(f.Path);
var newname=basename.toUpperCase()+(extname==''?'':'.'+extname.toLowerCase());
if(newname != f.Name){
WSH.echo(line+'|'+newname);
}
}
复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起运行/*&cls
@echo off
rem 将文件名中的小写字母转成大写字母
mode con lines=3000
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
for /f "tokens=1* delims=|" %%a in ('dir /a-d/b/s^|cscript -nologo -e:jscript "%~f0"') do (
if /i "%%~nxa" neq "%~nx0" (
echo;"%%a" --^> "%%b"
rem ren "%%a" "%%b"
)
)
:end
echo;%#% +%$%%$%/%@% %z%
pause
exit
*/
var fso=new ActiveXObject('Scripting.FileSystemObject');
while(!WSH.StdIn.AtEndOfStream){
var line=WSH.StdIn.ReadLine();
var f=fso.GetFile(line);
var basename=fso.GetBaseName(f.Path);
var extname=fso.GetExtensionName(f.Path);
var newname=basename.toUpperCase()+(extname==''?'':'.'+extname.toLowerCase());
if(newname != f.Name){
WSH.echo(line+'|'+newname);
}
}
第3个回答 2012-11-06
用软件不是更好
相似回答