Ver Mensaje Individual
  #4 (permalink)  
Antiguo 28/01/2005, 09:16
Avatar de OYEME
OYEME
 
Fecha de Ingreso: marzo-2004
Ubicación: Lima
Mensajes: 307
Antigüedad: 20 años, 2 meses
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
__________________
http://www.luisariashidalgo.com