---

Hvordan får jeg sorteret listen af filer som
fremkommer ved brug af følgende kode:
Jeg ønsker at kunne sortere på filnavn, file_creation_date og Kb

==START===========================================
<%
Session.LCID = 1030

' File System Object
Dim fso
Set fso = Server.CreateObject("Scripting.FileSystemObject")

' "Uploaded" Folder
Dim folder
Set folder = fso.GetFolder(Server.MapPath("DIR/"))

If folder.Size > 0 Then
For Each file In folder.Files

Response.Write "<tr><td"><li type=""dot""></td>"
Response.Write "<td"><a href=""DIR/" & file.Name & """
target='_new'>" & file.Name & "</td>"
Response.Write "<td align='right'">" & file.Size & "</td>"
Response.Write "<td align='right'">" &
FormatDateTime(file.DateCreated, 2) & "</td></tr>"

Next
Else
Response.Write "<tr><td><li type=""circle"">No Files
Uploaded.</td></tr>"
End If
Response.Write "</table>"
%>

==SLUT============================================

P.f.t.
Med venlig hilsen
Steen Pallesen

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials