asp.net 编程问题急

来源:百度知道 编辑:UC知道 时间:2024/05/26 10:32:26
一个关于查看文件夹大小的程序
<%@ import namespace=system %>
<%@ import namespace=system.io %>
<%@ page language=vb debug=true %>
<script language=vb runat=server>
sub page_load(sender as object ,e as eventargs)
dim len as long = 0
dim path as string="N:\BYSJ\seldriver\qaz"
getdirectorylength(path,len)
response.write(len)
end sub
function getdirectorylength(path as string,len as long)
dim i as integer
if ubound(directory.getdirectories(path)) <> -1 then
for i=0 to ubound(directory.getdirectories(path))
'response.write(directory.getdirectories(path)(i) & "</br>")
getdirectorylength(directory.getdirectories(path)(i),len)
next
end if

dim j as integer
for j=0 to ubound(directory.getfiles(path,"*.*"))
'response.write(directory.getfiles(path,("*.*"))(j) & " ")
&#

LS的,,ASP会用page_load这样的函数?

LZ先把它的大小写给弄好了,这样看起很累,,
可以调试一下啊,,我觉得,可能是大小写出有问题。

你这是asp不是asp.net