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

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: MOD Implementation
 UserGroups Mod--isDeniedMember Can't see forum
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

sybaritic_life
Starting Member

Canada
9 Posts

Posted - 28 January 2010 :  08:54:12  Show Profile
I installed the UserGroups Mod by Nikkol (is it compatible with 3.4.07?) and I'm getting the error:

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'isDeniedMember'

/pgsa/forum/inc_func_secure.asp, line 100

my site is at: http://www.psych.ryerson.ca/pgsa/forum/default.asp
(Running on MSsql).

Any Help is appreciated. Thank you

Etymon
Advanced Member

United States
2393 Posts

Posted - 28 January 2010 :  09:30:11  Show Profile  Visit Etymon's Homepage
Make sure you run the dbs script first before you change the code. That may help.

If you don't want to uninstall all of your Usergroup MOD code in your files, then place an if then ... end if statement around all of that code. Run your dbs script, and then remove the statement. The statement can be something that is not true such as:

dim mytoday
mytoday = 0

if mytoday = 1 then
'Usergroup MOD code goes here'
end if

The isDeniedMember function depends on the getGroupMembership function in inc_func_common.asp which, in turn, depends on extracting data from the USERGROUP_USERS table. That table (as well as some other tables) is created by the dbs script. You may have uploaded your code changes before running the dbs script.

function isDeniedMember (fForum_ID,fMemberID)
if fMemberID <> MemberID then
strGroupsForUser = getGroupMembership(fMemberID,1)
'## get all deny groups for this forum
strSql = "SELECT USERGROUP_ID FROM " & strTablePrefix & "ALLOWED_USERGROUPS " &_
"WHERE FORUM_ID = " & fForum_ID & " AND PERMS = 1"

function getGroupMembership(intMemberID, intMemberType)
'## intMemberID can be either userID or UserGroupID
'## intMemberType: 1=user, 2=group

strSql = "SELECT USERGROUP_ID FROM " & strTablePrefix & "USERGROUP_USERS " &_
"WHERE MEMBER_TYPE = " & intMemberType & " AND MEMBER_ID = " & intMemberID


Edited by - Etymon on 28 January 2010 09:50:28
Go to Top of Page

AnonJr
Moderator

United States
5768 Posts

Posted - 28 January 2010 :  10:06:26  Show Profile  Visit AnonJr's Homepage
There are a number of updates that (I think) never got rolled into an official updated package. It does work with 3.4.07, but you can't install the MOD by using the line numbers as a lot of the code has shifted from when the MOD was written and now.

I'd go through the original thread and double-check all changes to make sure there wasn't a mistake.
Go to Top of Page

ruirib
Snitz Forums Admin

Portugal
26364 Posts

Posted - 28 January 2010 :  13:19:39  Show Profile  Send ruirib a Yahoo! Message
Those type mismatch errors usually mean the code for the function is missing, so you may have missed a file update or a file include.


Snitz 3.4 Readme | Like the support? Support Snitz too
Go to Top of Page

sybaritic_life
Starting Member

Canada
9 Posts

Posted - 29 January 2010 :  08:58:36  Show Profile
The problem was was ruirib suggested: I did not update the admin_members file with the function.

The UserGroup Mod appears to work with 3.4.07.

Thanks all for a very quick response!
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.92 seconds. Powered By: Snitz Forums 2000 Version 3.4.07