Vende sortering med Step-1
Jeg har med held fået vendt en sortering med Step-1 http://www.eksperten.dk/spm/350554Nu vil jeg gerne vende een til og det er med filsystemet.
Jeg vil gerne sortere efter Navn. Som standard virker sorteringen efter navn godt nok, men den skal vendes.
Det her er uden vending af rækkefølgen:
strPhysicalPath = Server.MapPath("testbilleder")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strPhysicalPath)
Set objFolderContents = objFolder.Files
For Each objFileItem in objFolderContents
response.write objFileItem.Name & " - " & objFileItem.Size & "<br>"
Next
Set objFSO = Nothing
Og det her skulle gerne være med vending af rækkefølgen:
strPhysicalPath = Server.MapPath("testbilleder")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strPhysicalPath)
Set objFolderContents = objFolder.Files
For objFileItem = UBound(objFolderContents)-1 to LBound(objFolderContents) step-1
response.write objFileItem.Name & " - " & objFileItem.Size & "<br>"
Next
Set objFSO = Nothing
Men det virker jo altså bare ikke. Nogen forslag ???
