Visual Basic 6 - Ricerca di una cartella con file da caricare su un db

Il mio problema è il seguente:
Ho un database in formato access contenente diverse tabelle, tra queste ce nè una che deve contenere l'indirizzo di alcuni file presenti in una cartella specifica e sempre con lo stesso valore.Il software deve cercare la cartella in tutte le directory presenti (sia sul disco C: che sui dischi rimovibili). una volta trovata la cartella caricare il contenuto sulla tabella (ma questo punto spero di riuscire a farlo da sola).
Esempio:
se la cartella da cercare è pippo, e ho i dischi c: e f:
la procedura deve cercare prima in c: in tutte le sottocartelle, se non a trova effettuare la ricerca in f:
Non sapendo apriori quanti dischi sono presenti
Grazie 1000 per l'aiuto
Ciccia

Ciao Ciccia,
penso che la prima cosa da fare sia quella di determinare i drivers presenti sul PC poi il resto dovrebbe essere semplice. Quindi per trovare i drivers:

'Progetto>riferimenti>Click su Microsoft Scripting Runtime:

Sub ShowDriveList()
    Dim fs, d, dc, s, n
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set dc = fs.Drives
    For Each d In dc
        s = s & d.DriveLetter & " - "
        If d.DriveType = 3 Then
            n = d.ShareName
        Else
            'n = d.VolumeName
        End If
        s = s & n & vbCrLf
    Next
    MsgBox s
End Sub
'-----------------------------------------
Private Sub Command1_Click()
    Call ShowDriveList
End Sub

Attenzione perchè per visualizzare le unità con supporto rimovibile nell'insieme Drives, non è necessario che il supporto sia inserito, altrimenti si deve utilizzare un accorgimento (... Drv.IsReady).

Ciao.

Grazie mille.
Mi ci mette qualche minuto, ma alla fine resce a caricare dopo circa un minuto.