<% 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 %>