Sección de controles Ocx para Visual basic , Dll , Activex

71 - Módulo de clase para explorar archivos

Módulo de clase que permite explorar archivos y carpetas por medio de un control ListView

Lo bueno de este módulo, comparado a otros ejemplos que permiten listar y visualizar los archivos y directorios de windows, es que, al listarlos en el control ListView, los archivos y carpetas se añaden en forma ordenada, es decir primero los Directorios y luego los archivos, en forma alfabetica.

El método de ordenación se realiza mediante el método de ordenación QuickSort

Además, permite visualizar las propiedades de archivos en las columnas del listview: El tamaño, el tipo, la fecha y los atributos ( Solo lectura, oculto etc ..)

vista del ejemplo

Vista del ejemplo en visual basic que utiliza un modulo de clase para visualizar archivos y carpetas del sistema

Para utilizar el módulo hay que crear una instancia de esta forma, por ejemplo:

Private WithEvents obj As clsListFile

..luego hay que asociarle 2 controles ImageList y un control ListView, ej:

'Nueva instancia
Set obj = New clsListFile

'Se asocia 2 imagelist para los iconos
obj.ImageList1 = ImageList1(0)
obj.ImageList2 = ImageList1(1)

'Se le asocia el ListView
obj.ListView = ListView1

..Para listar los archivos hay que pasarle al método Listar el Path que queremos , por ejemplo si le pasamos el path de un control DirListBox:

Call obj.Listar ( Dir1.Path )

También tiene un evento llamado changePath, que devuelve, cada ves que cambia el path del ListView al hacer un dobleClick, el directorio, y sirve para poder volver a asociarlo por ejemplo a un control DirListBox.

Descargar Módulo de clase

Nota. Para cargar los Drives y unidades en un Treeview y poder utilizarlo en conjunto con el Listview, puedes ver este ejemplo

Recursos Visual basic 6.0 - Relacionados

Buscar en Recursos vb con Google