asp读取文件夹中的文件
来源:互联网 发布:淘宝上买药 编辑:程序博客网 时间:2024/06/11 05:37
实例1;
<%
Dim objFSO,objFolder,objFile,FF '声明 objFSO 变量存放对象实例
FF = Server.MapPath("/")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(ff) Then
Response.write "文件夹 "&ff&" 里所有的文件:<br>"
Set objFolder = objFSO.GetFolder(ff)
For Each objFile in objFolder.Files
Response.Write objFile.Name & "<br>"
Next
Else
Response.Write "文件夹"&ff&"不存在,无法读取相关信息!"
End If
Set objFolder = Nothing
Set objFSO = Nothing '释放 FileSystemObject 对象实例内存空间
%>
实例2;
<%
dim fso,mydir,dname
Set Fso=server.createobject("Scripting.FileSystemObject")
set mydir=fso.getfolder(server.mappath("/"))
for each item in mydir.files
'依次读取web目录下的每个文件对象
dname=item.path
'读取每个文件名的完整路径和文件名
htmfile=replace(dname,mydir&"/","")
'将路完整文件和名径中的目录名替换掉,保留下来的就是纯文件名
response.write "<a href="&server.URLEncode(htmfile)&" target=_blank>"&htmfile&"</a><br>"
next
%>
实例3;
<%
dim infopath '当前路径
dim serverpath '服务器路径
dim objfso '文件组件
dim objfile '文件
dim objfolder '目录
dim objfoldercontents '所有文件
dim objfoldercount '临时数组变量-文件夹
dim objfileitem '临时数组变量-文件
infopath=request.servervariables("path_info") '得到文件相对路径
serverpath=server.mappath(infopath) '得到文件绝对路径
set objfso=createobject("scripting.filesystemobject") '实例文件组件
set objfile=objfso.GetFile(serverpath) '读取文件所在路径
set objfolder=objfile.parentfolder '根据文件所在路径得到上级目录
set objfoldercontents=objfolder.files '所有文件付给数组
response.write "<table width=100% border=0><tr>"
response.write "<td>文件名</td>"
response.write "<td>文件属性</td>"
response.write "<td>文件大小</td>"
response.write "<td>更新日期</td></tr>"
for each objfoldercount in objfolder.subfolders '循环显示文件夹
response.write "<tr><td><a href=?path="&objfoldercount.name&">"&objfoldercount.name&"</td>" '文件夹名称
response.write "<td>"&objfoldercount.type&"</td>" '文件夹属性
response.write "<td> </td>" '文件夹大小
response.write "<td>"&objfoldercount.DateCreated&"</td>" '时间
next
for each objfileitem in objfoldercontents '循环
response.write "<tr><td><a href="&objfileitem.name&">"&objfileitem.name&"</a></td>" '文件名
response.write "<td>"&objfileitem.type&"</td>" '类型
response.write "<td>"&objfileitem.size&"k</td>" '文件大小
response.write "<td>"&objfileitem.datelastmodified&"</td></tr>" '更新日期
next
response.write "</table>"
%>
原文标题:asp读取文件夹中的文件--QQ技术交流群:90991311
原文网址:http://www.jixinfz.cn/asp/6.asp?id=197
- asp读取文件夹中的文件
- 读取文件夹中的文件列表
- 循环读取文件夹中的文件
- 读取Assets文件夹中的文件
- python读取文件夹中的文件
- 读取Assets文件夹中的文件
- asp删除文件夹中的文件
- C#读取文件夹中的文件操作浅析
- 用php读取文件夹中的文件个数
- 读取文件夹或者文件中的内容
- 读取Rescource和asset文件夹中的文件
- Android---读取assets文件夹中的文件
- 如何读取assets文件夹中的txt文件
- 如何读取assets文件夹中的txt文件
- .Net读取XP文件夹中的Thumbs.db文件
- java递归读取文件夹中的所有文件以及路径
- 每天学点C++_2.循环读取文件夹中的文件
- matlab连续读取一个文件夹中的多个文件
- Struts2/XWork 安全漏洞及解决办法
- IBatis的插入
- linux多线程编程1--线程的创建
- Eclipse 3.4.x + Struts2 + Tomcat 6.x
- HDU1728 BFS
- asp读取文件夹中的文件
- ubuntu下无法运行make menuconfig
- 使用SQL Server维护计划实现数据库定时自动备份
- linux下C语言多线程编程实例
- 把文件夹中的文件名写到数据库
- 开篇
- first sight of ibatis
- linux多线程编程2--属性的设置
- POJ 1326 Mileage Bank