Hej

Jag har testat denna sub när jag skall sortera filerna omvänt i en mapp och det funkar bra men jag vill också ha ut filens senaste ändringsdatum och det verkar vara knivigare att få fram eller?? i den valniga sorteringen funkar det med FormatDateTime(File.DateLastModified,2) men det funkar ju inte i sortering 2... hur får man fram filens ändringsdatum ur ett tempnamn?? eller finns det något annat smidigare sätt att sortera dessa filer?

Path = Server.MapPath("/")
Order= Request.QueryString("Order")
set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(Path)
Sub ListFiles()

if Order = "1" then
For Each File In objFolder.Files
Response.Write File.Name & "<br>" & chr(13)
Response.Write FormatDateTime(File.DateLastModified,2) & "<br>" & chr(13)
Next
else
For Each File In objFolder.Files
strTemp = strTemp & "||" & File.Name
Next
arrFiles = Split(strTemp, "||")
For i = UBound(arrFiles) To 1 Step - 1
Response.Write(arrFiles(i) & "<br>") & chr(13)
Response.Write ??ändringsdatumet??
Next
Set objFolder = Nothing
end if


end sub


<% ListFiles() %>

/Henrik

Dett finns ett tidigare inlägg på hur du sorterar filer med hjälp av ett recordset: [FSO-fr&#229;ga]

Tackar, funkar jättebra!