怎樣判斷一個盤上是否有文件？相信許多人都會好奇我們到底要如何判斷呢？現在我們就去看看判斷盤上是否有文件的方法，感興趣的朋友們一起來看看吧。

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

以上就是本文的全部內容，希望對大家的學習有所幫助，也希望大家多多支持錯新技術頻道。