ok, try this:
inc inc_functions.asp find the function getMember_Level(fM_TITLE, fM_LEVEL, fM_POSTS)
replace the entire function with this: (or you can just add the parts in red, your choice, replacing would be easier)
function getMember_Level(fM_TITLE, fM_LEVEL, fM_POSTS, fFORUM_ID, fM_NAME)
dim Member_Level
Member_Level = ""
if Trim(fM_TITLE) <> "" then
Member_Level = fM_TITLE
else
select case fM_LEVEL
case "1"
if (fM_POSTS < intRankLevel1) then Member_Level = Member_Level & strRankLevel0
if (fM_POSTS >= intRankLevel1) and (fM_POSTS < intRankLevel2) then Member_Level = Member_Level & strRankLevel1
if (fM_POSTS >= intRankLevel2) and (fM_POSTS < intRankLevel3) then Member_Level = Member_Level & strRankLevel2
if (fM_POSTS >= intRankLevel3) and (fM_POSTS < intRankLevel4) then Member_Level = Member_Level & strRankLevel3
if (fM_POSTS >= intRankLevel4) and (fM_POSTS < intRankLevel5) then Member_Level = Member_Level & strRankLevel4
if (fM_POSTS >= intRankLevel5) then Member_Level = Member_Level & strRankLevel5
case "2"
if (chkForumModerator(fFORUM_ID, fM_NAME) = 1) or (Instr(Request.ServerVariables("Path_Info"), "members.asp") <> 0) then
Member_Level = Member_Level & strRankMod
else
if (fM_POSTS < intRankLevel1) then Member_Level = Member_Level & strRankLevel0
if (fM_POSTS >= intRankLevel1) and (fM_POSTS < intRankLevel2) then Member_Level = Member_Level & strRankLevel1
if (fM_POSTS >= intRankLevel2) and (fM_POSTS < intRankLevel3) then Member_Level = Member_Level & strRankLevel2
if (fM_POSTS >= intRankLevel3) and (fM_POSTS < intRankLevel4) then Member_Level = Member_Level & strRankLevel3
if (fM_POSTS >= intRankLevel4) and (fM_POSTS < intRankLevel5) then Member_Level = Member_Level & strRankLevel4
if (fM_POSTS >= intRankLevel5) then Member_Level = Member_Level & strRankLevel5
end if
case "3"
Member_Level = Member_Level & strRankAdmin
case else
Member_Level = Member_Level & "Error"
end select
end if
getMember_Level = Member_Level
end function
then in topic.asp search for: (there is 2 instances of it, be sure to replace both instances)
<% = ChkString(getMember_Level(rs("M_TITLE"), rs("M_LEVEL"), rs("M_POSTS")),"display") %>
replace it with:
<% = ChkString(getMember_Level(rs("M_TITLE"), rs("M_LEVEL"), rs("M_POSTS"), Request.QueryString("FORUM_ID"), rs("M_NAME")),"display") %>
in members.asp
search for:
<% =ChkString(getMember_Level(rs("M_TITLE"), rs("M_LEVEL"), rs("M_POSTS")),"display") %>
change it to:
<% =ChkString(getMember_Level(rs("M_TITLE"), rs("M_LEVEL"), rs("M_POSTS"), 0, rs("M_NAME")),"display") %>