Question

ASP 遍历文件名到数组，想把数组倒过来。

Dim fileArray()
reDim fileArray(0)
Set fileObj = Server.CreateObject("Scripting.FileSystemObject")
Set folderObj = fileObj.GetFolder(server.MapPath("."&pic_path))
i = 0
For Each file in folderObj.Files
If isPIC(file.Name, cPicType) Then
fileArray(i) = file.Name // 列出目录下所有文件名到数组fileArray 中。

i = i + 1
reDim Preserve fileArray(i)
End If
Next
Set FileObj = Nothing
Set FolderObj = Nothing
picTotal = UBound(fileArray)

//输出fileArray数组中 所有文件名。

For I = Lbound(fileArray) to Ubound(fileArray)
Response.Write fileArray(I)
Next

现在正常的结果是从前到后的一个顺序 怎么样让他从后到前，也就是倒序。

例如：有 1.JPG 2.JPG 3.JPG
现在输出是 1.JPG 2.JPG 3.JPG

想做成输出：3.JPG 2.JPG 1.JPG

有人提过。fileArray.reverse()
可能是我搞错了，试了没成功。

Answer 1

For I = Ubound(fileArray) to Lbound(fileArray) step -1
Response.Write fileArray(I)
Next

Answer 2

can you do this?

For I = Ubound(fileArray) to Lbound(fileArray) , i is decrease

Answer 3

http://zhidao.baidu.com/question/289756512.html