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 |