sorry, yes, you encase the Showthispage part like
<% @ Language=VBScript %> <% Option Explicit %> <% blnShowThisPage = True %> <!--#include file="common.asp" --> |
add for the stopping users from viewing pages add:
If lngLoggedInUserID = 2 And not blnShowThisPage Then Call closeDatabase() response.redirect("login_user.asp") End If |
after the following line like so:
(it doesnt need to be encased in <% and %> since its already inside them)
'Call the sub procedure to read in the details for this user Call getUserData("UID")
If lngLoggedInUserID = 2 And not blnShowThisPage Then
Call closeDatabase()
response.redirect("login_user.asp")
End If
'Make sure the main admin account remains active and full access rights and in the admin group If lngLoggedInUserID = 1 Then intGroupID = 1 blnActiveMember = True blnBanned = False End If
|
hopefully this will be ok and work.
Edited by Scotty_32 - 08 July 2006 at 10:16am