Mover Fotos

[megamelo2 0]

bom pessoal e o seguinte:
o meu programa cria uma copia de fotos e joga em um determinado diretório, eu preciso que ele copie a foto indiferente se existe uma copia dela no destino ou não, na realidade eu precisaria dar um jeito que ele verificasse se a foto existe no destino e tirasse copia das fotos com um nome diferente... segue meu código
Dim p As String = TextBox7.Text
Dim dir As String = "c:\tete\"
Dim na As String
na = Path.GetFileName(p)
Dim Destino As String = Path.Combine(dir, na)
File.Copy(TextBox7.Text, Destino)

obrigado a todos

[KhaosDoctor 242]

Tirasse as cópias com um nome diferente? Não entendi...