Recuperar e-mail

[wilnet 92]

Olá Professores e amigos...

 

Apreciaria a ajuda de vcs no seguinte: Tenho uma Pg onde me lista os clientes cadastrados, "Nome, endereço, ... e-mail".

O e-mail é com link

E-mail: <a href= mailto:<%=lista_produtos("mail")%>><%=prod_mail%></a>

, o que acontece é o seguinte, quando a pessoa clica nesse e-mail, ele abre o OUTLOOK para que a pessoa possa enviar seu e-mail.

Agora o que desejo, gostaria que fosse assim, o e-mail aparece como um link, mas só que quando a pessoa clicar nele, ao invéz de abrir o OutLook, ele me abre uma pequena pg, onde recupera o e-mail do cliente, a pessoa insere no campo o e-mail de quem está enviando, como se fosse um "Indique ao Amigo", e entao depois de preencher com seu e-mail e a mensagem, ele pode enviar para o e-mail do cliente. e quando o cliente receber esse e-mail, também irá aparecer no final do e-mail a seguinte frase: Este e-mail veio do seguinte Site, www.site.com.br.

 

Isso só para o cliente saber que os dados dele de fato esão sendo visitados e clicados, não sei se consegui me expressar corretamente, mas obrigado por qualquer ajuda amigos.

 

Grato, William

[jrcardozo 4]

no link:

<a href= "formulario.asp?email=<%=lista_produtos("mail")%>"><%=prod_mail%></a>

na página formulario.asp

<%response.write(request.querystring("email"))%>

Nessa página que você vai montar o formulario de envio e no action você seta pra página que envia o email usando componente

para colocar de onde está indo o email você monta no body do email concatenando os dados com o digitado no formulário

[wilnet 92]

Olá jonathandj, desculpe pela demora em postar a resposta, somente este final-de-semana que testei.

 

Olha, fiz o que você me passou, e ficou dando erro quando eu enviava, ai depois de ficar fuçando e pesquisando inseri isso:

<input name="mail" type="hidden" value="<% =strMail %>">, ai passou a enviar o e-mail, só que tem um problema, eu tenho um e-mail pra cópia oculta tb, e só eu estou recebendo, o Para: não está recebendo, ou seja:

Digamos que você acessou a página que mostra meu e-mail, você clica nele e abre a´página com os campos, meu e-mail que foi recuperdo

<% Response.Write(Request.QueryString("mail"))%>				<input name="mail" type="hidden" value="<% =strMail %>">

, e os campos para você preencher com seu nome, e-mail, assunto e mensagem e entao você envia, por ter uma cópia oculta eu recebo seu e-mail, só que no campo "Para:" que é o e-mail pra quemn você estava enviando fica em branco, vou postar os códigos:

 

Página formulário:

<% Response.Write(Request.QueryString("mail"))%>				<input name="mail" type="hidden" value="<% =strMail %>">

Página para envio onde está o componente:

'informações dos campos do formuláriostrNome = Request.Form("nome") 	'Nome de quem está enviandostrEmail = Request.Form("email") 	'Email de quem está enviandostrMail = Request.Form("mail") 		'Email de quem está recebendostrAssunto = Request.Form("assunto") 	'Assunto da mensagemstrMensagem = Request.Form("Mensagem") 'Mensagem

'e-mail do remetente		objCDOSYSMail.From = strEmail				'e-mail do destinatário		objCDOSYSMail.To = strMail

.

Não postei a página toda para otimizar espaço, acho que os códigos que coloquei da para ter uma idéia do problema, ela envia o e-mail normalmente só que a pessoa não irá receber porque o campo "Para:" no envio está ficando em branco.

 

Se puder me ajudar mais uma vez, ou outra pessoa tb ficarei grato, já tentei de várias formas e não consegui nada além das muitas mensagens de erros que dava.

 

Grato,

William

[jrcardozo 4]

como está a parte do html do formulário?

[wilnet 92]

Olá Jonathandj, obrigado pelo o interesse em me ajudar.

 

O formulário está assim:

 

<FORM ACTION="sendEmail.asp" METHOD="post" >  <table width="80%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#006699">	<tr>	  <td height="16"><div align="center"><br>		  <TABLE width="418" BORDER="0" align="center" cellpadding="0" cellspacing="0">			  <TR> 			  <TD width="88" height="27" ALIGN="right"> 				<div align="left"><STRONG> Para:</STRONG></div></TD>			  <TD width="330"> 				<% Response.Write(Request.QueryString("mail"))%>				<input name="mail" type="hidden" value="<% =strMail %>">			  </TD>			</TR>			  <TR> 			  <TD width="130" ALIGN="right" VALIGN="top"><div align="left"><STRONG> <font color="#0066CC">Seu 				  Nome:</font></STRONG></div></TD>			  <TD width="246"><INPUT NAME="nome" TYPE="text" id="Nome" VALUE="<%=strNome %>" SIZE="15"></TD>			</TR>			<TR> 			  <TD VALIGN="top" ALIGN="right"><div align="left"><STRONG> <font color="#0066CC">Seu 				  e-mail:</font></STRONG></div></TD>			  <TD><INPUT TYPE="text" NAME="Email" id=" Email" VALUE="<% =strEmail %>" SIZE="25"></TD>			</TR>			<TR> 			  <TD VALIGN="top" ALIGN="right"><div align="left"><STRONG> Assunto:</STRONG></div></TD>			  <TD><INPUT TYPE="text" NAME="assunto" id=" assunto" VALUE="<% =strAssunto %>" SIZE="25"></TD>			</TR>			<TR> 			  <TD width="88" height="31" ALIGN="right" VALIGN="top"><div align="left"><STRONG> </font>Mensagem:</STRONG></div></TD>			  <TD width="330"><TEXTAREA NAME="Mensagem" COLS="35" ROWS="6"><%= strBody %></TEXTAREA></TD>			</TR>			<TR> 			  <TD height="49"></TD>			  <TD><INPUT TYPE="submit" class="botao" VALUE="Enviar E-mail"></TD>			</TR>		  </TABLE>		</div></td>	</tr>  </table>  </FORM>

Este fomulário vem de uma outra página que contém esse link:

E-mail:  <a href="java script:email_cliente('email_cliente.asp?mail=<%=lista_produtos("mail")%>')"><%=prod_mail%></a>

Depois uso uma outra página para o envio do e-mail onde uso "CDOSYS"

 

'informações dos campos do formuláriostrNome = Request.Form("nome") 	'Nome de quem está enviandostrEmail = Request.Form("email") 	'Email de quem está enviandostrMail = Request.Form("mail") 		'Email de quem está recebendostrAssunto = Request.Form("assunto") 	'Assunto da mensagemstrMensagem = Request.Form("Mensagem") 'Mensagem  ...'e-mail do remetente	  objCDOSYSMail.From = strEmail		 'e-mail do destinatário	  objCDOSYSMail.To = strMail

O problema é que quando é enviado o e-mail, o campo do "Destinatário é enviado em branco e por isso a pesso não recebe o e-mail enviado.

 

Se faltar mais alguma coisa por favor me peça, tomara que isso seja o suficiente e você ou outro colega consiga resolver . grato

[wilnet 92]

Bom dia meus amigos, peço muito uma ajuda de você's aqui, pra mim ta insistindo aqui é porque já fiz de tudo e não consigo solução.

 

Como disse o campo destinatário ou o "Para:" (strMail) quando é enviado está indo vazio e a pessoa não recebe o e-mail, deve ter uma solução pra isso não tem?

Grato,

 

William