Adicionar usuario e senha

Marcao1000 · 8 de novembro de 2003

Ola,

Tenho seguinte código para cadastrar login de usuário:

"<%

Option Explicit

'Admin - inclusão de logins

%>

<%

Dim Conexao, rs, sqlInsert, varNome, rsSelect, sqlSelect, varSenha

varNome = Request.Form("Nome")

varNome = replace(varNome, "'", "")

sqlSelect = "SELECT TXT_Nome FROM Login WHERE TXT_Nome = '" & varNome & "'"

sqlInsert = "INSERT INTO Login (TXT_Nome) values ('" & varNome & "')"

'abre a conexao

Call abre_conexao

'executa a instrução SQL

Set rsSelect=Conexao.Execute(sqlSelect)

%>"

Mas esse código só cadastra os nomes dos usuários, não tem opção para cadastrar as senhas!

Como faço para colocar nesse código a opção para cadastrar senhas também??

Obrigado!!

Marcus

Clemente Silva · 10 de novembro de 2003

Postado Originalmente por Marcao1000@08 Nov. 2003,15:33
<%

Option Explicit

'Admin - inclusão de logins

%>

<%

Dim Conexao, rs, sqlInsert, varNome, rsSelect, sqlSelect, varSenha

varNome = Request.Form("Nome")

varNome = replace(varNome, "'", "")

sqlSelect = "SELECT TXT_Nome FROM Login WHERE TXT_Nome = '" & varNome & "'"

sqlInsert = "INSERT INTO Login (TXT_Nome) values ('" & varNome & "')"

'abre a conexao

Call abre_conexao

'executa a instrução SQL

Set rsSelect=Conexao.Execute(sqlSelect)

%>

Bom, pelo que eu vi nem cadastrar ele não cadastra, já que nem ao menos chama a instrução INSERT INTO pelo método Execute.

Ao meu ver tem duas falhas nesse código:

1) você está pegando o valor de um input text chamado "Nome", mas não vejo onde você pegou o valor do input text que deveria conter a senha digitada.

O código deve ser parecido, mas você precisa validar o valor e colocar na variável.

2) você criou uma string SQL para selecionar o nome de usuário na tabela (instrução SELECT), e outra para inserir o novo usuário (instrução INSERT INTO).

A instrução SELECT aqui não tem qualquer utilidade, à não ser que sua intenção tenha sido verificar se o nome de usuário já existe, mas o código não verifica isso.

A instrução INSERT INTO está correta, mas falta colocar justamente o campo da senha e o valor para mesma, para que os dados sejam inseridos corretamente.

Um exemplo seria:

INSERT INTO Login ( TXT_Nome, TXT_Senha ) VALUES ('" & varNome & "','" & varSenha & "');"

supondo que você tenha recuperado o valor de um input text que contenha uma senha, e colocado esse valor em uma variável, do mesmo modo que fez para o nome do usuário.

Além do mais, você só está chamando o método Execute para a instrução SELECT, e não é isso que vai inserir os novos dados.

...

Outra coisa que você deveria fazer é verificar se o usuário já existe. Acho que era isso que você estava tentando fazer com a instrução SELECT, mas faltou pegar o resultado e comparar com o valor do input text "Nome" colocado na variável varNome.

Verifique também se está tudo ok com as rotinas dentro do include conexao_dados.asp.

qualquer. coisa poste aí de novo.

:**