Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Amigos, estou tentando fazer uma verificação de um email no BD, depois que o usuário preenche um form de cadastro, mas não estou conseguindo. Oq está errado?
ASP
<%
nome_user = Request.form("txt_nome_user")
email_user = Request.form("txt_email_user")
senha_user = Request.form("txt_senha_user")
nivel_user = cInt(Request("nivel_user"))
verifica = "SELECT * FROM bd_yd.tbl_user WHERE email_user = '"&email_user&"'"
Set RS = conn.Execute(verifica)
If RS.EOF Then
Response.Write "Usuário já cadastrado!!!!</br>Para tentar novamente clique <a href=cad_user1.asp target=_self>AQUI</a>."
Response.End
Else
gravar = "INSERT INTO tbl_user(nome_user,email_user,senha_user,nivel_user) values('"&nome_user&"','"&email_user&"','"&senha_user&"','"&nivel_user&"')"
set RS2 = conn.Execute(gravar)
Response.Write("Usuário cadastrado.")
End If
%>
Vlw.
beleza amigo é isso mesmo...
Vlw..
Amigo,
Não tá funfando mas, o codigo é esse:
ASP
<%
nome_user = Request.form("txt_nome_user")
email_user = Request.form("txt_email_user")
senha_user = Request.form("txt_senha_user")
nivel_user = cInt(Request("nivel_user"))
verifica = "SELECT * FROM bd_yd.tbl_user WHERE email_user = '"&email_user&"' "
Set RS = conn.Execute(verifica)
If Not RS.EOF Then
Response.Write "Usuário já cadastrado!!!!</br>Para tentar novamente clique <a href=cad_user1.asp target=_self>AQUI</a>."
Else
gravar = "INSERT INTO tbl_user (nome_user,email_user,senha_user,nivel_user) values('"&nome_user&"','"&email_user&"','"&senha_user& "','"&nivel_user&"')"
Set RS = conn.execute(gravar)
Response.Write("Usuário cadastrado.")
End If
%>
ASP
<%nome_user = Request.form("txt_nome_user")
email_user = Request.form("txt_email_user")
senha_user = Request.form("txt_senha_user")
nivel_user = cInt(Request("nivel_user"))
verifica = "SELECT * FROM tbl_user WHERE email_user = '"&email_user&"' "
Set RS = conn.Execute(verifica)
If RS.EOF Then
gravar = "INSERT INTO tbl_user (nome_user,email_user,senha_user,nivel_user) values('"&nome_user&"','"&email_user&"','"&senha_user&"','"&nivel_user&"')"
conn.execute(gravar)
Response.Write("Usuário cadastrado.")
ELse
Response.Write "Usuário já cadastrado!!!!</br>Para tentar novamente clique <a href=cad_user1.asp target=_self>AQUI</a>."
End If
%>
Amigo Ted'K, tento cadastrar um novo usuário que não está no bd esse codigo joga para o Else.
Oq pode estar ocorrendo?
Revisei o seu código e ele está correto, agora tem que ver o seu HTML para ver se os campos estão corretos
pois acho que o campo de e-mail está com o nome errado no formulário e que tem algum cadastro em branco no banco!
ASP
<%nome_user = Request.form("txt_nome_user")
email_user = Request.form("txt_email_user")
senha_user = Request.form("txt_senha_user")
nivel_user = cInt(Request("nivel_user"))
Set RS = conn.Execute("SELECT * FROM tbl_user WHERE email_user = '"&email_user&"'")
If RS.EOF Then
conn.execute("INSERT INTO tbl_user (nome_user,email_user,senha_user,nivel_user) values('"&nome_user&"', '"&email_user&"', '"&senha_user&"', '"&nivel_user&"')")
Response.Write("Usuário cadastrado")
ELse
Response.Write "Usuário já cadastrado!!!!</br>Para tentar novamente clique <a href=cad_user1.asp target=_self>AQUI</a>."
End If
%>
Amigo, esqueci de um detalhe, estou usando a pagina de Cadastro de user dentro de um IFRAME na pagina principal que chama a segunda pagina, que cadastra os dados, tb dentro do mesmo IFRAME.
Os dados não estão sendo recuperados dessa forma. Oq podemos fazer?
Vlw.
Bom, p carregar os dados dentro do iframe tbm, você tem que colocar um target no seu form...
por exemplo, vamos dizer que seu iframe esteja com o nome de JANELA (<iframe name="janela">)
dai no seu form você tem que colocar o target p ele, tipo "<form target="janela">
dai ele vai passar os dados para o iframe
Descobri o erro, no Form o metodo estava GET ao inves de POST.
Agora ta resolvido.
Vlw.
como te disse
Revisei o seu código e ele está correto, agora tem que ver o seu HTML
que bom que resolveu se ñ a gente iria ficar batendo cabeça o dia todo heehehehe
>
Amigos, estou tentando fazer uma verificação de um email no BD, depois que o usuário preenche um form de cadastro, mas não estou conseguindo. Oq está errado?
ASP
<%
nome_user = Request.form("txt_nome_user")
email_user = Request.form("txt_email_user")
senha_user = Request.form("txt_senha_user")
nivel_user = cInt(Request("nivel_user"))
verifica = "SELECT * FROM bd_yd.tbl_user WHERE email_user = '"&email_user&"'"
Set RS = conn.Execute(verifica)
If RS.EOF Then
Else
gravar = "INSERT INTO tbl_user(nome_user,email_user,senha_user,nivel_user) values('"&nome_user&"','"&email_user&"','"&senha_user&"','"&nivel_user&"')"
set RS2 = conn.Execute(gravar)
Response.Write("Usuário cadastrado.")
End If
%>
Vlw.
ei acho que a sua condição está erada n tenta assim
ASP
Else
gravar = "INSERT INTO tbl_user(nome_user,email_user,senha_user,nivel_user) values('"&nome_user&"','"&email_user&"','"&senha_user&"','"&nivel_user&"')"
set RS2 = conn.Execute(gravar)
Response.Write("Usuário cadastrado.")
End If
ceerto porque se ele voltar vazio é sinal que ja está cadastrado e se ele voltar vazio ai sim você cadastra um novo