Ir para conteúdo
Fórum Script Brasil
  • 0

Tempo De Login


Luka13th

Pergunta

Tenho uma página de acesso restrito (funciona normal), mas gostaria que ela tivesse um tempo muito longo de permissão, antes que caia automaticamente.

É possível determinar o tempo que o usuário pode ficar numa página restrita? Ou então, é possível que o acesso permaneça e não caia, saindo somente quando ele clicar em logoff?

Minha página:

<%
' *** Restrict Access To Page: Grant or deny access to this page

MM_authorizedUsers=""
MM_authFailedURL="erro_perm.asp"
MM_grantAccess=false

If Session("MM_Username") <> "" Then
  If (true Or CStr(Session("MM_UserAuthorization"))="") Or _
         (InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1) Then
    MM_grantAccess = true

  End If
End If

If Not MM_grantAccess Then
  MM_qsChar = "?"
  If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&"
  MM_referrer = Request.ServerVariables("URL")
  if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" & Request.QueryString()
  MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" & Server.URLEncode(MM_referrer)
  Response.Redirect(MM_authFailedURL)

End If
%>

<!--#include file="Connections/Usuarios.asp" -->

<%
Dim Usuarios__MMColParam
Usuarios__MMColParam = "1"
If (Request.QueryString("ID") <> "") Then 
  Usuarios__MMColParam = Request.QueryString("ID")
End If
%>

<%
Dim Usuarios
Dim Usuarios_numRows

Set Usuarios = Server.CreateObject("ADODB.Recordset")
Usuarios.ActiveConnection = MM_Usuarios_STRING
Usuarios.Source = "SELECT * FROM Usuarios WHERE ID = " + Replace(Usuarios__MMColParam, "'", "''") + ""
Usuarios.CursorType = 0
Usuarios.CursorLocation = 2
Usuarios.LockType = 1
Usuarios.Open()

Usuarios_numRows = 0
%>

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...