Rinominare file in ordine decrescente

[szannotti]

Devo rinominare dei file chiamati "news10.txt", "news11.txt" ecc. in modo che il numero associato sia MAGGIORE di uno. Cioè :

"news5.txt" deve diventare "news6.txt"
"news4.txt" deve diventare "news5.txt"
"news3.txt" deve diventare "news4.txt"
ecc. ecc.

Da notare che i file potrebbero anche non esserci.
Ordunque, ho provato con il seguente codice ma mi fa rinominare solo l'ultimo file. Gli altri non vengono rinominati.. Come mai??



FOR xxx = totale TO 1 STEP -1

StrFile = Server.MapPath("news"&CInt(xxx)&".txt")
StrFile2 = Server.MapPath("news"&CInt(xxx)+1&".txt")
Set fso = CreateObject("Scripting.FileSystemObject")
IF (fso.FileExists(StrFile))=true THEN
fso.MoveFile StrFile, StrFile2
END IF

NEXT
Set fso = Nothing

[vaargard]

senza darti alcun errore?

(togli on error se presente)

[szannotti]

si, mi da errore; non ci sono On Error. Lo script viene richiamato da FlashMX.
Non so, mi chiedo se sia possibile che non faccia rinominare i precedenti file perchè la procedura di "MOVE" richiede un certo tempo, e così mentre rinomina "news9.txt" "news10.txt", news8 non può essere rinominato news9 perchè news9 è ancora "occupato" dal MOVE??? boh...

[vaargard]

e non hai la descrizione dell'errore che ti viene restituito? ...

[szannotti]

no; Flash dopo aver richiamato lo script deve eseguire altre operazioni...che non esegue.

[optime]

se vai al contrario, non funzionera'... ogni passo indietro che fai, troverai il precedente gia' rinominato...

[szannotti]

aspetta... se ho:

10.txt
9.txt
8.txt
7.txt


e faccio:

10.txt ---> 11.txt
9.txt --> 10.txt
8.txt --> 9.txt
7.txt --> 8.txt


Allora dovrebbe funzionare...

[optime]

ma non dovevi decrementarli? (cfr tuo primo post)

[szannotti]

ho sbagliato, volevo dire INCREMENTARE di uno mentre il numero associato al file DECRESCE... non posso rinominarli a partire dal più piccolo per ovvie ragioni

[optime]

il codice pare buono... ti da' qualche errore?