首页 > 技术 > vbs批量重命名脚本

vbs批量重命名脚本

2009年12月3日 发表评论 阅读评论

功能::假设有个文件夹的所有文件名称前面有个AA_开头,这个小脚本的作用就是删除这个AA_。只是简单的小脚本,如果还有多个”_”字符的时候,重复使用有可能会全部都删除了。

使用:dir填写实际文件所在目录;target填写要分割的字符,保存为.VBS文件,双击运行。做好备份,因为是直接修改原始文件!

dir=("C:\Users\海军\Desktop\104CANON")
target=("_")

Set fso = CreateObject("Scripting.FileSystemObject")
set rfd=fso.getfolder(dir)
set fs=rfd.files
for each f in fs

        If InStr(f.name,target) Then
            length=Len(f.name)
            star=InStr(f.name,target)
            newname=Right(f.name,length-star)
            f.name=newname
        End If

Next

分类: 技术 标签: ,
  1. 本文目前尚无任何评论.
  1. 本文目前尚无任何 trackbacks 和 pingbacks.
您必须在 登录 后才能发布评论.