Forse ho capito male
Quando lancio la procedura cambio il nome ai files, li sposto in una nuova directory e cancello la directory temporanea.
Quando lancio la procedura, nella directory temporanea ci sono solo files nuovi
Se è così io farei più o meno così
codice:
Dim nome As String = "immagine" 'nome nuovo dell'immagine
Dim dirTemp As String = "c:\tmp\tmp"
Dim dirArchiviate As String = "c:\tmp\archiviate"
Dim files As String() = Directory.GetFiles(dirTemp)
For i As Integer = 0 To files.Length - 1
File.Move(files(i), Path.Combine(dirArchiviate, String.Format("{1}_{0}_{2}", i, nome, Path.GetExtension(files(i)))))
File.Delete(files(i))
Next