帮忙理一下asp的层次

来源:百度知道 编辑:UC知道 时间:2024/06/05 08:21:12
function chkboardmaster_1(boardid)
dim brs,ckboardmaster
chkboardmaster=false
1 if master then
chkboardmaster=true
1 else
if boardmaster then
sql="select boardmaster,boardid from board where boardid="&boardid
set brs=server.createobject("adodb.recordset")
set brs=conn.execute(sql)
2 if brs.eof and brs.bof then
chkboardmaster=false
2 else '进行循环
ckboardmaster=split(brs(0),"|")
for i=0 to ubound(ckboardmaster)
3 if trim(ckboardmaster(i))=trim(membername) then
chkboardmaster=true
3 else
chkboardmaster=false
3' end if
4 if chkboardmaster then exit for '不需要end if
next
2' end if
brs.close
set brs=nothing
1 else
chkboardmaster=false
1' end if
end if
end function

1代表第一层if,1'代表第一层的end if。感觉最后两个end if好像多余了一个,我的划分正确么?这段代码实现了什么功能?

大概是判断是否为管理员的函数
应该这样划分if--else--end if

function chkboardmaster_1(boardid)
dim brs,ckboardmaster
chkboardmaster=false
1 if master then
chkboardmaster=true
1 else
2if boardmaster then
sql="select boardmaster,boardid from board where boardid="&boardid
set brs=server.createobject("adodb.recordset")
set brs=conn.execute(sql)
3 if brs.eof and brs.bof then
chkboardmaster=false
3 else '进行循环
ckboardmaster=split(brs(0),"|")
for i=0 to ubound(ckboardmaster)
4 if trim(ckboardmaster(i))=trim(membername) then
chkboardmaster=true
4 else
chkboardmaster=false
4' end if
4 if chkboardmaster then exit for '不需要end if
next
3' end if
brs.close
set brs=nothing
2 else
chkboardmaster=false
2' end if
1' end if
end function