Validação de login
Criei um arquivo .asp para validação de login onde na terceira tentativa deveria ocorrer um erro com mensagem de matricula bloqueada. A validação no banco está ocorrendo quando informada de forma correta, porém, após a terceira tentativa errada não está sendo exibida a mensagem.Alguém pode me ajudar por favor.Segue abaixo o código
> <%response.buffer="true"%><%vlogin=request.form("login")vsenha=request.form("senha")Set con = Server.CreateObject( "adodb.Connection" ) con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\Projeto_Final_II\GERINC2.mdb"set rh=con.execute("select * from usuarios where matricula='" & vlogin & "' and senha='" & vsenha & "'")set var = con.Execute ("INSERT INTO tablogin (login) VALUES ('"&vlogin&"')")if vlogin = "" thenresponse.write"<br>MatrÃcula Em Branco! Volte e tente novamente!"set var = con.Execute ("INSERT INTO tablogin (login) VALUES ('"&vlogin&"')")elseif vsenha = "" thenresponse.write"<br>Senha Em Branco! Volte e tente novamente!"set var = con.Execute ("INSERT INTO tablogin (login) VALUES ('"&vlogin&"')")elseif rh.EOF thenresponse.write"Senha ou Login inválido!Volte e tente novamente."set var = con.Execute ("INSERT INTO tablogin (login) VALUES ('"&vlogin&"')")elsesession("logado")="sim"if rh("cargo") = "funcionario" then response.redirect"Menu_Funcionario.htm"elseif rh("cargo") = "coordenador" thenvar = 0response.redirect"menu_coordenador.htm"elseif rh("cargo") = "engenheiro" thenresponse.redirect"menu_engenheiro.htm"end ifend ifend ifend ifend ifend if%>Discussão (1)
Carregando comentários...