objfiles 相关的软件列表

首页

一段ASP单页显示文件夹下所有图片的代码

2020-02-16 标签:一段,asp,显示文件,夹下,图片,代码,实现,如下,dim,fso,objfolder,objfiles,filelist,set,server,scripting

实现代码如下: " End If Next '释放对象 Set objFolder=nothing Set fso=nothing '获取文件类型 Function getExt(str) getExt = Lcase(Right(str,Len(str)-InstrRev(str,"."))) E