<% Response.Expires = -1 Response.AddHeader "Pragma", "no-cache" Response.AddHeader "cache-control", "no-store" sShadeColor = "#ffffff" sSublimeColor = "#d0d0d0" sStrongColor = "#555555" sContrast1Color = "#505050" sContrast2Color = "#f0f0f0" sContrast3Color = "black" sEmphasizeColor = "#406CB5" sBackgroundColor = "white" Function DisplayLanguage(ID) If ID = 1 Then DisplayLanguage = langMgr.GetContent("LANG_ADMIN_SPANISH", "BackEndMessages", iInterfaceLang) Elseif ID = 2 Then DisplayLanguage = langMgr.GetContent("LANG_ADMIN_ENGLISH", "BackEndMessages", iInterfaceLang) End If End Function %> <%If strCheckSec <> "NO" Then%> <%End If%> <%=sExtraHead%> topmargin=0 leftmargin=0 marginwidth= marginheight=0 link=<%=sContrast1Color%> alink=<%=sContrast3Color%> vlink=<%=sContrast1Color%> > >

<% If strDisplayMenu <> "NO" Then%> > <%=langMgr.GetContent("MENU_HOME", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_CONTENT", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_INTRANET", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_SETTINGS", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_SITE_MESSAGES", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_IMAGES", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_ADMINUSER", "BackEndMessages",iInterfaceLang)%> | <%=langMgr.GetContent("MENU_BACK_SITE", "BackEndMessages",iInterfaceLang)%> ">>:: <%=langMgr.GetContent("MENU_TELL_US", "BackEndMessages",iInterfaceLang)%> <% Else Response.Write " " End If %>

<%=langMgr.GetContent("CONTENT_LANGUAGE_INFO", "BackEndMessages",iInterfaceLang)%> <%=DisplayLanguage(iContentLang)%>