求高手给一代码：批量将文件名小写改为大写(后辍为小写)

批量将文件名中的字母改成大写:

第一步，电脑上安装“优速文件批量重命名”软件后打开，然后点击【添加文件按钮】将需要修改名称的文件全部添加到软件中，支持批量处理，所以可以将不同文件夹内的文件全部添加到里面。

第二步，然后在软件左边进行设置，命名方式选择“替换”；大小写转换选择“全部大写”，这时可以在新文件名中可以看到小写的字母全部变成了大写。

第三步，如果预览效果没有问题，就可以点击【批量重命名】按钮，开启批量处理了，当软件弹出“批量重命名成功”的弹窗，说明操作完成了。

第四步，通过对比处理前后的文件，可以看出文件名中的小写字母全部转换成了大写。

亲你好请用以下代码试试吧
请在需要换名的文件夹下使用
@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!")

不清楚你的实际文件/情况，仅以问题中的说明为据
复制粘贴到记事本，另存为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);
    }
}

用软件不是更好