Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Lionheart12 en 9 Abril 2007, 07:02 am



Título: Explorador de archivos
Publicado por: Lionheart12 en 9 Abril 2007, 07:02 am
Necesito navegar por la pc, osea el disco duro, como hago esto:
Tngo un DriveList, un DirList y un FileList. Como se hace para que se actualizen de acuerdo al otro. Osea el dirlist empieza mostrandote los directorios del C:, si cambiase en el DriveList
a D:  como hago para q se actualize el DirList?? y lo mismo con el FileList, q al cambiar el DirList se actualize el FileList. Se entiende?? como un navegador.
Espero su ayuda aca veo muy buenas respuestas  :D


Título: Re: Explorador de archivos
Publicado por: ~~ en 9 Abril 2007, 16:17 pm
Pues muy simple:

Código:
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

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


Título: Re: Explorador de archivos
Publicado por: Mad Antrax en 9 Abril 2007, 16:30 pm
Aqui tienes el código:

Código:
Private Sub File1_Click()
    MsgBox File1.Path & "\" & File1.FileName
End Sub

Private Sub Form_Load()
    Drive1.Drive = Environ("HOMEDRIVE")
End Sub

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

Private Sub Dir1_Change()
   File1.Path = Dir1.Path
End Sub

Y Como siempre un ejemplo adjunto al post (solo usuarios registrados)

Saludos!!

EDIT: Se me adelantaron otra vez :xD