[VB6] WebBrowser ed esplorazione cartelle

[x69asterix]

ciao,
allora, su di un form ho l'oggetto in questione, ad esso navigo in c:\documenti...., bene adesso quello che voglio fare se possibile, è di ciclare le cartelle e di inserirle in un listbox.

[x69asterix]

suggerimenti?

[MdE2005]

Il suggerimento è quello di usare un controllo Dir, impostando la proprietà Path = all'indirizzo che inserisci.
Se poi non ti va bene come tipo di controllo e vuoi una listbox allora inserisci ugualmente un controllo Dir ma con proprietà visible = false, e poi fai un ciclo per tutti gli elementi aggiungendoli alla listbox.

startingaddress = 'inserisci il tuo percorso
dir1.visible = false
Dir1.Path = StartingAddress
For i = 0 To Dir1.ListCount - 1
    List1.AddItem Dir1.List(i)
Next i

ciao

[x69asterix]

Originariamente inviato da MdE2005
Il suggerimento è quello di usare un controllo Dir, impostando la proprietà Path = all'indirizzo che inserisci.
Se poi non ti va bene come tipo di controllo e vuoi una listbox allora inserisci ugualmente un controllo Dir ma con proprietà visible = false, e poi fai un ciclo per tutti gli elementi aggiungendoli alla listbox.

startingaddress = 'inserisci il tuo percorso
dir1.visible = false
Dir1.Path = StartingAddress
For i = 0 To Dir1.ListCount - 1
    List1.AddItem Dir1.List(i)
Next i

ciao

ciao,
allora il problema si presenta in pratica in "startingaddress" praticamente devo sempre inserire il percorso a mano, io invece volevo ciclare le cartelle presenti nel webb.. proprio per evitare l'inserimento manuale.

[MdE2005]

Si..ma da qualche parte dovrai inserire l'indirizzo a cui il WebBrowser si deve collegare, o no? Se te vuoi vedere le cartelle presenti nel drive c (per esempio) basta digitare:

StartingAddress = "C:\"

E nella listbox avrai tutte le cartelle presenti in questa cartella.
Chiaramente la scelta della cartella di partenza può essere effettuata tramite un controllo Common Dialog..

ciao

[x69asterix]

Originariamente inviato da MdE2005
Si..ma da qualche parte dovrai inserire l'indirizzo a cui il WebBrowser si deve collegare, o no? Se te vuoi vedere le cartelle presenti nel drive c (per esempio) basta digitare:

StartingAddress = "C:\"

E nella listbox avrai tutte le cartelle presenti in questa cartella.
Chiaramente la scelta della cartella di partenza può essere effettuata tramite un controllo Common Dialog..

ciao

allora il problema non è inserire questo o quello, io chiedevo se esiste un modo per ciclare le cartelle presenti nel webbrowser.Tutto qua

[MdE2005]

Si, ma per visualizzare le cartelle presenti nel controllo occorre un indirizzo..altrimenti che cartelle ti visualizza?!?!? Anche perchè potresti, sempre nel webbrowser, caricare un'immagine gif e non avere cartella da ciclare..

ciao

[x69asterix]

Originariamente inviato da MdE2005
Si, ma per visualizzare le cartelle presenti nel controllo occorre un indirizzo..altrimenti che cartelle ti visualizza?!?!? Anche perchè potresti, sempre nel webbrowser, caricare un'immagine gif e non avere cartella da ciclare..

ciao

allora io sono "C:\Documents and Settings\All Users\Documenti" il webb, mi fa vedere tutte le cartelle presenti in "C:\Documents and Settings\All Users\Documenti", supponiamo che ci siano 10 cartelle, bene, adesso il percorso è già presente: "C:\Documents and Settings\All Users\Documenti", quindi quello che devo fare è prendere i 10 nomi delle cartelle! dal webbroser. Mi sono spiegato?

[MdE2005]

Allora..ti ho anche postato il codice un pò di post fa:
la tua posizione ("c:\documents and settings\all user ecc..") la ricavi da una text, giusto? E' scritta da qualche parte?
Ammettiamo che sia scritta in una textbox, WebTextbox (è il nome della casella di testo); inserisci un controlli Dir e una list box. Alla pressione di un command inserisci questo codice:

dir1.visible = false
Dir1.Path = WebTextBox.text
For i = 0 To Dir1.ListCount - 1
    List1.AddItem Dir1.List(i)
Next i

Ora hai capito? A me funziona senza problemi. Nel caso in cui non ti funzioni postami tutto il tuo codice..

ciao

[x69asterix]

Originariamente inviato da MdE2005
Allora..ti ho anche postato il codice un pò di post fa:
la tua posizione ("c:\documents and settings\all user ecc..") la ricavi da una text, giusto? E' scritta da qualche parte?
Ammettiamo che sia scritta in una textbox, WebTextbox (è il nome della casella di testo); inserisci un controlli Dir e una list box. Alla pressione di un command inserisci questo codice:

dir1.visible = false
Dir1.Path = WebTextBox.text
For i = 0 To Dir1.ListCount - 1
    List1.AddItem Dir1.List(i)
Next i

Ora hai capito? A me funziona senza problemi. Nel caso in cui non ti funzioni postami tutto il tuo codice..

ciao

si io ho capito, forse sei tu che non hai capito cosa intendo dire, io non ti ho detto di utilizzare l'url, ma di tirar fuori i nomi delle cartelle del webbrowser.