ASP显示目录下所有的文件代码
来源:互联网 发布:淘宝能贷款吗 编辑:程序博客网 时间:2024/05/21 17:43
<script type="text/javascript"><!--google_ad_client = "pub-4490194096475053";/* 内容页,300x250,第一屏 */google_ad_slot = "3685991503";google_ad_width = 300;google_ad_height = 250;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
<% set A=server.createobject("scripting.filesystemobject")
path="G:/count/0"
i=0
response.write "主目录:<br>"&path&"<ul>"
re
response.write "</li></ul>" '-----------------主目录
sub re()
B=B&i
C=C&i
D=D&i
E=E&i
set B=A.getfolder(path) '----------------------主目录下文件
if i>=2 then response.write "<ul>"
for each E in B.files
response.write "<li>"&E.name&"</li>"
next
if i>=2 then response.write "</ul>"
'----------------------End '---------------------------主目录下文件夹 set C=B.SubFolders
if i>=2 then response.write "<ul>"
for each D in C
response.write "<li><b>"&D.name&"</b><font color=#c0c0c0>(DIR)</font>"
i=i+1
path=D
re2 '显示子目录
next
if i>=2 then response.write "</ul>"
'---------------------------End
end sub '-----------------次目录
sub re2()
B=B&i
C=C&i
D=D&i
set B=A.getfolder(path) '-----------------------------次目录下文件
response.write "<ul>"
for each E in B.files
response.write "<li>"&E.name&"</li>"
next
response.write "</ul>"
'-----------------------------End '-----------------------------次目录下文件夹
set C=B.SubFolders
response.write "<ul>"
for each D in C
response.write "<li><b>"&D.name&"</b><font color=#c0c0c0>(DIR)</font></li>"
i=i+1
path=D
re '显示子目录
next
response.write "</ul>" '-----------------------------End
end sub
%>
- ASP显示目录下所有的文件代码
- 【代码】显示一个目录下所有文件
- 显示Documents目录下的所有文件
- 用ASP,FSO显示当前根目录下所有文件,目录列表的方法
- 用ASP,FSO显示当前根目录下所有文件,目录列表的方法
- 遍历显示文件夹下所有目录、所有文件的函数
- java代码遍历目录下的所有文件(查找对应目录下的所有文件)
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 利用DataGrid显示某目录下的所有文件
- 显示某个目录下的所有文件和文件夹
- 一行php代码删除指定目录下的所有文件
- 代码分类之删除文件、目录及目录下的所有文件
- 巧用U盘破除XP管理员密码
- 补码
- php中类的使用
- PowerBuilder技巧和窍门
- 把小软件当作大软件来写,把大软件当作小软件来做
- ASP显示目录下所有的文件代码
- 开发手记
- 别以为进了大学就是天堂——1-你是谁?
- FoxPro 客户端频繁数据库连接性能问题的分析和诊断
- 从阿里巴巴说到管理软件的产业链打造--管理软件夜未眠(一)
- 从URL获取文件保存到本地的代码
- 辟邪剑谱之SQL
- [转]linux下的Apache2 + mysql5 + php5 安装详解
- Blessing or Misfortune?