如何用ASP程序判断一个盘上是否有文件

如何用ASP程序判断一个盘上是否有文件：

以下为引用的内容：

<%

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

%>

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!