• Lunes 23 de Diciembre de 2024, 01:01

Autor Tema:  Mover Archivos  (Leído 1079 veces)

cee

  • Miembro activo
  • **
  • Mensajes: 40
    • Ver Perfil
    • http://www.parche.tk
Mover Archivos
« en: Martes 13 de Septiembre de 2005, 16:39 »
0
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

Juanolo

  • Miembro MUY activo
  • ***
  • Mensajes: 202
    • Ver Perfil
Re: Mover Archivos
« Respuesta #1 en: Martes 13 de Septiembre de 2005, 18:47 »
0
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.
La luz que sólo se ilumina a sí misma, es oscuridad.

Sagutxo

  • Miembro MUY activo
  • ***
  • Mensajes: 320
    • Ver Perfil
Re: Mover Archivos
« Respuesta #2 en: Martes 13 de Septiembre de 2005, 21:14 »
0
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:
Mi mujer tiene un físico bárbaro!!!. Einstein.