用ASP代码如何读取到指定文件夹下所有文件,并获取到文件的各项参数属性,包括:文件名、文件大小、文件更新时间等。

用GetFolder方法实现,下面是参考代码:
<table>
<tr>
<td><strong>文件名</strong></td>
<td><strong>文件大小</strong></td>
<td><strong>创建时间</strong></td>
</tr>
<%
Dim fso, f, f1, fc,fp,fs,vf
Set fso = CreateObject("Scripting.FileSystemObject")
fp=server.MapPath("/") & "\"
Set f = fso.GetFolder(fp)
Set fc = f.SubFolders
For Each f1 in fc
%>
<tr>
<td><%=f1.name%></td>
<td><%=f1.size%></td>
<td><%=f1.DateCreated%></td>
</tr>
<%
Set fs = f1.Files
For Each vf in fs
%>
<tr>
<td>/<%=f1.name%>/<%=vf.name%></td>
<td><%=vf.size%></td>
<td><%=vf.DateCreated%></td>
</tr>
<%
next
next
Set fc = f.Files
For Each f1 in fc
%>
<tr>
<td><%=f1.name%></td>
<td><%=f1.size%></td>
<td><%=f1.DateCreated%></td>
</tr>
<% next %>
</table>
声明:如需转载,请注明来源于www.webym.net并保留原文链接:http://www.webym.net/jiaocheng/443.html





















