case else
          strPage = strPage & fLang(strLangMOD_Ls3kAU_01380)
      end select
    case else
      if instr(lcase(fScript), "pm_") or instr(lcase(fScript), "private") then
        strPage = "Prvate Messages"
      else
        strPage = strPage & Mid(fScript, 1, instr(fScript, ".")-1)
      end if
  end select

  strPage = strPage & "</a>"
  if lcase(instr(fscript, "admin_")) > 0 Then
    strPage = fLang(strLangMOD_Ls3kAU_01380)    
  end if
  WhatPage = strPage
end function