Avrei bisogno di leggere tutti i file contenuti in una certa directory del server e nelle sue sottodirectory per vedere se un certo file esiste già.
Sto utilizzando questo:
Dim objFS,objFolder,objFile
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder("c:\temp\disegni")
For Each objFile In objFolder.Files
response.write ( objFile.Name)
'response.end
Next
Funziona ma mi legge solo i file contenuti nella cartella "disegni".
Come faccio a leggeri anche i file contrenuti nelle sottocartelle?
Ciao e grazie
Sto utilizzando questo:
Dim objFS,objFolder,objFile
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder("c:\temp\disegni")
For Each objFile In objFolder.Files
response.write ( objFile.Name)
'response.end
Next
Funziona ma mi legge solo i file contenuti nella cartella "disegni".
Come faccio a leggeri anche i file contrenuti nelle sottocartelle?
Ciao e grazie