发布时间：2023-05-25 13:23:26 所属栏目：Asp教程来源：

导读：asp遍历目录以及目录下文件的函数- 从网上找的不过都用不了,自己用Emeditor修正了一下

<%@ Language=vbscript %>

<%

'遍历目录以及目录下文件的函数

%>

<%

Function Bianli(path)

S

asp遍历目录以及目录下文件的函数- 从网上找的不过都用不了,自己用Emeditor修正了一下

<%@ Language=vbscript %>

<%

'遍历目录以及目录下文件的函数

%>

<%

Function Bianli(path)

Set Fso=server.createobject("scripting.filesystemobject")

On Error Resume Next

Set Objfolder=fso.getfolder(path)

Set Objsubfolders=objfolder.subfolders

For Each Objsubfolder In Objsubfolders

Nowpath=path + "/" + Objsubfolder.name

Response.write Nowpath

Set Objfiles=objsubfolder.files

For Each Objfile In Objfiles

Response.write "<br>---"

Response.write Objfile.name

Next

Response.write "<p>"

Bianli(nowpath)'递归

Next

Set Objfolder=nothing

Set Objsubfolders=nothing

Set Fso=nothing

End Function

%>

<%

Bianli("D:") '遍历d:盘

%>

（编辑：聊城站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!

asp遍历目录及子目录的函数推荐