Oppure

Loading
23/10/07 22:08
P4p3r0g4
a me da (senza la list2) 10 - 15 sec il primo utilizzo (e ho un hd da 120gb completamente pieno formattato nel 2002) dal secondo in poi massimo 3 sec.
aaa
24/10/07 12:33
BytE-FucK
ekko,io ne ho uno da 255
aaa
24/10/07 12:39
GrG
Mi da errore dicendomi "variable not defined" evidenziandomi la parola:
DPathlist2

al pezzo:
[...]
Dir1.Path = DPath
If Not Dir(DPath & SName) = "" Then List1.AddItem DPathlist2.AddItem(Dir1.List(x))
[...]
aaa
24/10/07 14:07
P4p3r0g4
si è vero, scusa. errore corretto.

Private Sub Analize(DPath As String)
Dim x As Integer
level = level + 1
Dir1.Path = DPath
If Not Dir(DPath & SName) = "" Then List1.AddItem DPath
If Not Dir1.ListCount = 1 Then
For x = 0 To Dir1.ListCount - 1
list2.additem (Dir1.List(x))
Analize (Dir1.List(x) & "\")
Next x
End If
If Not Dir1.Path = "c:\" Then Dir1.Path = ".."
level = level - 1
End Sub
aaa
24/10/07 15:07
GrG
Ankora nn mi funge, è sempre la stessa stora.
aaa
26/10/07 12:23
P4p3r0g4
vorrei sapere se nella list2 appare
C:\documents and setting\tuouser\desktop
aaa
26/10/07 13:34
GrG
si, visualizza tutti i percorsi..

C:\...\...
C:\...\...\...\...
[...]

tra cui
C:\documents and settings\***\desktop
aaa
26/10/07 15:37
P4p3r0g4
allora è assurdo che non ti trovi il file se trova la cartella!
hai messo l'estensione?
Hai controllato maiuscole minuscole?
aaa