[文件操作] 求助鼠标选几个文件拖到bat上就可以重命名

myacg

一个中文改数字的bat
应用对象是“bat所在文件夹下的所有文件”这个改成“当前选择的文件（任意文件夹）”就是用鼠标选几个文件拖到bat上就可以重命名的那种。

@echo off


for /f "delims=" %%i in ('dir /b') do call :Replacement "%%i"


exit


:Replacement


set t1=%~1


set t1=%t1:九十=90%


set t1=%t1:八十=80%


set t1=%t1:七十=70%


set t1=%t1:六十=60%


set t1=%t1:五十=50%


set t1=%t1:四十=40%


set t1=%t1:三十=30%


set t1=%t1:二十=20%


set t1=%t1:十一=11%


set t1=%t1:十二=12%


set t1=%t1:十三=13%


set t1=%t1:十四=14%


set t1=%t1:十五=15%


set t1=%t1:十六=16%


set t1=%t1:十七=17%


set t1=%t1:十八=18%


set t1=%t1:十九=19%


set t1=%t1:十=10%


set t1=%t1:九=9%


set t1=%t1:八=8%


set t1=%t1:七=7%


set t1=%t1:六=6%


set t1=%t1:五=5%


set t1=%t1:四=4%


set t1=%t1:三=3%


set t1=%t1:二=2%


set t1=%t1:一=1%


set t1=%t1:零=0%


set t1=%t1:09=9%


set t1=%t1:08=8%


set t1=%t1:07=7%


set t1=%t1:06=6%


set t1=%t1:05=5%


set t1=%t1:04=4%


set t1=%t1:03=3%


set t1=%t1:02=2%


set t1=%t1:01=1%


echo %t1%


ren %1 "%t1%"


goto :eof
复制代码

myacg

回复 3# /zhqsystem/zhq
能麻烦高人直接贴一下修改版好吗，小白一个。

myacg

回复 5# went

好像只能执行选择的第一个文件。。。
而且希望能够不跳出确认框框，直接执行就行。可以吗，谢谢。

myacg

回复 2# xczxczxcz
谢谢，能改成不提示操作那种吗，直接运行就好了。

myacg

回复 8# went


    非常感谢！