判断盘上是否有文件的方法

编辑作者:www.789mux.com    在线用户:86   

怎样判断一个盘上是否有?相信许多人都会好奇我们到底要如何判断呢?现在我们就去看看判断盘上是否有文件的方法,感兴趣的朋友们一起来看看吧。

<%
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
%>

以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持爱站技术频道。

请发表您的评论