Inquiridor
Duvida!

Pergunta
-
Boa tarde .
Galera tenho uma duvida !!
O que eu quero fazer e o seguinte quando o usuario digitar o endereço abaixo ele não pode entrar na tele e sim mandar ele para tela de login para 1º fazer o login e depois mandar ele novamante para a tela que ele escolheu!
Exemplo:
Quando ele digita este caminho o sistema deixa ele entrar direto na telasem fazer o login : http://beta/Chamado/funcionario1.asp
que fazer que ele digite o login em qualquer tela.
Fiz assim olha o codigo porém ainda não to conseguindo :
DIM SENHA
Session("SENHA") = "login.asp"
IF session("SENHA")<>"" THEN
RESPONSE.Redirect(SESSION("SENHA"))
ELSE
RESPONSE.Redirect("login.asp")
END IFEste cod esta na tela funcionario1.asp.
Abraço.
Emerson Sobral
Todas as Respostas
-
-
-
Emerson,
Nas páginas que voce NAO quer que tenha acesso direto, ou seja, que nao acessem pela url antes de se fazer o login voce pode o código abaixo: O código pela a url que ele esta tentando acessar e pega osomente a pagina, ou seja, se ele estiver tentando acessar http://www.seusite.com.br/cadastro.asp ele ira pegar somente "cadastro.asp" e guarda dentro de uma Session, ok? Nas 3 ultimas linhas ele verifica se a session que guarda a senha (ou usuario como preferir) esta em branco ou é nula, se for redireciona para a pagina de login.
Pagina Teste3.asp
<%
Dim urlcomp, tamurl, pagina, pos_barraurlcomp = request.ServerVariables("URL")
tamurl = len(urlcomp) - 1
urlcomp = right(urlcomp,tamurl - 1)
pos_barra = InStr(urlcomp,"/") + 1
pagina = mid(urlcomp,pos_barra,tamurl)Session("url") = pagina
if IsNull(Session("senha")) Or Session("senha") = "" then
Response.Redirect("login.asp")
end if
%>Na pagina de login ele vai digitar o usuario e senha dele certo e clicar em enviar, no qual vai ser submetido a uma outra pagina que ira fazer a verificação de usuario e senha, nesta página que verifica o login voce devera garantir que a senha ou o usuario estejam gravadas dentro da Session que é verificada nas paginas, neste caso de teste seria a senha que deveria ficar armazenda em Session("senha") ok? Outra coisa na na página de login deve-se verificar se a Session("url") esta preenchida ou nao se estiver então teremos que redirecionar para a Session("url") e nao para pagina padrão.
Estou colocando abaixo paginas de teste que fiz!
Lembrando voce deve modifica-las de acordo com seu projeto ai.
Pagina Login.html
<!--
-->
Pagina VerificaLogin.asp<%
Session("usuario") = Request.Form("usuario")
Session("senha") = Request.Form("senha")if Session("usuario") <> "lestevam" then
Response.Redirect ("login.asp")
elseif Session("senha") <> "123" then
Response.redirect ("login.asp")
elseif Session("url") <> "" then
Response.Redirect (Session("url"))
else
Response.Redirect ("teste2.asp")
end if%>
Bom tenta alterar o necessário ai e qualquer coisa posta novamente.
Abraços
Estevam