<%@Language = "VBScript" %> <% 'write visit to server history log 'Application("HistLog") = Application("HistLog") & "" & now() & "99 MEN LIVE SITE ACCESS " & Session.SessionID & "" 'dim vars Dim sTitle 'set var values sTitle = Request.Querystring("title") 'set default page If sTitle = "" Then sTitle = "home" %> 99 Men Official Site

 
>>home>>shows>>band>>music>>photos>>video>>contact>>email list <% 'if user has admin cookie, show link in nav If Request.Cookies("99MenAdmin") = "true" Then %> >>admin <% End If %>

 
<% If sTitle = "home" Then %> <% ElseIf sTitle = "shows" Then %> <% ElseIf sTitle = "band" Then %> <% ElseIf sTitle = "music" Then %> <% ElseIf sTitle = "video" Then %> <% ElseIf sTitle = "photos" Then %> <% ElseIf sTitle = "contact" Then %> <% ElseIf sTitle = "email list" Then %> <% ElseIf sTitle = "admin" Then %> <% Else %> <% End If %>