FSO遍历文件夹中的文件并按创建时间排序
|
Ccoffee
2010年7月16日 15:49
本文热度 4287
|
[code]
"0" cellpadding="0" width="100%" align="center" bordercolor="#000000" border="1">
"#33cccc">
文件 |
创建日期 |
<%
foldpath=server.mappath("../images/uploadfiles")
set fso = server.createobject("scripting.filesystemobject")
set fsofolder=fso.getfolder(foldpath)
set getfiles =fsofolder.files
'定义数组
dim filearr(),i
i=0
for each f in getfiles
redim preserve filearr(i)
temp=f.datecreated'取出文件建立时间
filearr(i)=temp
i=i+1
next
'对文件建立时间排序
for m=0 to i-1
for n=m to i-1
if(cdate(filearr(m))<cdate(filearr(n)))then
ordertemp=filearr(m)
filearr(m)=filearr(n)
filearr(n)=ordertemp
end if
next
next
for m=0 to i-1
for each f in getfiles
temp=f.datecreated
if(cdate(temp)=cdate(filearr(m)))then
%>
<% file_name=f.name response.write file_name %> |
<%=f.datecreated%> |
<%
end if
next
next
%>
[/code]
该文章在 2010/7/16 15:49:51 编辑过