hola
Pongamos que quiero conectar un drive con un dir con un filelist de forma que si cambio de unidad me salgan las carpetas, y si elijo una carpeta me salgan los archivos en filelist.
Conectar el dir1 con el drive
sub drive1_change
dir1.path=drive1.drive
end sub
Conectar el dir con el file
sub dir1_change
filelist1.path=dir1.path
end sub
Ahora solo te queda ajustar el pattern y eso en el filelistbox, pero esas propiedades ya las mirarás.
Dicho esto, te aconsejo que pruebes también el objeto FileSystemObject (tendrás que instalar la referencia de scripting).
Dim F as new filesystemobject
Ahora el objeto F tiene una propiedad 'drives' que es una colección de unidades en tu ordenador (incluídas unidades de red). Cada una de estas unidades tiene un montón de propiedades (avalilablespace, filesystem, drivetype, ...)
Si además lo utilizas junto con un listview tendrás la posbilidad de vistas en arbol, etc para hacer el acceso a las unidades y carpetas tal y como quieras.
Con ello tienes un dominio total del sistema de ficheros y puedes manipular archivos, manejar trayectorias, nombres, extensiones, leer, crear y escribir archivos, ...
Y luego con windows scripting host podrás acceder a las carpetas especiales del sistema.
La siguiente opción será usando la API, pero probablemente eso aún lo tienes un poco lejos. Son algo liosas y es mejor que al principio te centres en manejar bien los objetos que tienes a mano.
Un saludo
Autor
En línea
