首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

急怎么用ASP遍历文件,并将文件的属性显示到表格中

2012-02-25 
急!如何用ASP遍历文件,并将文件的属性显示到表格中!各位高手、大虾请出手帮忙,由于本人为菜鸟请将源码尽量

急!如何用ASP遍历文件,并将文件的属性显示到表格中!
各位高手、大虾请出手帮忙,由于本人为菜鸟请将源码尽量写详细点!多谢!
具体需求是这样的:
假设我需要遍历d:\pdf\   文件夹下所有的pdf文件,并将如“ABC.pdf”的文件一一列到表格中,表格的第一列显示pdf的文件名“ABC”,表格的第二列显示PDF文件时间属性,第三列为察看按钮(单击能显示该PDF文件)。
多谢帮忙!!

[解决办法]
<%
folderPath = "d:\pdf\ "

Set fso = server.CreateObject( "Scripting.FileSystemObject ")

Set myfolder = fso.GetFolder(folderPath)
%>
<TABLE border= "1 ">
<TR>
<TD> 文件名 </TD>
<TD> 类型 </TD>
<TD> 创建时间 </TD>
<TD> 最后修改时间 </TD>
<TD> 最后访问时间 </TD>
<TD> 查看 </TD>
</TR>
<%
For Each objFile In myfolder.Files
%>
<TR>
<TD> <%=Left(objFile.Name,InstrRev(objFile.Name, ". ")-1)%> </TD>
<TD> <%=Mid(objFile.Name,InstrRev(objFile.Name, ". "),Len(objFile.Name))%> </TD>
<TD> <%=objFile.DateCreated%> </TD>
<TD> <%=objFile.DateLastModified%> </TD>
<TD> <%=objFile.DateLastAccessed%> </TD>
<TD> <a href= " <%=folderPath & objFile.Name%> " target= "_blank "> 查看 </a> </TD>
</TR>
<%
Next
%>
</TABLE>

热点排行