asp读取指定目录下的文件名
InStrRev("abcd.jpg", ".") 计算出abcd.jpg中第一次出现.所在的位置是第几个字符=5
mid("abcd.jpg",1,4) 取前四位abcd
mid("abcd.jpg",5) 从五位往后取（包括第五位） .jpg
取前缀abc
FullPath = "abc.jpg"
f = mid(FullPath,1,InStrRev(FullPath, ".")-1)
Response.Write f
娶后缀jpg
FullPath = "abc.jpg"
f = mid(FullPath,InStrRev(FullPath, ".")+1)
Response.Write f
<%
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")‘创建一个Folder对象
foldername=server.mappath("./")
Set MyFolder=MyFileObject.GetFolder(foldername)
i=0‘循环显示其中文件夹
response.write "显示文件夹："
For Each thing in MyFolder.subfolders
Response.Write("<br>"&thing)
i=i+1
Next
response.write "<br>共有"&i&"个文件夹"
response.write "<p>显示文件名"‘循环显示其中文件
i=0
For Each thing in MyFolder.Files
Response.Write("<br>"&thing)
i=i+1
Next
response.write "<br>共有"&i&"个文件"
%>
郑重声明：本站内容如果来自互联网及其他传播媒体，其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享，并不代表本站赞同其观点和对其真实性负责，也不构成任何其他建议。
