欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

怎樣判斷一個盤上是否有文件

 更新時間:2006年10月28日 00:00:00   作者:  
<%
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
%>

相關(guān)文章

最新評論