Drive-, Dir- und FileListBox synchronisieren

-cta-

Mitglied
Guten morgen!

wie synchronisiere ich [unter VB6.0] Drive-, Dir- und FileListBoxen, damit ich bei auswahl von laufwerk und ordner auch die dort vorhandenen dateien angezeigt bekomme


gruss,

-cta-
 
Im Change-Ereignis (wenn der User was anderes ausgewählt hat) die Eigenschaft Path der entsprechenden Controls anpassen.

Code:
Private Sub Dir1_Change()
    File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
On Error GoTo errHandler
    Dir1.Path = Drive1.Drive
    Exit Sub
errHandler:
    If Err.Number = 68 Then
        MsgBox "Laufwerk nicht bereit!", vbOKOnly + vbCritical, App.Title
    End If
End Sub

Falls ein Laufwerk nicht lesbar ist (Wechseldatenträger wie Disketten, CD-Roms, ...) wird der Fehler abgefangen und eine Meldung angezeigt.
 
Zuletzt bearbeitet:
funktioniert bestens!

danke

hmm...da habe ich aber gleich ncoh eine frage....:rolleyes:

in der filelistbox sollen jetzt nur bestimmte dateien angezeigt werden...nämlich jene, welche folgende dateibezeichnung haben:

abc*123***.exe
abc*123***.txt

wie kriege ich das jetzt hin

ja...richtig...bin anfänger :D
 
Zurück