check for logged in user - Snitz™ Forums 2000

The Forum has been Updated

The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.

check for logged in user - Posted 27 May 2009 18:59 (1518 Views)

dongough

Starting Member

Posts: 6

Hi

Can anyone assist with the correct code for this please (I'm new to ASP and not really sure what I'm doing)

I want to allow only logged in forum members to access another non-forum part of the website. It's all in the same directory as the forum code.
If they are logged in, they can access the other page/s, if they are not logged in, they are redirected to the forum login page

The response.redirect & response.write each appear to work fine. I'm just lost finding the right code to check the members login status

Thanks




<%

select case Request.Form("Method_Type")
case "login"
if strLoginStatus = 0 then
Response.Redirect "default.asp"

Else

Response.Write "<html>" & vbNewline & _
"<head>" & vbNewline & _
"<script language=""JavaScript"" type=""text/javascript"">" & vbNewLine & _
"" & vbNewLine & _
"</script>" & vbNewLine & _
"</head>" & vbNewline & _
"<frameset rows=""100%"" border=""0"">" & vbNewline & _
"<frame name=""members"" src=""a welcome page"" marginwidth=""0"" marginheight=""0"" scrolling=""auto"" frameborder=""0"">" & vbNewline & _
"</frameset>" & vbNewline & _
"<body>" & vbNewline & _
"</body>" & vbNewline & _
"</html>" & vbNewline
End if
End select
%>

<moved from="Help: General / Current Version (v3.4.xx)" by="Shaggy" />

Last edited by Shaggy on 29 May 2009, 04:30

Posted 27 May 2009 21:06

Carefree

Advanced Member

Posts: 4224

4224

Use mLev.

Code:


if mLev > 0 then ' Logged in
  ' Allow access
else
  Response.Redirect ....
end if

Posted 28 May 2009 15:49

dongough

Starting Member

Posts: 6

Hi

Many thanks for that, I've set it up as you suggest however there still appears to be a problem

The code seems to be unable to read the member level. Whether I am logged in to the Forum or not, the code alwasys responds as if the mlev=0. I hvae tested this by changing the code to read mlev = 0, mlev = 1, mlev = 2, mlev = 3, ect & based on the test results I have determined that the code cannot see the correct member level when I am logged in.
Is there an error in my code somewhere, some extra code needed, or a missing include?
Regards
Don







<%
if mlev > 0 then
Response.Write "<html>" & vbNewline & _
"<head>" & vbNewline & _
"<script language=""JavaScript"" type=""text/javascript"">" & vbNewLine & _
"" & vbNewLine & _
"</script>" & vbNewLine & _
"</head>" & vbNewline & _
"<frameset rows=""100%"" border=""0"">" & vbNewline & _
"<frame name=""members"" src=""my welcome page"" marginwidth=""0"" marginheight=""0"" scrolling=""auto"" frameborder=""0"">" & vbNewline & _
"</frameset>" & vbNewline & _
"<body>" & vbNewline & _
"</body>" & vbNewline & _
"</html>" & vbNewline
else
Response.Redirect "default.asp"
End if
%>

Posted 29 May 2009 04:29

Shaggy

Support Moderator

Posts: 6780

6780

You'll need to call the chkUser function in order to assign a value to the mlev function. Have a look in inc_header.asp to see how it's done.

Search is your friend “I was having a mildly paranoid day, mostly due to the
fact that the mad priest lady from over the river had
taken to nailing weasels to my front door again.”

Posted 29 May 2009 04:39

dongough

Starting Member

Posts: 6

Many thanks

I'll give it a go

Posted 02 Jun 2009 02:05

dongough

Starting Member

Posts: 6

All sorted & running

Thanks for your help

Don