%
Dvbbs.LoadTemplates("help_permission")
Dim orders
If Request("Action")="Myinfo" Then
Dvbbs.stats=template.Strings(4)
Else
Dvbbs.stats=template.Strings(0)
End If
Dvbbs.nav()
If Dvbbs.BoardID=0 then
Dvbbs.Head_var 2,0,"",""
Else
Dvbbs.Head_var 1,Application(Dvbbs.CacheName&"_boardlist").documentElement.selectSingleNode("board[@boardid='"&Dvbbs.BoardID&"']/@depth").text,"",""
End If
If Not (Request("Action")="Myinfo" And Dvbbs.UserID=0) Then
If Cint(Dvbbs.GroupSetting(39))=0 And Not Dvbbs.master Then Dvbbs.AddErrCode(55)
End If
Dvbbs.ShowErr
If Not IsNumeric(request("orders")) or request("orders")="" Then
orders=1
Else
orders=request("orders")
End If
permission()
Dvbbs.activeonline()
Dvbbs.footer()
Sub permission()
Response.Write Replace(Replace(Replace(template.html(0),"{$boardid}",Dvbbs.BoardID),"{$alertcolor}",Dvbbs.mainsetting(1)),"{$action}",Request("Action"))
Response.Write ""
End Sub
%>