Visual Basic - Copiar y sobreescribir archivos

Códigos Visual Basic

Con este simple codigo podemos copiar o sobreescribir archivos en nuestras aplicaciones. Debemos crear un modulo una vez creado el proyecto proyecto > agregar modulo. Posteriormente en el formulario debemos introducir el siguiente codigo, y un boton llamado por default Command1. En la linea 8 aparecen los paths hacia el archivo que pretendemos copiar o sobreescribir. Copiaremos el archivo miarchivo.Zip a la carpeta micarpeta, al hacer click sobre el boton Command1 Para no permitir sobreescribir debemos modificar en la misma linea False por True

Tutores.org

Inicio > Visual Basic

Visitas: 47,789 - 08/05/2004 22:22:59

CODIGO

// Codigo ofrecido por Tutores.org

' --------------- MODULO
Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal _
lpExistingFileName As String, ByVal lpNewFileName As String, ByVal _
bFailIfExists As Long) As Long
' --------------- FORMULARIO
Private Sub Command1_Click()
A = CopyFile("c:miarchivo.Zip", "c:micarpetamiarchivo.Zip", False)
If A Then
MsgBox "Archivo copiado!"
Else
MsgBox "El archivo no ha sido copiado por error!"
End If
End Sub

ENLACE AL CODIGO

Si quieres enlazar desde tu pagina a este codigo

<a title="Tutores.org - Copiar y sobreescribir archivos" href="http://www.tutores.org/codigo/1063/" target="_blank">Copiar y sobreescribir archivos</a>

COMENTARIOS

Comentario usuario

Di_ford 05-06-2007 20:48:54

3 5

El archivo no funciona declare A como long pero dice que "No se puede encontrar el punto de entrada denominado copyFileA en el archivo DLL kernel32"

Comentario usuario

buemar 05-02-2008 22:22:48

5 5

Gracias por esas líneas de código, en mi caso si funciona con VB .Net 2003

Di_Ford declare A como String no como long y veras que si funciona.

Comentario usuario

sergio 06/07/2004 17.04.57

1 5

Funciona excelente! xD gracias!

Comentario usuario

BebecitaBebecita

2 5

Funciona muy bien!!!

Comentario usuario

LAELAE

5 5

Funca exelentemente bien
gracias

Comentario usuario

SOL 17-05-2009 02:14:30

2 5

mUy bUeNo fElIcIdAdEs!!

Comentario usuario

PAOLA 04-12-2007 16:12:09

2 5

NO ENTIENDO BIEN LO QUE DICE.! JUM

Comentario usuario

rommelrommel

4 5

hola q tal yo soy u poco noob en esto de comprimir archivos y eso, estoy atorado en algo kiero saber como sobreescribo un archivo????

INSERTAR COMENTARIO

Usuario:
Email:
Comentario:
	Codigo Seguridad
	Antes de enviar un comentario... Todos los comentarios son revisados personalmente Todo comentario que no haga relacion al codigo mostrado en esta pagina sera eliminado Usuarios registrados tienen preferencia en recibir respuestas de ayuda!! Ademas de poder insertar Imagenes,Enlaces y otras propiedades del editor. Por favor, insertar los comentarios descriptivos.