rinominare un file con fso

[dops]

ciao, sono in locale e vorrei scrive un file vbs (da eseguire in locale) con il quale vorrei rinominare i nomi dei file nella cartella in cui eseguo il file.. più che rinominare dovrei eliminare gli ultimi tre caratteri, che saranno "-01" per tutti i files.. qualcuno ha qualche idea su come potrei procedere? Certo c'è bisogno di fso, ma la rinomina del file non l'ho mai fatta

[imente]

fatto un FSO con il file

avendo il nome del file

FSO.Movefile("nomecartella/nomefile-01.txt","nomecartella/nomefile.txt")

usi un REPLACE(strNomefile,"-01","") per avere il nome del file senza lo "-01"

[dops]

Originariamente inviato da imente
fatto un FSO con il file

avendo il nome del file

FSO.Movefile("nomecartella/nomefile-01.txt","nomecartella/nomefile.txt")

usi un REPLACE(strNomefile,"-01","") per avere il nome del file senza lo "-01"

grazie mille

[imente]

di nulla.
ciao