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

Msg Alerta


Hayder

Pergunta

pessoal,

eu tenho um telinha de login, composta por txt_email, txt_senha, bt_enviar, bt_limpar, gostaria que caso o usuário informa-se seus dados errados que ao clicar no botão ao invés de abrir um outra janela informando que os dados estão errados gostaria que fosse emitida uma mensagem de alerta, sem sair da janela de login, pois assim o usuário clic na msg de alrta e já esta na tela de casdastro, porem estou me quebrando pra fazer isto porque não manjo muita coisa de ASP E JS, se alguém puder me explicar como proceder, eu ate tentei fazer mas a lógica que usei não deu certo. EStou mando o cod junto

obrigada

abraços

<input type=submit value="Entrar" style=font-size:11px;font-family:tahoma name="bt_Entrar"
<%
email = request.form("txt_Email")
senha = request.form("txt_senha")
set conexao_bd = Server.CreateObject("ADODB.Connection")
conexao_bd.open "Banco"
set tabela = conexao_bd.execute("select * from CLIENTE where CliEml ='"+email+"' and CliSenAcs='"+senha+"'")
if tabela.eof then
%>
<script>alert("Para ter acesso ao catálogo on-line é necessário ser cliente cadastrado")</script>
<%
else
session("logado")="sim"
response.redirect ("teste.asp")
end if
%>
> 

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

  • 0

ph34r.gif

olha eu fiz de uma forma diferente wem uma página asp/VBscript

aí segue o código:

<%

Option Explicit

'Criando variáveis

Dim localbd, meubd, rsLogin, formlogin, formsenha

'Indicando local do Banco de dados

localbd="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../bd/bd.mdb")

'Setando conexões

set meubd=server.createobject("adodb.connection")

set rsLogin=server.createobject("adodb.recordset")

'Recuperando os valores do formulário e setando-os nas variáveis

formlogin=request.form("login")

formsenha=request.form("senha")

'Abrindo conexão

meubd.Open localbd

'Verificando se possui registro

rsLogin.Open "SELECT * FROM acesso where login='"& formlogin &"'", meubd

'Se não houver registro com o login digitado, ele irá voltar

if rsLogin.EOF then

response.write "<script>history.back(1);alert('Você não obteve acesso. Login incorreto.')</script>"

'Caso contrário, ele irá verificar a senha digitada

else

if rsLogin.fields("senha")=formsenha then

'Se a senha estiver correta, ele cria uma variável de sessão com o valor do login

session("login")=rsLogin.fields("login")

'Redirecionamento para dentro do administrativo

response.redirect "principal.asp"

else

'Mas se o login está correto e a senha não, ele voltará

response.write "<script>history.back(1);alert('Você não obteve acesso. Senha incorreta.')</script>"

end if

end if

%>

Link para o comentário
Compartilhar em outros sites

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,1k
    • Posts
      651,8k
×
×
  • Criar Novo...