DriveListBox+DirListBox

Iniciado por soru13, 10 Julio 2006, 20:42 PM

0 Miembros y 1 Visitante están viendo este tema.

soru13

hola, tengo 1 drivelistbox , 1 dirlistbox y un Textbox,

necesito que me deje elegir la unidad con el drivelistbox, y me lo carge en el dirlistbox,

como lo hago???

e provado esto, pero no anda

Drive1.Drive = Dir2.Path

soplo

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
Callar es asentir ¡No te dejes llevar!

soru13

ok, gracias, con el 1er code ya lo consegui, todo lo demas ya lo tenia

gracias

karmany

No sé qué programa estarás haciendo pero yo prefiriría utilizar el control common dialog. Por qué no lo usas?