Ok, so far I have added an extra option in post.asp
option number 10 to be exact and have created a forum
which is supposed to be only accessible to those with
(in my case) 150 posts or more.
However, I'm stuck at the following snippet in inc_func_secure

case 10

'## VIP Forum
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_POSTS"
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS "
strSql = strSql & " WHERE MEMBER_ID=" & isAllowedMember

set rsCase10 = my_Conn.Execute(strSql)

if rsCase10("M_POSTS") > 150 then chkDisplayForum = true
if rsCase10("M_POSTS") = 150 then chkDisplayForum = true
if rsCase10("M_POSTS") < 150 then chkDisplayForum = false

rsCase10.close
set rsCase10=nothing

However when trying to access the forum as a non-admin with > 150 posts I get this:

Microsoft VBScript runtime error '800a01f5'

Illegal assignment: 'chkDisplayForum'

/forum/inc_func_secure.asp, line 221
With line 221 being this one:
if rsCase10("M_POSTS") > 150 then chkDisplayForum = true
What am I doing wrong and how to fix it? Or is this already done? (Couldn't find it with search though)

I think when working this would be a great addition to most forums. Nothing more motivating to be active when something is waiting at the
end. (When solved I plan on making different levels of VIP depending on the ammount of posts).
Greets & thanks,

Dominic
<