Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
 Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/O Code)
 Common Allowed Members List		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Carnivorous
Starting Member

5 Posts
Posted - 29 April 2003 :  12:39:51  Show Profile
We run a large gaming community at http://www.iron-hq.com/forums

Most of our forums have restricted access since it's a private group. The problem comes in when we add/remove members. We have to go to each individual to Forum and change the allowed members list to add/remove the member.

It would be great to have a mod that used a common Allowed Members list or a way to more easily add/remove people from multiple forums.

Thanks

Ez4arab
Junior Member

479 Posts
Posted - 29 April 2003 :  16:37:51  Show Profile  Visit Ez4arab's Homepage 

' ######################################################################################################################
' Show Allowed Members  - adapted from Iron Heart @ http://www.someplacesomewhere.com
'						- modified by Dayve @ http://www.burningsoulsforum.com
		Dim privateMembers, privateCount
		strSql = "SELECT DISTINCT M_NAME, FORUM_MEMBERS.MEMBER_ID FROM " & strTablePrefix & "ALLOWED_MEMBERS, "
		strSql = strSql & strTablePrefix & "MEMBERS "
		strSql = strSql & " WHERE FORUM_ALLOWED_MEMBERS.MEMBER_ID = FORUM_MEMBERS.MEMBER_ID AND FORUM_ALLOWED_MEMBERS.FORUM_ID = " & ForumID
		strSql = strSql & " ORDER BY M_NAME ASC"
		response.write " "
			set rsPrivate = my_conn.Execute (strSql)
			if rsPrivate.BOF or rsPrivate.EOF then
			' Do Nothing
			else
			privateMembers = ""
			privateCount = 0
			rsPrivate.MoveFirst
			privateMembers = " <a href=""pop_profile.asp?mode=display&id="& rsPrivate("MEMBER_ID") & """>" & rsPrivate("M_NAME")
			privateCount = privateCount + 1
			rsPrivate.MoveNext
			do until rsPrivate.EOF
			 privateMembers = privateMembers & "</a>   "
				if strUseExtendedProfile then
					privateMembers = privateMembers & "<a href=""pop_profile.asp?mode=display&id="& rsPrivate("MEMBER_ID") & """>"
					privateCount = privateCount + 1
    			else
					privateMembers = privateMembers & "<a href=""JavaScript:OpenWindow2('pop_profile.asp?mode=display&id=" & rsPrivate("MEMBER_ID") & "')"">"
					privateCount = privateCount + 1
    			end if
			 privateMembers = privateMembers & rsPrivate("M_NAME")
			 rsPrivate.MoveNext
			loop

			privateMembers = privateMembers & "</a>"
			response.write "<b>[" & privateCount & "]" & "  </b>" & privateMembers
			end if

' end Show Allowed Members
'###################################################################################################################
Ez4arab web site Ez4arab |
Go to Top of Page

Kent
Junior Member

United States
193 Posts
Posted - 30 April 2003 :  12:01:46  Show Profile
Where does this code go, and what does it do?

I'm looking for a mod that supports having a list of paid subscribers (actually dues-paying club members) that allows them full access to every feature and function. I'd like anyone to be able register and use some features/functions, so that they can have a "limited, trial membership" to induce them to join and pay up....
Edited by - Kent on 30 April 2003 12:04:21
Go to Top of Page

Ez4arab
Junior Member

479 Posts
Posted - 30 April 2003 :  13:33:29  Show Profile  Visit Ez4arab's Homepage
you can put this code in file default.asp
Ez4arab web site Ez4arab |
Go to Top of Page

EagleShard
Starting Member

5 Posts
Posted - 03 May 2003 :  12:20:19  Show Profile
Okay, very dumb questions coming up so try not to laught too hard...StrSql means that it only works with a mySQL db right? (I'm running an Access 2000 db)? Also how does the allowed members list get edited?

Thanks for any help...
Go to Top of Page

gelliott
Junior Member

USA
268 Posts
Posted - 03 May 2003 :  22:21:05  Show Profile
Not quite. SQL is also a query language used in MS Access and other database structures. The strSQL variable in the code is typically used to store the query definition which is used to retreive data from many database types.

Right now, you can edit the Allowed Members List by editing the forum's properties (that pencil icon admins see to the right in the "All Forums" main page). But this must be done forum by forum in the current/base code.
* The optimist says the cup is half full. The pessimist says it's half empty. But the engineer knows the truth - the cup's design is incorrectly sized.
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.27 seconds. Powered By: Snitz Forums 2000 Version 3.4.07