Trouble administrating my forum

Whenever i try to administrate my forum it says i have insufficiant permission to do so.....even when im logged in as administrator. Am i doing something wrong???

If someone can point me in the right direction i will be very gratefull

Rite,

Ive managed to find the file forum_permission.  Can anyone tell me if this code is rite???

'Turn the members status number returned from the database into a string value
Select Case intMemberStatus
 'Guest status
 Case 0
  strMemberStatus = "Guest"
 'Standard member status
 Case 1
  strMemberStatus = "Standard"
 'Super member status
 Case 2
  strMemberStatus = "Super"
 'Power member status
 Case 3
  strMemberStatus = "Power"
End select

'Get the security level for the member within this forum
If Request.QueryString("ForumID") <> "" Then
  
 'Intialise the ADO recordset object
 Set rsSecurityLevel = Server.CreateObject("ADODB.Recordset")
 
 'Initlise the sql statement
 If strDatabaseType = "SQLServer" Then
  strSQL = "EXECUTE wwfSpForumsAllWhereForumIs @intForumID = " & CInt(Request("ForumID"))
 Else
  strSQL = "SELECT tblForum." & strMemberStatus & " FROM tblForum WHERE tblForum.Forum_ID=" & CInt(Request("ForumID")) & "; "
 End If
 
 'Query the database
 rsSecurityLevel.Open strSQL, strCon
    
 'If theres a record returned then get the security level of the user on this forum
 If NOT rsSecurityLevel.EOF Then
  intMemberSecurityLevel = CInt(rsSecurityLevel(strMemberStatus))
 End If
    
 'Get rid of them objects
 rsSecurityLevel.Close
 Set rsSecurityLevel = Nothing 
End If

'If the user is the forum admin or moderator then set there security level to 1 (read and write)
If lngLoggedInUserID = 1 OR blnModerator = True Then intMemberSecurityLevel = 1

'If the security level for this user on this forum is 3 they don't have permission to view this forum so send them elsewhere
If intMemberSecurityLevel = 3 Then
 
 'Reset Server Objects
 Set adoCon = Nothing
 Set strCon = Nothing
 
 'Redirect to no permission page
 Response.Redirect("insufficient_permission.asp?" & Request.ServerVariables("QUERY_STRING"))
End If
%>