[VB6]: Leggere il contenuto di un CD inserito (directory e file)

[diegocoz]

Sypher ha ragione se vuoi compilare la lista automaticamente, altrimenti se vuoi dare all'utente la possibilità di navigare il CD (come fosse un tuo personale Esplora Risorse) puoi utilizzare i controlli standrad drivelistbox, dirlistbox e filelistbox, che dovrebbero fare al caso tuo. In VisualStudio 6 li dovresti trovare sulla toolbar standard, accanto al timer.

Ciao

[emik]

Si con il fso ho provato e sono arrivato al risualtato di prima...ma cm faccio a mettere questa sub che dici te????

[Sypher]

Dim fs As New FileSystemObject
Private Sub Form_Load()
    Leggi("c:\")
End Sub

Sub Leggi(path)
     
     Set folder = fs.GetFolder(path)
     
    
     For Each item In folder.SubFolders
        List1.AddItem (item.Name) 'aggiunge il nome delle cartelle alla lista
        Leggi(item.path) 'ricorsione...chiama se stessa per ciclare tutti i livelli
     Next

     For Each item In folder.Files
        List1.AddItem (item.Name) 'aggiunge il nome dei file alla lista
     Next
End Sub

una cosa del genere dovrebbe andare...vedi se ti è più chiaro

[emik]

Grazie spero funzioni!
Forza romaaaaa
poo po po po po poo po

[Sypher]

Originariamente inviato da emik
Grazie spero funzioni!
Forza romaaaaa
poo po po po po poo po

sta attento che se leggi c:\ come ho messo nell'esempio essendo c: di solito pieno di file e directory ce mette un botto a riempire la lista

[emik]

piccolo problema.qnd dichiaro "Dim fs As NEw FileSystemObject" mi da errore.ho sentito che devi settare in qlk modo vb ma mi saprsti dire cm?

[Sypher]

Originariamente inviato da emik
piccolo problema.qnd dichiaro "Dim fs As NEw FileSystemObject" mi da errore.ho sentito che devi settare in qlk modo vb ma mi saprsti dire cm?

devi aggiungere dai riferimenti Microsoft Scripting Runtime

[alka]

C'era già una discussione attiva su questo argomento.
Ho unito le discussioni.

Non aprire più discussioni sul medesimo argomento.

[emik]

si ma dove lo trovo questo Microsoft Scripting Runtime e cm faccio a settarlo?

[Sypher]

Originariamente inviato da emik
si ma dove lo trovo questo Microsoft Scripting Runtime e cm faccio a settarlo?

progetto-->riferimenti e chekki Microsoft Scripting Runtime