Ver Mensaje Individual
  #4 (permalink)  
Antiguo 07/10/2013, 12:40
wwwmaster
 
Fecha de Ingreso: noviembre-2002
Ubicación: DF
Mensajes: 1.056
Antigüedad: 21 años, 5 meses
Puntos: 37
Respuesta: Mover archivos a otra carpeta

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