PakTC

修改自 9 楼 apang 胸的代码：代码会短一些，但可读性其实很差
CrLf 发表于 2014-5-4 02:46

    “apang胸”

PakTC

重命名这种事情要是没有特殊控制字符干嘛要用vbs？

回复 14# CrLf

@echo off
setlocal enabledelayedexpansion
for /l %%a in (1,1,99) do (
    set sn=0%%a
    set sn=!sn:~-2!
    if exist *[!sn!]*.txt (
        call :next *[!sn!]*.txt !sn!
    )
)
echo 修改之后的文件列表：
dir /b *.txt
pause
exit
 
:next
 echo "%~f1"
 ren "%~f1" !sn!.txtCOPY

输出结果

"C:\新建文件夹\###[01]#####.txt"
"C:\新建文件夹\复件 ###[02]#####.txt"
"C:\新建文件夹\复件 (3) ###[03]#####.txt"
"C:\新建文件夹\复件 (2) ###[04]#####.txt"
修改之后的文件列表：
01.txt
02.txt
03.txt
04.txt

PakTC

回复 25# CrLf


不要做拖放了，用vbs循环访问剪切板中的信息。当出现目录的时候，对该目录进行重命名操作。
这样就只要在指定目录按ctrl+c就可以执行操作了。