Problemas con añdir directorios y ficheros

[gnomarro2]

Hola, tengo un problema quiero añadir un código, que me abra los directorios de mi ordenador, busque en las carpetas y que filtre por .jpg dentro de esa carpeta y luego se añada a un listbox. como representa la imagen.



Alguien podría ayudarme?

[HdM]

La interfaz, bien (a excepción del botón "ProBar Conexión"), pero ¿y el código problemático?...
VB.Net creo, no VB6.

[pkj]

Tendras que usar un commondialog para buscar los archivos.
Antes de mostrar los ficheros lo configuras para que solo muestre las extensiones que tu quieras.

Código (vb) [Seleccionar] Expandir

  With CommonDialog1
    .DialogTitle = "Elige el fichero"  ' titulo
    .InitDir = App.Path  ' directorio de inicio
    .Filter = "Archivos JPG (*.JPG)|*.JPG|Todos los archivos (*.*)|*.*"  ' tipos de archivo
    .ShowOpen ' muestras el explorador para buscar el fichero
   ' cuando elijas el fichero vuelves aqui
    Fichero = .FileName
  End With


Saludos