Rinominare partendo dl vecchio nome.

[fabio309]

prova con uno script tipo

Const cartella = "c:\temp"
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(cartella)
Set objFolderItem = objFolder.Self
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colItems = objFolder.Items
dim nuovo_nome
cont=151
For Each objItem in colItems
	nuovo_nome="client" & cont
	objFSO.CopyFile "c:\temp\" & objItem.name , "C:\Temp\" & nuovo_nome, OverwriteExisting    
	cont=cont + 1
Next