<% If sPseudo <> "" Then sTitlePage = Replace(GetTranslation("LANG_TITLE_DEFAULT2"), "%1%", Server.HTMLEncode(sPseudo)) Else sTitlePage = GetTranslation("LANG_TITLE_DEFAULT") End If %> <% Response.Write "" & vbCRLF Response.Write " " & vbCRLF If GLOBAL_NEWS_LINKS_TOP > 0 and GLOBAL_FORUM_TOP > 0 Then Response.Write " " & vbCRLF Response.Write " " & vbCRLF Response.Write " " & vbCRLF ElseIf GLOBAL_NEWS_LINKS_TOP > 0 Then Response.Write " " & vbCRLF Response.Write " " & vbCRLF ElseIf GLOBAL_FORUM_TOP > 0 Then Response.Write " " & vbCRLF Response.Write " " & vbCRLF End If Response.Write "
" & vbCRLF Response.Write " " & vbCRLF Response.Write "
" & vbCRLF DisplayTopNewsLinks GLOBAL_NEWS_LINKS_TOP, 0 Response.Write "
" & vbCRLF DisplayTopForum GLOBAL_FORUM_TOP Response.Write "
" & vbCRLF DisplayTopNews GLOBAL_NEWS_TOP, 0 %>