闲来无事，正好需要批量修改一些文件的名字。
一个简单的实现如下：
set objfso=createobject("scripting.filesystemobject")
set objfiles=objfso.getfolder(".").files
for each objfile in objfiles
newname = replace(objfile.name,"[APTX4869]","")
if objfile.name <> newname then
objfile.name = newname
end if
next
set objfiles=nothing
set objfso=nothing
橙色部分根据自己的修改规则进行替换。在记事本中另存为vbs，拷贝到相应目录下执行即可。
