Jump to content


Photo

Depois Do Cadastro


  • Faça o login para participar
11 replies to this topic

#1 watequate

watequate

    Turista

  • Usuários
  • 50 posts
  • Sexo:Não informado

Posted 18/06/2005, 10:50

Primeiramente gostaria de agradecer e muito a todos q me ajudaram a fazer o codigo para o cadastro de visitantes e para o login do msm.

Estou com uma duvida nova (hehe).

Como eu faço para aparecer a msg pro visitante se logar qnd acessar uma determinada pagina ? A principio só kero obrigar a pessoa se logar na parte de fotos. Como eu faço isso ?

#2 Generation

Generation

    Super Veterano

  • Usuários
  • 1546 posts
  • Sexo:Masculino
  • Localidade:Curitiba - PR

Posted 18/06/2005, 10:59

Após o usuario se logar no site e os dados conferirem com o banco crie uma Session("Login")=True

Coloque isso na pagina de fotos, logo no inicio.

<%
If Session("Login") <> True Then
Response.Redirect "Logar.asp"
End if
%>


T+
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)

#3 edmais

edmais

    Just do it!

  • Usuários
  • 797 posts
  • Sexo:Não informado
  • Localidade:BH - MG

Posted 18/06/2005, 11:24

É.. e pra dar a msg como vc quer, podes usar Javascript..

Implementando..

<%
If Session("Login") <> True Then
%>
<script language="javascript">
alert("Para acessar esta página, você deve estar logado");
location.href = "Logar.asp";
</script>
<%
End if
%>


Abs.
Eduardo Batista

#4 watequate

watequate

    Turista

  • Usuários
  • 50 posts
  • Sexo:Não informado

Posted 18/06/2005, 13:22

Mas esse codigo eu coloco aonde ? na pagina fotos, em cima do codigo html, assim ?

------
codigo asp para se logar
------

<html>
<head>
.
.
.

Pelo pouco q entendo de java script, esse codigo vai aparecer um aviso com um botao ok e dps q clicar em ok vai direcionar para pagina de login, eh isso?

Se a pessoa ja estiver logada nao vai aparecer essa msg nao neh ?

#5 Generation

Generation

    Super Veterano

  • Usuários
  • 1546 posts
  • Sexo:Masculino
  • Localidade:Curitiba - PR

Posted 18/06/2005, 13:29

Isso mesmo, do jeito que voce disse, eu nao gosto de usar Javascript e sim fazer uma pagina pedindo para o usuario logar e se nao for cadasrado deixo o link para que ele o faça...


T+
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)

#6 watequate

watequate

    Turista

  • Usuários
  • 50 posts
  • Sexo:Não informado

Posted 18/06/2005, 14:10

entendi.

vou aplicar esse codigo, obrigado.

Sem kerer abusar mas ja abusando keria pedir mais uma coisa.

Eu tenho o cadastro com nome e email da pessoa. Gostaria q dps q ela logasse, aparecesse algo assim: Bem vindo nomedapessoa, eh mto dificil ?

#7 Generation

Generation

    Super Veterano

  • Usuários
  • 1546 posts
  • Sexo:Masculino
  • Localidade:Curitiba - PR

Posted 18/06/2005, 14:32

Crie outra Sessao chamada Session("Nome") e de o valor do nome da pessoa que esta no banco de dados e depois para exibir..:

Response.Write "Seja Bem Vindo"&Session("Nome")


T+
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)

#8 watequate

watequate

    Turista

  • Usuários
  • 50 posts
  • Sexo:Não informado

Posted 18/06/2005, 15:59

Ae cara,

testei o codigo e deu certo, mas esta com erro. Coloquei o bloqueio na pagina fotos.htm e ele me redireciona para a pagina de login. Eu configurei para qnd fizer o login voltar para a pag de fotos. Mas qnd ele volta para fotos.htm e pede pra eu fazer o login novamente. Abaixo estao os codigos da fotos.htm e logar.asp.

Espero q me ajude !

fotos.htm

<%
If Session("Login") <> True Then
%>
<script language="javascript">
alert("Para acessar esta página, você deve estar logado");
location.href = "login.htm";
</script>
<%
End if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>

pagina onde o action do form de login esta direcionada: logar.asp

<%
' vamos fazer o request do nosso login e senha que foi digitado no formulário
login = request.Form("login")

' agora vamos usar o replace para evitar que engraçadinhos tenter furar nosso sistema de login
login = replace(login,"'","''")
login = replace(login,"#","''")
login = replace(login,"$","''")
login = replace(login,"%","''")
login = replace(login,"¨","''")
login = replace(login,"&","''")
login = replace(login,"'or'1'='1'","''")
login = replace(login,"--","''")
login = replace(login,"insert","''")
login = replace(login,"drop","''")
login = replace(login,"delet","''")
login = replace(login,"xp_","''")
login = replace(login,"select","''")
login = replace(login,"*","''")

' feito isso vamos mudar o nome das variaveis para evitar outra tentativa de furos
Session("lgn") = login

'aqui abrimos a conexão com um banco acess onde estão armazenadas as senhas
set conexao = createobject("AdoDb.connection")
constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.MapPath("cada.mdb")
conexao.open constr
set rs = conexao.execute("SELECT * FROM cadast WHERE email='"&Session("lgn")&"' ")

if rs.eof then
response.Redirect("permissao.htm") 'se o cara errar a senha ele vai ser redirecionado para essa pagina
else

'agora criamos os cookies ou as sessions de acordo com nossas necessidades
Session("login") = "logado"
response.Cookies("logado")=login
response.cookies("logado").expires="31/12/2010"

response.redirect "http://www.portaldam...m.br/fotos.htm"
end if
%>

#9 Generation

Generation

    Super Veterano

  • Usuários
  • 1546 posts
  • Sexo:Masculino
  • Localidade:Curitiba - PR

Posted 18/06/2005, 16:10

renomeie o fotos.htm para fotos.asp

T+
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)

#10 watequate

watequate

    Turista

  • Usuários
  • 50 posts
  • Sexo:Não informado

Posted 18/06/2005, 21:13

Fala ae cara,

eu renomeei a pagina fotos e funcionou, mas apareceu mais um erro.

Eu coloquei na pagina inicial a opcao para a pessoa se logar, o form funciona legal e até aparece a pagina q coloquei caso o login esteja certo. Mas soh q, a pessoa se logou atraves desse form e qnd acessa a pagina restrita, pede para se logar novamente. Como eu posso fazer para que a pessoa se logue apenas uma vez enqto esta visitando o site ?

Espero q me ajude mais uma vez.

Desde ja agradeco.

#11 Generation

Generation

    Super Veterano

  • Usuários
  • 1546 posts
  • Sexo:Masculino
  • Localidade:Curitiba - PR

Posted 18/06/2005, 21:47

Muda a Linha em vermelho .... tira logado e coloca True !

if rs.eof then
response.Redirect("permissao.htm") 'se o cara errar a senha ele vai ser redirecionado para essa pagina
else

'agora criamos os cookies ou as sessions de acordo com nossas necessidades
Session("login") = True
response.Cookies("logado")=login
response.cookies("logado").expires="31/12/2010"

response.redirect "http://www.portaldam...m.br/fotos.htm"
end if



t+
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)

#12 watequate

watequate

    Turista

  • Usuários
  • 50 posts
  • Sexo:Não informado

Posted 18/06/2005, 23:40

Q moleza kra. mas tira uma duvida.

eu substituindo esse logado por true e dps na continuacao do codigo q tem logado, nao vai dar erro nao ?

Session("login") = True
response.Cookies("logado")=login
response.cookies("logado").expires="31/12/2010"

Obrigado mais uma vez.




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq