<% IF Not instr(CStr(Request.ServerVariables("SCRIPT_NAME")), "/login.asp") > 0 THEN If displayMenu(CStr(Request.ServerVariables("SCRIPT_NAME"))) Then %>    <%=Application(getLang() & "_strJBS_00060")%>   <%=Application(getLang() & "_strJBS_00400")%>   <%=Application(getLang() & "_strJBS_00420")%>   <%=Application(getLang() & "_strJBS_00410")%>   <%=Application(getLang() & "_strJBS_02120")%>   <%=Application(getLang() & "_strJBS_02580")%>   <%=Application(getLang() & "_strJBS_02340")%>   <%=Application(getLang() & "_strJBS_00260")%>    <% End if ELSE %> <% END IF %>

<% IF Not instr(CStr(Request.ServerVariables("SCRIPT_NAME")), "/login.asp") > 0 THEN If Len(Session("JBSX_aCompanyName")) <> 0 Then strName = Session("JBSX_aCompanyName") strUserType = "Advertiser" ElseIf Len(Session("JBSX_uFullName")) <> 0 Then strName = Session("JBSX_uFullName") strUserType = "Admin" Else strUserType = "" End If END IF %> <% =UserIndentifier(strName, strUserType) %> <% IF Not instr(CStr(Request.ServerVariables("SCRIPT_NAME")), "/login.asp") > 0 THEN Response.Write " " strBtn = false IF Application("JBSX_sSettings_ChangeTemplateIsEnable") = "True" THEN strBtn = true Response.Write Application(getLang() & "_strJBS_03290") & ": " Call WriteTemplatesSelectList(getTemplate()) Response.Write "  " END IF IF Application("JBSX_sSettings_ChangeLanguageIsEnable") = "True" THEN strBtn = true Response.Write Application(getLang() & "_strJBS_00010") & ": " Call WriteLanguageSelectList(getLang()) END IF if strBtn then Response.Write "" Response.Write "   " end if Response.Write " " END IF %>