Login E Checkbox

[AlexCT 0]

Fiz um sitema de login que esta funcionando perfeito, mas preciso incrementar com uma coisa.

 

A idéia é o seguinte, existe um campo no banco de dados de pago, onde assume Sim e Nao (sim para pago e nao para não pago)

 

Quando a pessoa digita o login e senha o sistema primeiro irá verificar se existe caso nao retornara um erro e caso sim. Ai vai para o que eu estou pedindo um suporte.

 

Pois preciso verificar se a pessoa pagou ou nao.,

como faço para buscar do banco de dados o campo pago.

 

e como faço para atualizar apenas um campo

 

Fico grato pela ajuda!

[Tiago Colombo 0]

Olá Alex,

vamos uma coisa de cada vez OK?

 

Primeiro: Vamos simular sua tabela do DB.

 

Tabela: tabUsuarios

Colunas: txtNome, txtEmail, txtSenha, flgStatus.

 

Sendo que: txtNome, txtEmail, txtSenha são campos texto com cerxa de 50 caracteres. E o campo flgStatus é TRUE/FALSE (Sim/Não).

 

Agora verificaremos se os dados digitados no formulário estão corretos:

 

v_txtNome = Request("txtNome")v_txtSenha = Request("txtSenha")v_flgStatus = Request("flgStatus")' *****************' A instrução abaixo verifica a informação que o objeto v_flgStatus está passando.' Levando em conta que este objeto é um RadioButton que contém 2 opções: Sim e Não.' No seu caso não precisará usar esta validação, mas se um dia necessitar, tá aí !!' *****************if v_flgStatus = "Sim" Then   v_flgStatus = trueelse   v_flgStatus = falseend if' ******************' ******************' A instrução abaixo verifica os dados, e se o usuário está com o Status OK.' ******************strSql = "SELECT * FROM tabUsuarios WHERE txtNome = '" & v_txtNome & "' AND txtSenha = '" & v_txtSenha & "' AND flgStatus = TRUE"Set RsSql = Conn.Execute(strSql)' ******************' ******************' Verifica a verocidade das informações.' ******************IF RsSql.EOF then   ' ******************   ' Exibe a mensagem informando que os dados estão inválidos   ' ******************else   ' ******************   ' Os dados estão corretos.   ' Então, redireciona para a página restrita.   ' ******************end if' ******************Set RsSql = nothing

Para atualizar apenas um campo, utilize a opção UPDATE passando apenas o campo que você quer como parâmetro, e a condição no WHERE.

 

 

Espero que tenha ajudado e explicado bem..

 

Até mais e boa sorte..

 

[]´s

[AlexCT 0]

Isso que é ajuda, OBRIGADO TIAGOoutra perguntinha, como eu faço quando quero pegar apenas um determinado dado, neste caso o "Status", a linha a ser selecionada?

[Tiago Colombo 0]

Alex, para você referenciar apenas uma linha e uma coluna na sua tabela, é necessário que você informe na cláusula WHERE um dado exclusivo de cada linha, por exemplo o ID com AutoNumeração.Um exemplo prático:strSql = "SELECT txtStatus FROM tabUsuarios WHERE ID = 10"oustrSql = "SELECT txtStatus FROM tabUsuarios WHERE txtNome = 'Tiago Colombo' "Para usa-lo, crie um RecordSet, como:Set RsSql = Conn.Execute(strSql)' **************************' Nesta Linha você exibe o valor do campo txtStatus no banco de acordo com o SELECT feito.' **************************v_txtStatus = RsSql("txtStatus")Falows....[]´s

[AlexCT 0]

Entendi, estava precisando dessas dicas. cheguei a ler alguns tutorias, ams uma coisa é ler e outra usar....Mas outra pergunta, depois deu verificar o login e senha e fazer um if, como faço para voltar no mesmo registro e verificar o status?