Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

masterofdreams

O problema é só cadastrar

Recommended Posts

Eu tenho esse script. login.asp

 

<%

'Efetuando a conexão com a base de dados criada

Set Conn = Server.CreateObject("AdoDb.Connection")

Conn.provider="Microsoft.Jet.OLEDB.4.0"

Conn.connectionstring=Server.Mappath("/banco.mdb")

Conn.open

 

'Vamos capturar o login e a senha digitada no firmulário

login2 = Request.Form("txt_login")

senha2 = Request.Form("txt_senha")

 

'Agora verificamos se o usuário e a senha estão corretos

SQL = "select * from usuarios where login = '"&login2&"' and senha = '"&senha2&"' "

Set RS = Conn.Execute(SQL)

 

'Caso não esteja correto, indicamos o erro

If RS.EOF Then

Response.Write "usuário ou senha inválida!"

Response.End

End If

 

'Se chegou até aqui, é porque o login e senha estão corretos.

'Vamos então verificar o nível de acesso do usuário.

session("nivel_acesso") = RS("nivel") 'Colocamos numa session pois iremos utiliza-las em outras páginas

 

session("nome_usuario") = RS("login")

 

Response.Redirect "adm.asp" 'página restrita

%>

 

 

como é que eu faço para que o cadastro seja direto ao banco de dados :)

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.