当前位置:首页 > ASP教程 > FSO专栏

怎样判断一个盘上是否有文件

<%
dim objfolder
dim objfso
dim j

set fso=server.createobject("scripting.filesystemobject")
set objfolder=fso.getfolder("d:/")
if objfolder.size>0 then
j=0
for each objfile in objfolder.files
j=j+1
next
if j>0 then '此盘上有文件,共有j个文件
.....
else
..... '此盘上没有文件
end if
else
.... '此盘上没有文件
end if
%>


【说明】本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:)!