Ordinare le sottocartelle con l'oggetto FSO.GetFolder

[aremun2004]

Salve,
ho l'ogetto cartella FSO.GetFolder
ho realizzato uno script che elenca tutte le sottocartelle.

il problema è che mi da l'ordine alfabetico
vorrei sapere se c'è il modo di ordinare le sottocartelle per data di creazione.

Grazie
guido

[Cartman]

le vuoi visualizzare ordinate per data?
metti le informazioni su vettori paralleli es. nomedir(n),datadir(n) eccc. e poi esegui un algoritmo di ordinamneto tipo selezione o bubble sort (trovi sicuramente tutto se fai una ricerca online)

[aremun2004]

mmm ti ringrazio ma non capisco....
potresti spiegarti meglio?
cosa intendi per vettori paralleli? e bubble sort?

Guido

[Corwin]

Questo script ordina i file per data di creazione ... prova a vedere se riesci ad adattarlo...

<%
const stringa = 8
const data = 7
set fso = CreateObject("Scripting.Filesystemobject")
set rst = CreateObject("ADODB.Recordset")
set folder = fso.getFolder(Server.MapPath("."))

rst.CursorLocation = 3
rst.Fields.Append "Nome", stringa
rst.Fields.Append "DataCreazione", data
rst.Open

for each f in folder.files
rst.AddNew
rst.Fields("Nome").value = f.Name
rst.Fields("DataCreazione").value = f.DateCreated
next
rst.sort = "DataCreazione"
rst.movefirst

while not rst.EOF
Response.write rst("Nome") &"-" & rst("DataCreazione") &"
"
rst.movenext
wend
%>

[aremun2004]

QUESTO VISUALIZZA LA LISTA DEI FILE E NO DELLE CARTELLE....
CMQ LO SISTEMATO :tongue:

TI RINGRAZIO
CIAO

[Baol74]

for each f in folder.subfolders

[aremun2004]

infatti... GIUSTO