FileSystemObject

di il
3 risposte

FileSystemObject

Devo visualizzare a schermo l'elenco di file contenuti in una directory. Ho utilizzato l'oggetto creato su classe FileSystemObject.
dim file_in
Response.Write "<tr>"
Response.Write "<td bgcolor=yellow>Nome File (pagina ASP)</td>"
Response.Write "<td bgcolor=yellow>Data/ora ultima modifica</td>"
Response.Write "</tr>"
for each file_in in x.files

if ucase(left(file_in.type,3)) = "ASP" then
Response.Write "<tr>"
Response.Write "<td>" & file_in.name & "</td>"
Response.Write "<td>" & file_in.DateLastModified & "</td>"
Response.Write "</tr>"
end if

next
Unico problema:
di default mi propone l'elenco ordinato per nome file.
A me servirebbe ordinato per data ultima modifica.....

Non esiste una funzione di sort, ho verificato,.
Vi prego, help me....

fabio

3 Risposte

  • Re: FileSystemObject

    Potresti memorizzare la lista dei files/cartelle in un array e ordinare poi quest ultimo come meglio ti aggrada....

    Ale

    ICQ@Home # 47938486
    ICQ@Work # 246829394 [ NOT AVAIABLE NOW ]
  • Re: FileSystemObject

    Grazie Fish, la tua idea mi ha ispirato.
    Ho scritto i nomi file e le loro date/orari di ultima modifica in una tabella sql.
    La svuoto ogni volta che richiamo la pagina asp, e la ricarico.
    Faccio una select dalla stessa, mettendo un bel order by datamodifica desc.
    Perfetto

    Grazie

    fabio
  • Re: FileSystemObject

    Di niente fabio :)

    Ale

    PS: soluzione un po napoli ma potrebbe pure essere piu veloce di stampare a video la lista dei files direttamente... o mi sbalgio? :)

    ICQ@Home # 47938486
    ICQ@Work # 246829394 [ NOT AVAIABLE NOW ]
Devi accedere o registrarti per scrivere nel forum
3 risposte