
28/01/2005, 09:16
|
 | | | Fecha de Ingreso: marzo-2004 Ubicación: Lima
Mensajes: 307
Antigüedad: 21 años, 1 mes Puntos: 1 | |
bueno hay un control que se llma dir,drivey file eso te genera un explorador dentro del visula basic en el drive automaticamnete te salen topdas klas unidades de tu pc y en el dir si tienes que porgramar
Private Sub Drive1_Change()
On Error GoTo xerr
Dir1.Path = Drive1.Drive 'Establece la ruta al objeto Dir
Exit Sub
xerr:
MsgBox "No esta lista la unidad", vbExclamation, "Mensaje"
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path 'Establece la ruta al objeto File
End Sub
ahora si quieres llamar al explorador podrias hacrelo con shell("explore.exe")
por siaca estos controles estan disponibles en la barra de herramientas |