SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: cee en Martes 13 de Septiembre de 2005, 16:39

Título: Mover Archivos
Publicado por: cee en Martes 13 de Septiembre de 2005, 16:39
hola

quisiera algun ejemplo o alguna ayuda para mover un archivo a otro carpeta

por ejemplo: tengo un archivo image.jpg en c:\cesar  y quiero llevarlo a  d:\fotos\

como se puede hacer esto en vb?????


gracias a todos
Título: Re: Mover Archivos
Publicado por: Juanolo en Martes 13 de Septiembre de 2005, 18:47
Hola,
Visual, para esto, tiene la función FileCopy

Código: Text
  1. FileCopy "C:\cesar\Archivo.jpg", "D:\Fotos\Archivo.jpg"
  2.  
Otra opción es usar la función Api CopyFile. La ventaja, es que la anterior no funciona cuando el archivo está abierto y puede dar errores.

Para utilizarla, primero debes declararla. En el caso del ejemplo, se hizo en un módulo para hacerla pública.

Código: Text
  1. Public Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
  2.  
Se usa en forma muy similar.

Código: Text
  1. CopyFile "C:\cesar\Archivo.jpg", "D:\Fotos\Archivo.jpg",0
  2.  
el último parámetro (0) es para que copie a pesar de estar el archivo bloqueado.

Bueno, espero te sirva.

Salu2.
Título: Re: Mover Archivos
Publicado por: Sagutxo en Martes 13 de Septiembre de 2005, 21:14
Salu2.

Yo utilizo el comando Name y me va bien, eso si primero me aseguro de que el fichero no existe donde lo voy a mover.

Name NomOriginal As NombreNuevo

Código: Text
  1. Name "c:\cesar\image.jpg as d:\fotos\image.jpg
  2.  

Espero que te sirva.
 :smartass: