Removing 'Moderator(s)' column ? - Posted (1071 Views)
Average Member
Webbo
Posts: 982
982
Is it possible to have the column on the default.asp page that shows the list of moderators veiwable by only the super Administrator?
At present it is not shown to non-members and members but is shown to moderators and admins. Because of the number of moderators we have, when logged in as a moderator or administrator the layout looks cluttered.
I know there is the option in 'Feature Configuration' to not show moderators to normal users ....
What does Show Moderators do?
Basically, if this function is on, it shows the name of the moderator beside the forum that they moderate on the main default page. If it is off, however, visitors won't see who is moderating the forum they are posting in.

It would be ideal if I could extend this to moderators and normal administrators as well as

Many thanks in advance smile
 Sort direction, for dates DESC means newest first  
 Page size 
Posted
Advanced Member
Carefree
Posts: 4224
4224
Look for this line (appx 100):

Code:
if (strShowModerators = "1") or (mlev = 4 or mlev = 3) then

Change it to say:

Code:
if mlev = 4 then
Posted
Average Member
Webbo
Posts: 982
982
That's what I thought but it just removes the moderators names and leaves the column

There's 3 instances of:
if (strShowModerators = "1") or (mlev = 4 or mlev = 3) then

and one instance of:
if (strShowModerators = "1") or (mlev > 0 ) then

relating to the moderators names being diplayed and setting the columns in the tables but editing the code upsets the layout
Posted
Forum Moderator
AnonJr
Posts: 5768
5768
Most likely you will need to repeat the advice for those entries as well. I would double-check the surrounding code to make sure they are referring to displaying the moderator's column.
Posted
Advanced Member
Carefree
Posts: 4224
4224
I misunderstood, thought you only wanted to eliminate the list of moderators. I'll take another look.
Posted
Advanced Member
Carefree
Posts: 4224
4224
OK - here's what you need to do:

Code:

Look for these lines (appx 536-538):

if (strShowModerators = "1") or (mlev = 4 or mlev = 3) then
Response.Write " <td bgcolor=""" & strForumCellColor & """ align=""left"" valign=""top""><font face=""" & strDefaultFontFace & """ color=""" & strForumFontColor & """ size=""" & strFooterFontSize & """><span class=""spnMessageText"">" & listForumModerators(ForumID) & "</span></font></td>" & vbNewline
end if

Comment them out (put an apostrophe in front of each) or delete them.
Look for these lines (appx 321-325):

if (strShowModerators = "1") or (mlev > 0 ) then
Response.Write "6"
else
Response.Write "5"
end if

Change them to say:

Response.Write "5"
Look for these lines (appx 307-309):

if (strShowModerators = "1") or (mlev = 4 or mlev = 3) then
Response.Write " <td align=""center"" bgcolor=""" & strHeadCellColor & """ nowrap valign=""top""><b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHeadFontColor & """>Moderator(s)</font></b></td>" & vbNewline
end if

Comment them out (put an apostrophe in front of each) or delete them.
Posted
Average Member
Webbo
Posts: 982
982
Hi Carefree if I remove the reference to 'mlev = 3' from lines 307-9 and 536-8 I get the following:

Before change to code:

After change to code:



Changing 321-5 from 6 to 5 doesn't make any difference to the number of columns in the category name row.


Posted
Advanced Member
Carefree
Posts: 4224
4224
See all instances of this:

sGetColspan(6,5)

Change them to this:

sGetColspan(5,4)
 
You Must enter a message