'''Filename: Rename. vbs ''' http://blog.csdn.net/maraystrFolder = "C: \ Users \ Result \" set objfso = Createobject ("scripting. fileSystemObject ") set objfolder = objfso. getfolder (strfolder) set colfiles = objfolder. filesfor each strfile in colfiles if lcase (objfso. getextensionname (strfile) = "PNG" then strnewname = Replace (strfile. name, "_ ..png ",". PNG ") objfso. movefile strfile, strfolder & "\" & strnewname end ifnextset objfso = nothing
There are the following files. You can use the above script rename. vbs to rename them in batches and remove the suffix "_ copy ".
Input file:
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
Output file:
C:\Users\result\JPG1001.pngC:\Users\result\JPG1002.png
C:\Users\result\JPG1003.png
C:\Users\result\JPG1004.pngC:\Users\result\JPG1005.png
C:\Users\result\JPG1006.png