5 replies to this topic

[Råƒ(æ)!]

gostaria de saber se o codigo (principalmente do "SQL2") abaixo está certo e como poderia continuar para que eu possa enviar para o e-mail cadastrado, resultado verdadeiro da consulta?

<% 

	SQL="SELECT codigo FROM dados_pessoais WHERE email='"&email&"'"
   Set RSemail = Con.Execute(SQL)

    If RSemail.eof then
     Response.Write"E-Mail não cadastrado!"
     Response.end
    End If

	SQL2="SELECT login, senha FROM usuario WHERE codigo="&RSemail
   Set RSenvia = Con.Execute(SQL2)
	
%>

Edição feita por: Råƒ(æ)!, 09/01/2004, 23:33.

[K I L L I N G]

Olá, estava com um erro sim:
a questão do e-mail procura aki um que o CrazyBaby postou q eh muito bom...

AKI VEM A CONEXÃO COM BANCO DE DADOS
AKI VEM O RECORDSET

SQL = "SELECT * FROM tabela WHERE coluna = '" & dado_a_ser_localizado "'"
set recordset = conexão.execute(SQL)

'OU

SQL = "SELECT * FROM tabela WHERE coluna = '" & dado_a_ser_localizado "'"
recordset.open SQL, conexão,3,3
'caso o recordset ainda naum tenha sido aberto.

[Råƒ(æ)!]

ish!!! então... mas como continuo para enviar pelo email do internauta que estah fazendo a consulta?!

[K I L L I N G]

Procura aki no site do forum que você acha, ASPEMAIL, ASPMAIL, CDONTS....

[Matrix2003]

se você quizer de uma olhada na minha pagina tem um destes que você quer com consulta de login e email e esta funcionando muito bem estou online no hot mail zanelati2002@hotmail.com

[Råƒ(æ)!]

quer dizer então que se eu fizer da seguinte maneira irá dar certo?!

<% 

SQL="SELECT codigo FROM dados_pessoais WHERE email='"&email&"'"
  Set RSemail = Con.Execute(SQL)

   If RSemail.eof then
    Response.Write"E-Mail não cadastrado!"
    Response.end
   End If

SQL2="SELECT login, senha FROM usuario WHERE codigo='"&RSemail"'"
  Set RSenvia = Con.Execute(SQL2)

%>

a parte do código onde está codigo='"&RSemail"'" está correta?

Edição feita por: Råƒ(æ)!, 11/01/2004, 22:10.