当前位置: 首页 > 图文教程 > 网络编程 > ASP > 利用fso显示某一文件夹中的所有内容

ASP
用EasyMailObject组件处理Exchange邮件源代码(6)
用EasyMailObject组件处理Exchange邮件源代码(7)
利用ASP和Access数据库制作局域网网上答题系统
用ASP开发试题库与在线考试系统(1)
用ASP开发试题库与在线考试系统(2)
用ASP开发试题库与在线考试系统(3)
用ASP开发试题库与在线考试系统(4)
用ASP开发试题库与在线考试系统(5)
用ASP开发试题库与在线考试系统(6)
用ASP开发试题库与在线考试系统(7)
用ASP开发试题库与在线考试系统(8)
综合的判断用户输入的合法性的函数
三层动态下拉菜单的例子
将你的网站设置为客户的信任站点--VB方案
论坛中有新贴子功能的实现
ASP 编程中 15 个非常有用的例子
一个的无组件上传的ASP代码
利用ASP实现三个强大功能之一
利用ASP实现三个强大功能之二
利用ASP实现三个强大功能之三

ASP 中的 利用fso显示某一文件夹中的所有内容


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 111 ::
收藏到网摘: n/a

利用fso显示某一文件夹中的所有内容
<%
'创建一个FileSystemObject对象的事例
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
path=server.mappath("./folder") '当前目录下folder文件夹目录
'创建一个Folder对象
Set MyFolder=MyFileObject.GetFolder(path)
For Each thing in MyFolder.SubFolders '获取子文件夹
 response.write "<p>目录:"&thing
' MyFileObject.DeleteFolder thing 删除文件夹,注意使用
next 
'循环显示其中文件
For Each thing in MyFolder.Files
Response.Write("<p>文件:"&thing) '输出文件路径
'MyFileObject.DeleteFile thing '删除这些文件,此删除不可以恢复,需要小心使用
Next
%>