[VB6] scansione cartella

[yyzyyz]

nn penso ci voglia molto il codice è molto semplice, basta modificare :

Set fd = fso.GetFolder("c:\")

in

Set fd = fso.GetFolder(app.path)

oppure

Set fd = fso.GetFolder(miopercorso)