Socorrooo

cesar340 · 29 de dezembro de 2011

alguem me ajude! preciso fazer um script que SE o email existir, ele fazer um update e se o email nao existir ele faz um insert, alguem pode me ajudar? cheguei até aqui mas travei SOCORROOO! seugue o codigo abaixo...

<HTML>

<HEAD>

</HEAD>

<BODY>

</BODY>

<h1>Cadastramento de clientes!!</h1>

DATA:<br>ano-mes-dia<br><input name=data type=text size=15/><br><br>

NUMERO:<br><input name=numero type=text size=15/><br><br>

NOME:<br><input name=nome type=text size=70/><br><br>

IDADE:<br>digite somente numeros<br><input name=idade type=text size=2/><br><br>

ENDEREÇO:<br><input name=endereco type=text size=70/><br><br>

CEP:<br>digite apenas numeros<br><input name=cep type=text size=15/><br><br>

CIDADE:<br><input name=cidade type=text size=30/><br><br>

ESTADO:<br>digite somente a sigla do seu estado<br><input name=estado type=text size=40/><br><br>

E-MAIL:<br><input name=email type=text size=70/><br><br>

SENHA:<br>minimo 8 e maximo 16 caracteres<br><input name=senha type=text size=10/><br><br>

</form>

</div>

</HTML>

<%

dim data,numero,nome,idade,endereco,cep,cidade,estado,email,senha,conexao,rs,srtsql,strsqlteste

data = request.form("data")

numero = request.form("numero")

nome = request.form("nome")

idade = request.form("idade")

endereco = request.form("endereco")

cep = request.form("cep")

cidade = request.form("cidade")

estado = request.form("estado")

email = request.form("email")

senha = request.form("senha")

response.write data & " " & numero & " " & nome & " " & idade & " " & endereco & " " & cep & " " & cidade & " " & estado & " " & email & " " & senha

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "dsn=bancochefe;uid=sysdba;pwd=masterkey;"

strsqlteste = "SELECT email FROM clientes_chefe WHERE chave1 = valorChave1 AND chave2 = valorChave2 AND chaveN = valorChaveN"

set rs = conexao.execute(strsqlteste)

if rs.BOF And rs.EOF Then

strsql = "insert into clientes (data,numero,nome,idade,endereco,cep,cidade,estado,email,senha) values ('" & data & "', '" & numero & "', '" & nome & "', '" & idade & "', '" & endereco & "', '" & cep & "', '" & cidade & "', '" & estado & "', '" & email & "', '" & senha & "')"

else

strsql = "UPDATE clientes_chefe SET DAT = '" & data & "' SET NUMERO = '" & numero & "' SET NOME = '" & nome & "' SET idade = '" & idade & "' SET endereco = '" & endereco & "' SET cep = '" & cep & "' SET cidade = '" & cidade & "' SET estado = '" & estado & "' SET email = '" & email & "' SET senha = '" & senha & "' WHERE cod = 12"

end if

set rs = Conexao.execute(strsql)

Conexao.close

set rs = nothing

%>

DiF · 29 de dezembro de 2011

isso é asp certo?

bom.. nao programo em asp.. só php..

mas pode ser uma solução para você.

faça um bloco condicional onde ele busca e testa o email digitado. então se pela consulta retornar 1 você dá um update set, se retornar zero, você dá um insert into.

geralmente faço se o mysql_num_rows for 1 é porque existe.. se retornar zero nao existe