Mover archivos a otra carpeta

[karlosc]

Buenas noches amigos, tengo una inquietud
resulta que deseo mover una serie de archivos de una carpeta a otra pero al presionar el boto mover me dice que
no se puede crear una archivo que ya existe
este mensaje me sale apesar de tener la carpeta D:\temp vacia
aqui el codigo para ver si alguien observa que estoy haciendo mal

Private Sub MoverToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles MoverToolStripMenuItem.Click
Dim files() As String = Directory.GetFiles("D:\Nprueba\bal", "*.exe")
For Each item In files
Dim destino As String = Path.Combine("D:\Nprueba\bal", Path.GetFileName(item))
IO.File.Move(item, "D:\temp\prueba.exe")

Next
End Sub
End Class

Saludos,

[wwwmaster]

Si no mal recuerdo:
Copy te permite copiar y reemplazar, con algo asi: IO.File.Copy(item, "D:\temp\prueba.exe", TRUE)


Move no te permite reemplazar un archivo if Exist, debes borrarlo primero.

Saludos

[karlosc]

Gracias compañero por responder, mire que tengo la carpeta temp vacia y aun asi me dice
no se puede crear un archivo que ya existe la verdad no se a que se debe.

usted me puede facilitar el codigo de moverlo y si existe eliminarlo en tal caso que exista.

Saludos, y gracias por la ayuda

[wwwmaster]

Dim SourceFiles As FileInfo()

For Each SourceFile As FileInfo In SourceFiles

If System.IO.File.Exists(strFileDestPath & "\" & SourceFile.Name) Then
Log(" el XML " & strFileDestPath & "\" & SourceFile.Name & " ya existe.. se borrara para sobreescribirlo ")

File.Delete(strFileDestPath & "\" & SourceFile.Name)
End If

SourceFile.MoveTo(strFileDestPath & "\" & SourceFile.Name)

next