用脚本批量文件重命名(VBScript) |
您所在的位置:网站首页 › 批量新建文件夹并命名有空格怎么办 › 用脚本批量文件重命名(VBScript) |
用脚本批量文件重命名(VBScript)
原创
晓楚 2023-06-15 13:47:59 博主文章分类:编程与应用 ©著作权 文章标签 vbscript 脚本 each c 后缀 文章分类 Python 后端开发 ©著作权归作者所有:来自51CTO博客作者晓楚的原创作品,请联系作者获取转载授权,否则将追究法律责任 ''' filename: rename.vbs ''' http://blog.csdn.net/maray strFolder = "C:\Users\result\" Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.GetFolder(strFolder) Set colFiles = objFolder.Files For Each strFile in colFiles If Lcase(objFSO.GetExtensionName(strFile)) = "png" Then strNewName = Replace(strFile.Name, "_副本.png", ".png") objFSO.MoveFile strFile, strFolder & "\" & strNewName End If Next Set objFSO = Nothing有如下文件,利用上面的脚本rename.vbs可以将其批量改名,去掉“_副本"后缀 输入文件: C:\Users\result\JPG1001_副本.png C:\Users\result\JPG1002_副本.png C:\Users\result\JPG1003_副本.png C:\Users\result\JPG1004_副本.png C:\Users\result\JPG1005_副本.png C:\Users\result\JPG1006_副本.png C:\Users\result\JPG1001.png C:\Users\result\JPG1002.png C:\Users\result\JPG1003.png C:\Users\result\JPG1004.png C:\Users\result\JPG1005.png C:\Users\result\JPG1006.png 赞 收藏 评论 分享 举报上一篇:AppStore -- 天才的想法! 下一篇:用ctags来浏览源码 |
今日新闻 |
推荐新闻 |
CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3 |