RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  67625 - VB 6.0 COPIAR Y MOVER
Autor:  Rodrigo Torres
Estoy haciendo un ejercicio utilizando DriveListBox, DirListBox y FileListBox , y debo hacer 3 botones (eliminar, copiar y mover ) , utilizando el código correspondiente , hasta ahorita llevo esto:

Dim ruta As String, nombre As String

Private Sub cmdEliminar_Click()
Kill (ruta + nombre)
File1.Refresh
End Sub

Private Sub Dir1_Change()
File1.Path = Dir1.Path
ruta = File1.Path + ""
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Private Sub File1_Click()
n = File1.ListIndex
nombre = File1.List(n)
End Sub

,esta bien lo que llevo, no hay que corregir nada , solamente me falta el código de copiar y mover ,
espero y puedan ayudarme con esos 2 botones.
Gracias


Nombre
Apellidos
Correo
Comentarios