ASP对指定文件夹内文件列表显示
我想用在网页显示指定文件夹内的文件名,这些文件名格式都一样,长度也一样,有时里面会有很多,怎样在网页里将这些文件的名称列表显示出来?我用ASP做的网页,是初学者。...
我想用在网页显示指定文件夹内的文件名,这些文件名格式都一样,长度也一样,有时里面会有很多,怎样在网页里将这些文件的名称列表显示出来?
我用ASP做的网页 ,是初学者。 展开
我用ASP做的网页 ,是初学者。 展开
2个回答
推荐于2016-05-13
展开全部
<%
'递归算法简单示例,递归遍历指定目录下所有文件和子目录中的文件;
'可以自由引用或修改本代码,但请保留连接或此注释;
dir="/" '请设置你要显示的目录,"/"为整站所有文件,"../"为上级目录下所有文件
set fso = createobject("scripting.filesystemobject")
response.write "指定目录下所有文件及所有子目录下文件显示如下:" & "<br>"
iterate(server.mappath(dir))
function iterate(path)
dim folder, folders, files, file
set folder = fso.getfolder(path)
set files = folder.files
for each file in files
response.write file.path & "<br>"
next
set folders = folder.subfolders
for each f in folders
iterate f.path
next
end function
set fso=nothing
%>
'递归算法简单示例,递归遍历指定目录下所有文件和子目录中的文件;
'可以自由引用或修改本代码,但请保留连接或此注释;
dir="/" '请设置你要显示的目录,"/"为整站所有文件,"../"为上级目录下所有文件
set fso = createobject("scripting.filesystemobject")
response.write "指定目录下所有文件及所有子目录下文件显示如下:" & "<br>"
iterate(server.mappath(dir))
function iterate(path)
dim folder, folders, files, file
set folder = fso.getfolder(path)
set files = folder.files
for each file in files
response.write file.path & "<br>"
next
set folders = folder.subfolders
for each f in folders
iterate f.path
next
end function
set fso=nothing
%>
TableDI
2024-07-18 广告
2024-07-18 广告
作为上海悉息信息科技有限公司的一员,我们专注于提供高效的数据处理解决方案。对于多个文件表格的合并需求,我们通常采用专业的数据整合技术,确保数据的准确性和一致性。通过精确匹配表格字段和格式,我们能够快速、准确地将多个表格合并成一个,为用户提供...
点击进入详情页
本回答由TableDI提供
展开全部
<%
dim content,objf
set fso=server.createobject("scripting.filesystemobject")
filepath=server.mappath("/aaa/") '文件存储的路径
set f=fso.GetFolder(filepath)
For Each objf in f.Files
content=content&objf.name
next
response.write content
response.end
set fso=nothing
set f=nothing
%>
dim content,objf
set fso=server.createobject("scripting.filesystemobject")
filepath=server.mappath("/aaa/") '文件存储的路径
set f=fso.GetFolder(filepath)
For Each objf in f.Files
content=content&objf.name
next
response.write content
response.end
set fso=nothing
set f=nothing
%>
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询