[VB6] Creare un programma simile a "Esplora Risorse"

[Artemio]

ah ok... molto più chiaro ora... preferisco aggiungere un riferimento ed usare l'early binding.
grazie ancora!

p.s. ho dato un'occhiata veloce alle varie proprità che offre... sbaglio o è anche possibile avere le unità disponibili? così invece della DriveListBox potrei usare le proprietà del FSO... potresti indirizzarmi sulla giusta via?
sostanzialmente vorrei sapere quali unità sono disponibili, il nome o la lettera e associarne un'immagine a seconda del tipo di periferica.

[Boolean]

la solita ListBox e il solito Pulsante:

Dim FSO As New FileSystemObject

Private Sub Command1_Click()
Dim drv As Drive
For Each drv In FSO.Drives
    Tipo = Choose(drv.DriveType + 1, "Sconosciuto", _
                                "Rimovibile", _
                                "Fissa", _
                                "Rete", _
                                "CD-ROM", _
                                "Disco RAM")
    List1.AddItem drv.DriveLetter & " - " & Tipo & IIf(drv.IsReady, " - Pronto", " - Non Pronto")
Next

End Sub

Boolean

[Artemio]

grazie mille!!!!