Cách đổi tên file hàng loạt dùng script vbs

Để đổi tên file hàng loạt kiểu anh-1.jpg, anh-2.jpg,anh-3.jpg ........
Bước 1: Bạn cần copy tất cả hình ảnh vào chung một Folder.
Bước 2: Bạn mở Notepad ra và dán đoạn code sau vào và lưu lại với tên bất kỳ có đuôi là *.vbs

set fso = CreateObject("Scripting.FileSystemObject")
set root = fso.getFolder("C:\Users\linkxinh\Downloads\Compressed\Folder")
Dim number
for each file in root.Files
file.Name = "anh-" & number & "." & fso.GetExtensionName(file.Name)
number=number+1
next

Còn không biết làm nữa thì dùng phần mềm cho nhanh