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 |