Publicentral.com - promocion,paginas,web,tutores,publicentralPromocion de paginas webs
Mostrando Codigo - Visual Basic
Code

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
Visitas: 45,268 - 08/05/2004 22:22:59
CODIGO SIN DEMOSTRACIONNO CONTIENE ARCHIVO DESCARGABLEComentario
CODIGO


// Codigo ofrecido por Tutores.org

  1. ' --------------- MODULO
  2. Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal _
  3. lpExistingFileName As String, ByVal lpNewFileName As String, ByVal _
  4. bFailIfExists As Long) As Long
  5.  
  6. ' --------------- FORMULARIO
  7. Private Sub Command1_Click()
  8. A = CopyFile("c:miarchivo.Zip", "c:micarpetamiarchivo.Zip", False)
  9. If A Then
  10. MsgBox "Archivo copiado!"
  11. Else
  12. MsgBox "El archivo no ha sido copiado por error!"
  13. End If
  14. End Sub



ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Copiar y sobreescribir archivos" href="http://www.tutores.org/codigo/1063/" target="_blank">Copiar y sobreescribir archivos</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS
Comentario usuario
05-06-2007 20:48:54
5 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
05-02-2008 22:22:48
3 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
06/07/2004 17.04.57
3 5
Funciona excelente! xD gracias!
Comentario usuario
Bebecita
2 5
Funciona muy bien!!!
Comentario usuario
LAE
5 5
Funca exelentemente bien
gracias
Comentario usuario
17-05-2009 02:14:30
5 5
mUy bUeNo fElIcIdAdEs!!
Comentario usuario
04-12-2007 16:12:09
4 5
NO ENTIENDO BIEN LO QUE DICE.! JUM
Comentario usuario
rommel
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.