<% ' ' %> <% main() Sub main() If Not(SessionCheck()) Then Exit Sub End If Dim admin admin = Request("admin") If admin = "" Then admin = Session("AdminPC") End If %> <% = AppTitle %> <% = HtmlDesign(8) %> <% = HtmlFooter %> <% End Sub %>