Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Ta com uma semana que não pertubo ninguem neste forum... :D
seguinte:
tenho este código, da uma olhada!
<!--#include file="conexao.asp" --><% DIM PriNome, SegNome, Aniversario, Login, Senha, Email 'RECEBENDO OS VALORES INSERIDOS PELO USUARIO PriNome = request("PriNome") SegNome = request("SegNome") Aniversario = request("Anivesario") Login = request("Login") Senha = request("Senha") Email = request("Email") %><html><head><title>cadastro</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%'QUANDO O USUARIO ENVIAR O CADASTROif request("selecao") <> "ok" then %><form name="form1" method="post" action="C%F3pia%20de%20cadastro.asp"> <table width="80%" border="1" cellspacing="0" cellpadding="0"> <tr> <td width="100"><div align="center"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Primeiro Nome: </font></strong></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="PriNome" type="text" id="PriNome"> </font></td> </tr> <tr> <td width="100"><div align="center"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Segundo Nome</font></strong></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="SegNome" type="text" id="SegNome"> </font></td> </tr> <tr> <td width="100"><div align="center"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Aniversário</font></strong></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="Aniversario" type="text" id="Aniversario"> Por Favor Digite Assim: 99/99/9999</font></td> </tr> <tr> <td width="100"><div align="center"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">login:</font></strong></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="Login" type="text" id="Login"> </font></td> </tr> <tr> <td width="100"><div align="center"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Senha:</font></strong></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="Senha" type="password" id="Senha"> </font></td> </tr> <tr> <td width="100"><div align="center"><strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Email:</font></strong></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="Email" type="text" id="Email"> </font></td> </tr> <tr> <td width="100"><div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input name="selecao" type="hidden" id="selecao" value="ok"> </font></div></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <input type="submit" name="Submit" value="cadastrar"> </font></td> </tr> </table></form><% ELSE 'VERIFICA SE A EXISTE UM LOGIN COM O QUE O USUARIO ESTA TENTANDO CADASTRAR set rs=con.execute("select * from TBL_DADOS where login='"& Login &"'") 'Procura no BD um usuario com este login, caso encontre da uma mensagem de erro IF not rs.EOF then response.write("<font face=verdana size=2>" & "Login já cadastrado" & "<br>") response.write("<a href=javascript:history.go(-1)>voltar</a>") ELSE 'VERIFICA SE O USUARIO, PREENCHEU TODOS OS CAMPOS. if PriNome = "" or SegNome = "" or Aniversario = "" or Login = "" or Senha = "" or Email = "" Then 'SE TIVER ALGUM CAMPO SEM PREENCHER response.write("Preencha todos os campos do formulario" & "<br>") response.write("<a href=javascript:history.go(-1)>voltar</a>") Else 'SE TODOS OS CAMPOS FORAM PREENCHIDOS, OS DADOS SERÃO CADASTRADOS SQL_INTO_DADOS = "Insert into TBL_DADOS (Login,Senha,PriNome,SegNome,Aniversario,Email) values ('" & Login & "','" & Senha & "','" & PriNome & "','" & SegNome & "','" & Aniversario & "','" & Email & "')" Con.execute(SQL_INTO_DADOS) response.write("Cadastro efetuado!!!" & "<br>") response.write("Dentro de um minuto seu <font color=red>|Login| |Senha|</font> estarão funcionando!") End If END IFEND IF%></body></html>seguinte ele é para cadastrar em um banco Access simples!
pega os valores de <Form> e adiciona no BD!
Veja minha lógica:
1º Verificar se o formulario foi enviado.
2º recebe os valores do formulario com request.
3º se o usuario enviar o formulario, faz uma consulta para saber se ususario esta cadastrado, se for cadastrado apararece a seguinte mensagem: "Login ja cadastrado".
4º Se o Login não estiver cadastrado, ele verifica se o usuario deixou algum campo vazio.
5º Se não deixou cadastra no Bd e da a seguinte mensagem: "Cadastro Efetuado!"
O que ta acontecendo e que mesmo preenchendo todos os dados aida fica dando a mensagem: "Preencha todos os dados"
Ythalo Rossy
Ou então coloque<%'QUANDO O USUARIO ENVIAR O CADASTROif request("selecao") <> EMPTY then%>E depois verifique se as variáveis realmente estão recebendo valores atribuídos com o request, analise os nomes se você colocou o mesmos na hora do request.
Um pequeno erro de digitação dá uma dor de cabeça:
DIM PriNome, SegNome, Aniversario, Login, Senha, Email'RECEBENDO OS VALORES INSERIDOS PELO USUARIO
PriNome = request("PriNome")
SegNome = request("SegNome")
Aniversario = request("Anive<span style='font-size:14pt;line-height:100%'>r</span>sario")
Login = request("Login")
Senha = request("Senha")
Email = request("Email")
Isso não é uma crítica à você, é só o desabafo de quem já apanhou muito por causa de um! :P
Salgado você é D+!Muito Obrigado, você nem imagina como passei esta semana, tentando fazer este cadastro e não dava certo...Nossa, me deu ate vontade de chorar... :D :D Ythalo Rossy!P.S: Qual seria o formato do campo no BD para receber este valor (02/09/1982), e se precisaria de alguma mascara? :D Felizes são aqueles que são salgados de conhecimentos!
Olá ....
acredito que o erro esteje na linha:
<%
'QUANDO O USUARIO ENVIAR O CADASTRO
if request("selecao") <> "ok" then
%>
tente fazer desta forma
<%
'QUANDO O USUARIO ENVIAR O CADASTRO
if request("selecao") = "ok" then
%>
[]`s
<%= Armando Ferraz %>