Question

ASP程序设计FSO 问题来+30

<%
set fso=createobject("scripting.filesystemobject")'创建FSO
Set f=fso.GetFolder(server.mappath("./admin"))'当前文件夹下的二级文件夹
set objSubFolders=f.Subfolders '获取文件夹容器
for each d in objSubFolders '循环文件夹开始
set f1=d.files '获取某一文件夹中的文件容器
for each e in f1 '循环文件开始
response.write d.Name&"/"&e.Name &"<br>"'输出文件路径
next'循环文件结束
next'循环文件夹结束
set fso=nothing'销毁FSO
%>
以上的代码个我的admin中文件的字文件都显示出来了，我想让他只显示我的其中一种格式的文件比如只显示.JPG的文件，求求各位大侠

Answer 1

if right(d.Name,4)=".JPG" then response.write d.Name&"/"&e.Name &"<br>"'输出文件路径