slocun 0 Denunciar post Postado Janeiro 28, 2008 Boas Pessoal!! alguem sabe como fazer para (após feita a ligação com a BD) verificar no login se o usuario e a senha estao registrados na BD, para que depois a pessoa possa ou não entrar no site. espero que me possam ajudar, eu estou mesmo a precisar. cumpz http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif Compartilhar este post Link para o post Compartilhar em outros sites
quintelab 91 Denunciar post Postado Janeiro 28, 2008 Movido de Plataforma.Net http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Plataforma.Net//Web Applications slocun faça um select na sua tabela de usuário comparando o campo login e o campo senha com os valores informados pelo usuário, caso haja algum registro o usuário esta correto, caso seu select não retorne nada, bloquei o usuário!! Abraços... Compartilhar este post Link para o post Compartilhar em outros sites
slocun 0 Denunciar post Postado Janeiro 29, 2008 Movido de Plataforma.Net http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Plataforma.Net//Web Applications slocun faça um select na sua tabela de usuário comparando o campo login e o campo senha com os valores informados pelo usuário, caso haja algum registro o usuário esta correto, caso seu select não retorne nada, bloquei o usuário!! Abraços... Boas! eu tentei fazer o que voce me disse, mas deu-me um erro no if, que dizia o seguinte: O operador '=' não está definido para 'Nothing' e tipo 'Field'. o código utilizado: <%@ Page Language="VB" aspcompat=true Debug="true"%> <configuration> <system.web> <compilation debug="true"/> </system.web> </configuration> <% Dim Conn Conn = Server.CreateObject("ADODB.Connection") Conn.Open("GestrofaBD")%> <% Dim usuario, senha, sSQL, xSQL, RS, RX usuario = Request.Form("usuario") senha = Request.Form("senha") sSQL = "Select * From Login" RS = Conn.Execute(sSQL) %> <% If usuario = RS("Utilizador") And senha = RS("Password") Then%> <html> <head> <title>Acesso Garantido</title> </head> <body> Bem-vindo <%= usuario %>!!! <br> Clique <a href = "login.html">aqui</a> para voltar. <br> </body> </html> <%Else%> <html> <head> <title>Acesso Negado</title> </head> <body> <center> <br> <font color="red">Utilizador ou Password incorrectos!!!</font> <br> Clique <a href = "login.html">aqui</a> para voltar. <br> </center> </body> </html> <% end if %> <% Conn.close()%> ----------------- espero que me possa ajudar...cumpz http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif Compartilhar este post Link para o post Compartilhar em outros sites
quintelab 91 Denunciar post Postado Janeiro 29, 2008 slocun acredito que desta forma fique melhor: <%@ Page Language="VB" aspcompat=true Debug="true"%> <configuration> <system.web> <compilation debug="true"/> </system.web> </configuration> <% Dim Conn Conn = Server.CreateObject("ADODB.Connection") Conn.Open("GestrofaBD")%> <% Dim usuario, senha, sSQL, xSQL, RS, RX usuario = Request.Form("usuario") senha = Request.Form("senha") sSQL = "Select * From Login WHERE UTILIZADOR = '"& usuario &"' AND PASSWORD = '"& senha &"'" RS = Conn.Execute(sSQL) %> <% if rs.eof Then%> <html> <head> <title>Acesso Negado</title> </head> <body> <center> <br> <font color="red">Utilizador ou Password incorrectos!!!</font> <br> Clique <a href = "login.html">aqui</a> para voltar. <br> </center> </body> </html> <%Else%> <html> <head> <title>Acesso Garantido</title> </head> <body> Bem-vindo <%= usuario %>!!! <br> Clique <a href = "login.html">aqui</a> para voltar. <br> </body> </html> <% end if %> <% Conn.close()%> Abraços... Compartilhar este post Link para o post Compartilhar em outros sites
slocun 0 Denunciar post Postado Janeiro 30, 2008 mto obrigado pela ajuda! com este código já tenho a parte do login concluida! agora passarei para o resto :) abraço! Compartilhar este post Link para o post Compartilhar em outros sites