[Resolvido] Recuperar dado de BD e colocar em Session...

[Vitor Luis 0]

Olá pessoal, estou criando um sistema de Login que usara a id do usuario cadastrado no BD para indentificalo, gostaria de saber como se faz para recuperar este dado e colocar na Session...

 

E outra coisinha, esta pagina apenas faz o Login e redireciona, os dados vem de outra pagina (HTML) que tem um formulario..

Como faço para a pagina pegar os campos? O formulario tem que ser GET, POST?

 

Aqui esta o codigo, quem puder me corrigir/ajudar eu agradeço:

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<%OPTION EXPLICIT%>

<!--#include file="INC/conexao.inc"-->

<%

DIM strLogin, strSenha, strSQL, rsLogin

strLogin = request("txtUsuario")

strSenha = request("txtSenha")

strSQL = ""

Call AbreConexao

set rsLogin = Server.CreateObject("ADODB.Recorset")

strSQL = strSQL & "SELECT id FROM usuarios WHERE usuario='" & strLogin & "' and senha='" & strSenha & "';"

rsLogin.open strSQL, conexaodb

if not rsLogin.eof the

session("id") = rsLogin.field("id")

response.Redirect("inicio.asp")

else

response.Redirect("Login_erro.asp")

end if

rsLogin.close

set rsLogin = nothing

Call FechaConexao

%>

[Ted k' 126]

para pegar os valores dos campos pode ser em post ou get, só muda o paramentro de resposta, para post use request.form, para get use request.querystring.

 

use puro:

set rsLogin = conexaodb.execute("SELECT id FROM usuarios WHERE usuario='" & strLogin & "' and senha='" & strSenha & "'")
if not rsLogin.eof the
session("id_nome") = rsLogin("id")

[Vitor Luis 0]

para pegar os valores dos campos pode ser em post ou get, só muda o paramentro de resposta, para post use request.form, para get use request.querystring.

 

use puro:

set rsLogin = conexaodb.execute("SELECT id FROM usuarios WHERE usuario='" & strLogin & "' and senha='" & strSenha & "'")
if not rsLogin.eof the
session("id_nome") = rsLogin("id")

Muitooo obrigado!!

[Ted k' 126]

disponha, qualquer coisa estamos aqui!!