登陆 免费注册 提交网站
站长资讯 >> 站长学院 >> 网络编程
 2008-04-30 21:45浏览: 2925 次

怎样用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

%>

网站首页 - 关于我们 - 联系我们 - 友情链接 - 帮助中心
Copyright ©2007-2022 www.Aisila.com All Rights Reserved
苏ICP备20008864号-4