用ASP怎样获取一个指定文件夹中的文件名称？
用ASP怎样获取一个指定文件夹中的文件名称？或者用VBScript编一个函数，专门来检测一个指定文件夹中是否有文件存在，如果有，那么就取得该文件名；如果没有再进行其他的处理。。请问我需要调用文件操作的那个方法或属性？ 问题点数：20、回复次数：2Top
1 楼zyhowe（★☆偶然的天空☆★）回复于 2002-07-12 14:16:30 得分 8
<%Function ShowFileAccessInfo(filespec)
Dim fso, f,f1, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(filespec)
set f1=f.Files
for each j in f1
s=s&j.name&"<br>"
next
ShowFileAccessInfo = s
End Function
response.write ShowFileAccessInfo("d:\admin\bbs")
Top
2 楼lanying（蓝鹰)(问个不休）回复于 2002-07-12 14:22:05 得分 4
可以,for each
Top
3 楼meizz（梅花雪）回复于 2002-07-12 15:50:07 得分 8
<html><body>读取一个文件夹内的所有文件或子文件夹范例<br><br>
<%
Dim objFSO,objFolder,objFile '声明一个名称为 objFSO 的变量以存放对象实例
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(Server.MapPath("\new\work\main")) Then
Set objFolder = objFSO.GetFolder(Server.MapPath("\new\work\main"))
For Each objFile in objFolder.Files
Response.Write objFile.Name & "<br>"
Next
Else
Response.Write "文件夹"&Server.MapPath("\new\work\NewFolder")&"不存在，无法读取相关信息！"
End If
Set objFolder = Nothing
Set objFSO = Nothing '释放 FileSystemObject 对象实例内存空间
%>
</body></html>Top
