MOD: Admin Level Revisited for 3.4

Snitz™ Forums 2000
https://forum.snitz.com/forumTopic/Posts/59698?pagenum=1
05 November 2025, 12:46

Topic

SiSL
MOD: Admin Level Revisited for 3.4
30 September 2005, 22:01


Admin Level Revisited for Snitz 3.4
AUTHOR: Selçuk Islamoglu (SiSL)
Initial Release : 10/1/2005

This mod is designed over original Admin Level mod by David Kohen (Copyright David Kohen (2002) and the Snitz Forums 2000 development team.). Differently, you can select from 3 administrator types. Global moderators, Maintenance Administrators and Super admins and Master Admin (that's you!)

Features:
- Administrators can set to 3 groups
- Global moderators can not access to any administration options
- Maintenance Admins and Super admins can access to defined administrator pages.
- Super admins can access every page that Maintenance Admins can.
- Administrators can edit inferior level administrators details.
- You can edit which group of administrators can access to which pages by editing file list include.

Cons
- This mod assumes all administration page names starting with "admin_" as a Snitz Modding custom.

Download here
(PS: As an Archieve-searching handicapped, I apologize if similiar mod for categorizing admins over AdminLevel mod has been previously released)
<

 

Replies ...

SiSL
01 October 2005, 11:06


UPDATE: Install.htm due its being of Dreamweaver prepared, ate some of " and ") updated install.htm in same link.<
BroIgnatius
23 August 2008, 06:57


I have installed this Admin Level Revisited but cannot get it to work.
I think there is a coding error in the inc_profile.asp file. In the modify Profile mode it should have a drop down box for the levels. All I get is TEXT of the levels all running together.

I have tried numerous things to fix this but to no avail.
Is anybody else using this MOD who can help with this?
<
Etymon
23 August 2008, 08:03


I'll install it here in a minute or so and see if I can find out what's the matter with it.<
Carefree
23 August 2008, 11:23


From the looks of it, you have a problem with the select command. Post a link to your "inc_profile.asp" in .txt format & we can take a look.<
BroIgnatius
23 August 2008, 16:38



Here's the link
inc_profile.asp.txt
Thanks. <
Etymon
23 August 2008, 20:41


In the dbs_ I saw a problem, but to understand it look at the mod code for inc_profile.asp:

if rs("M_ALEVEL") = 3 Then Response.Write "FORUM MASTER"
if rs("M_ALEVEL") = 2 Then Response.Write "Super Admin"
if rs("M_ALEVEL") = 1 Then Response.Write "Maintenance Admin"
if rs("M_ALEVEL") = 0 Then Response.Write "Global Moderator"

The FORUM MASTER, in Snitz terms, is the Member ID designation for intAdminMemberID

In a standard Snitz install, intAdminMemberID is a constant and set to Member_ID number 1

In the dbs_ for this MOD it does not look for the intAdminMemberID and sets all admins to the value of 1 for the M_ALEVEL column. Well, that was the intention. For me, it kept my M_ALEVEL at 0 for my intAdminMemberID.
If you are the intAdminMemberID, then get into your database and set your M_ALEVEL to 3, and then you should see the dropdown.
The other problem I saw was the placement for the dropdown. It said to look for this code:

Code:
		if rs("MEMBER_ID") = intAdminMemberID then
			Response.Write	"                      <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>Administrator</font>" & vbNewLine & _
					"                      <input type=""hidden"" value=""3"" name=""Level"">" & vbNewLine
		else
			Response.Write	"                      <select value=""1"" name=""Level"">" & vbNewLine & _
					"                           <option value=""1"""
			if rs("M_LEVEL") = 1 then Response.Write(" selected")
			Response.Write	">Normal User</option>" & vbNewLine & _
					"                           <option value=""2"""
			if rs("M_LEVEL") = 2 then Response.Write(" selected")
			Response.Write	">Moderator</option>" & vbNewLine & _
					"                           <option value=""3"""
			if rs("M_LEVEL") = 3 then Response.Write(" selected")
			Response.Write	">Administrator</option>" & vbNewLine & _
					"                      </select>" & vbNewLine
		end if
		Response.Write	"                      </td>" & vbNewLine & _
				"                    </tr>" & vbNewLine
	end if
	if not(strUseExtendedProfile) then

and to add the MOD's code just before the end if statement. There are two end if statements there. It should be inserted after the </tr>" & vbNewLine and before the second end if.
Try those things and post back what you get.<
Carefree
23 August 2008, 23:33


Immediately prior to the modification for the admin levels, you lost two closing statements </td> & </tr>. Where they should be, you had blank spaces being printed.
Try this version. Don't worry about a certificate warning, I'm aware of it.<
BroIgnatius
24 August 2008, 00:13


Hi Guys:

no go. it does not work. I originally did it exactly as instructed in the MOD of which you guys referred to. That's why I started messing with it to figure out why.
I also used your version Carefree.

The MEMBER_ID 1 has its ALEVEL set to 3. no go.
<
Carefree
24 August 2008, 00:32


Alright, I'll go through your file line-by-line and try to pinpoint it. Cannot do much with it because of the various missing includes, but I'll comment them out & test it.<
Carefree
24 August 2008, 01:49


Done with it. Tested it by removing the includes, and it works. Link has been updated.<
BroIgnatius
24 August 2008, 11:08


Hi:

No, still does not work. I do not think the Member_ID and M_ALevel values are being pull in from the Db.
I give up.
Thanks anyway.
<
Carefree
24 August 2008, 12:05


Worked perfectly here. Your error must be caused by some other issue (perhaps the database fields weren't made properly?).

Would someone else running this mod check his file (in my post higher) within their board? You'll need to remove two includes (711-713) and (695-697).<
© 2000-2021 Snitz™ Communications