Print Page | Close Window

Show List of Mods on Front Page

Printed From: Web Wiz Forums
Category: Web Wiz Web App Support Forums
Forum Name: Web Wiz Forums Modifications
Forum Description: Mod's and Add-on's for Web Wiz Forums.
URL: https://forums.webwiz.net/forum_posts.asp?TID=25305
Printed Date: 29 March 2026 at 2:57am
Software Version: Web Wiz Forums 12.08 - https://www.webwizforums.com


Topic: Show List of Mods on Front Page
Posted By: sparkweb
Subject: Show List of Mods on Front Page
Date Posted: 16 February 2008 at 8:19am
This was a nice feature in 7.x and after I upgraded I had many of my users request it back so I guess it's worth the DB hit. Hopefully this will save you a few minutes if you want to put this on your forum.
 
This places a list of the forum moderators below each forum on the front page.
 
Step 1: Add... "Dim strModeratorsList" to the declarations at the top of default.asp
 
Step 2: Add this code around line 650. I've made a lot of mods to my default.asp page so I couldn't tell you for sure where it goes. I put it in between " 'Display the number of people viewing in that forum" and " 'Display forum details".
 
Quote
'Get the List of Group Moderators for the Forum
strModeratorsList = ""
strSQL = "SELECT " & strDbTable & "Author.Author_ID, " & strDbTable & "Author.Username "
strSQL = strSQL & "FROM " & strDbTable & "Permissions, " & strDbTable & "Author "
strSQL = strSQL & "WHERE " & strDbTable & "Author.Author_ID = " & strDbTable & "Permissions.Author_ID AND " & strDbTable & "Permissions.Moderate = " & strDBTrue & " AND " & strDbTable & "Permissions.Forum_ID = " & intForumID & ";"
rsCommon.Open strSQL, adoCon
Do While Not rsCommon.eof
 If strModeratorsList = "" Then
  strModeratorsList = "<br /><span class=""smText"">Moderators:</span> "
 Else
  strModeratorsList = strModeratorsList & ", "
 End If
 strModeratorsList = strModeratorsList & "<a href=""member_profile.asp?PF=" & rsCommon("Author_ID") & """ class=""smLink"">" & rsCommon("Username") & "</a>"
 rsCommon.MoveNext
Loop
rsCommon.Close
 
Step 3: In the Forum Details section (again, roughly around line 675) change this line
 
Quote
Response.Write("<br />" & strForumDiscription & strSubForums & "</td>" & _
 
to be this:
 
Quote
Response.Write("<br />" & strForumDiscription & strSubForums & strModeratorsList & "</td>" & _
 
...and the coding is done.
 
Step 4: Login to the admin tool and manually set user permissions for each moderator you want to set up for each section. Even though they have permissions by their group, this tool looks for their individual member permissions for reference. Click member permissions, search for your user, check off "Forum Moderator", check off your affected forums, and you are good to go.
 
...and that'll do it!



Replies:
Posted By: 123Simples
Date Posted: 05 July 2008 at 5:51pm
Great mod and works fine Thumbs%20Up

-------------
http://www.123simples.com/" rel="nofollow - Visit 123 Simples Web Design


Posted By: Putz22
Date Posted: 08 July 2008 at 2:14am
This is a great Mod I also have it working on my forums too..



Print Page | Close Window

Forum Software by Web Wiz Forums® version 12.08 - https://www.webwizforums.com
Copyright ©2001-2026 Web Wiz Ltd. - https://www.webwiz.net