envio de e-mail com CDONTS

maktub · Novembro 6, 2005

Olá colegas, preciso da ajuda de vocês novamente, bom eu criei um fale conosco que funciona com componente cdonts, o cliente preenche a dúvida e o e-mail é encaminhado para meu endereço, querendo ser um pouco chato quero que assim que o formulário for preenchido seja enviado o e-mail pra mim com as dúvidas e um e-mail para quem solicitou dizendo que foi encaminhado com sucesso e em breve o suporte entra em contato, tem como fazer isso?

segue meu código, aproveitando para quem quiser pegar a fonte, o e-mail funciona certinho ok.

esse é o responsável por me enviar e-mail:

<%'Email para onde serão enviados os dados do formulárioemail_form = "meue-mail@teste.com.br"'Título do emailassunto_form = "Fale Conosco"'Servidor de emailservidor = "smtp.teste.com.br"componente = "CDONTS"'Cabeçalho do texto do email recebidocabecalho_email = "Contato via Web"'*******************************************************************%>

Componente CDONTS:

Case "CDONTS"on error resume nextSet eObjMail = Server.CreateObject("CDONTS.NewMail")eObjMail.to = ParaEmaileObjMail.from = NomeEmail & "<" & Email & ">"eObjMail.subject = AssuntoeObjMail.Importance = 1eObjMail.BodyFormat = 0eObjMail.MailFormat = 0eObjMail.body = Mensagem		eObjMail.sendSet eObjMail = nothing		End SelectEnd Function

Esse é o código completo:

<%'Email para onde serão enviados os dados do formulárioemail_form = "meue-mail@teste.com.br"'Título do emailassunto_form = "Fale Conosco"'Servidor de emailservidor = "smtp.teste.com.br"componente = "CDONTS"'Cabeçalho do texto do email recebidocabecalho_email = "Contato via Web"'*******************************************************************%><HTML><HEAD><TITLE>Fale Conosco</TITLE><meta name="robots" content="ALL"><style type="text/css"><!--.campo_alerta { font-family: Tahoma, Verdana, Arial; font-size: 11px; background-color: 			   #E0E0E0; border: 1px solid #000000 }.texto_pagina { font-family: Arial; font-size: 11px; color: #000000 }.tabela_formulario{width: 200;background-color: white;}.titulo_campos { font-family: arial; font-size: 11px; color: #000000; background-color: #FFFFFF }.campos_formulario { font-family: arial; font-size: 11px; color: #000000; background-color: #FFFFFF; 			   border-style: solid; border-width: 1px }--></style><link href="../assets/teste.css" rel="stylesheet" type="text/css"></HEAD><BODY class=texto_pagina><p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><%If Not IsEmpty(Request.Form) Then  strMsg = "<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.0 Transitional//EN'>"  strMsg = strMsg & "<HTML><HEAD>"  strMsg = strMsg & "<META content='text/html; charset=iso-8859-1' http-equiv=Content-Type>"  strMsg = strMsg & "<META content='MSHTML 5.00.2614.3500' name=GENERATOR></HEAD>"  strMsg = strMsg & "<BODY><FONT face=Tahoma size=2><B>" & cabecalho_email & "</B><BR><BR>"  strMsg = strMsg & "<B>Nome:</B><BR><BR>"  & Trim(Request.Form("Campo1")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>e-mail:</B><BR><BR>"  & Trim(Request.Form("Campo3")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Telefone:</B><BR><BR>"  & Trim(Request.Form("Campo2")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Celular:</B><BR><BR>"  & Trim(Request.Form("Campo4")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Segmento Desejado:</B><BR><BR>"  & Trim(Request.Form("Campo5")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Tipo da transação:</B><BR><BR>"  & Trim(Request.Form("Campo6")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Tipo do evento:</B><BR><BR>"  & Trim(Request.Form("Campo7")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Endereço da instituição:</B><BR><BR>"  & Trim(Request.Form("Campo8")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Complemento:</B><BR><BR>"  & Trim(Request.Form("Campo9")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Bairro:</B><BR><BR>"  & Trim(Request.Form("Campo11")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>CEP:</B><BR><BR>"  & Trim(Request.Form("Campo10")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Cidade:</B><BR><BR>"  & Trim(Request.Form("Campo12")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Estado:</B><BR><BR>"  & Trim(Request.Form("Campo13")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "<B>Mensagem:</B><BR><BR>"  & Trim(Request.Form("Campo14")) & "<HR size=1 color=gainsboro>"  strMsg = strMsg & "</FONT></BOBY>"  strMsg = strMsg & "</HTML>"  EnviaEmail servidor, componente, email_form, email_form, email_form, assunto_form, strMsgFunction EnviaEmail(Host,Componente,Email,NomeEmail,ParaEmail,Assunto,Mensagem)Select Case Componente		Case "CDONTS"on error resume nextSet eObjMail = Server.CreateObject("CDONTS.NewMail")eObjMail.to = ParaEmaileObjMail.from = NomeEmail & "<" & Email & ">"eObjMail.subject = AssuntoeObjMail.Importance = 1eObjMail.BodyFormat = 0eObjMail.MailFormat = 0eObjMail.body = Mensagem		eObjMail.sendSet eObjMail = nothing		End SelectEnd Function%><p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><font face="Arial"><img border="0" src="../assets/emailobrigado.gif"><%Else%>  </font></p><form name="form_incluir" method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>" onsubmit="return verifica_form(this);"><p align="left"><font color="#FF0000" class=textBoldColor>* campos obrigatórios</font></p><TABLE border=0 cellpadding=2 cellspacing=1 class=tabela_formulario width="100%">  <TR class=titulo_campos><TD valign="top" width="100%">	  <p align="left"><img border="0" src="../assets/ico_emblema.gif">  </p>  </TD><TD valign="middle" width="100%">	  <p align="left">	  <b>Dados do usuário</b>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Nome:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=200" type="text" name="Campo1" maxlength="60" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">e-mail:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=150" type="text" name="Campo3" maxlength="70" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" df_validar="email" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Telefone:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=100" type="text" name="Campo2" maxlength="12" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Celular:  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=150" type="text" name="Campo4" maxlength="12" value="" onKeyPress="desabilita_cor(this)" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"> <img border="0" src="../assets/ico_emblema.gif">    </TD><TD valign="middle" width="100%">	  <p align="left">	  <b>Dados para contato</b>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Segmento	  desejado:*                    </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">	<SELECT style="width=150" name="Campo5" df_verificar="sim" onChange="desabilita_cor(this)" class=campos_formulario>	  <OPTION value=""></OPTION>	  <OPTION value="Evento Artístico">Evento Artístico</OPTION>	  <OPTION value="Evento Corporativo">Evento Corporativo</OPTION>	  <OPTION value="Formaturas">Formaturas</OPTION>	  <OPTION value="Evento Promocional">Evento Promocional</OPTION>	</SELECT>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Tipo de transação:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><input type="radio" name="Campo6" value="Orçamento" df_verificar="sim">Orçamento <input type="radio" name="Campo6" value="Locação" df_verificar="sim">Locação            </p>	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">                       </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Tipo do evento:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><input type="radio" name="Campo7" value="Aberto" df_verificar="sim">	  Aberto<input type="radio" name="Campo7" value="Fechado" df_verificar="sim">Fechado          </p>	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">                                                               </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Endereço da	  instituição:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=200" type="text" name="Campo8" maxlength="150" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Complemento:  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=100" type="text" name="Campo9" maxlength="70" value="" onKeyPress="desabilita_cor(this)"  class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Bairro:*                             </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=150" type="text" name="Campo11" maxlength="70" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">CEP:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=100" type="text" name="Campo10" maxlength="9" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Cidade:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=150" type="text" name="Campo12" maxlength="70" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Estado:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><INPUT style="width=150" type="text" name="Campo13" maxlength="50" value="" onKeyPress="desabilita_cor(this)"  df_verificar="sim" class=campos_formulario>	  </p>  </TD></TR>  <TR class=titulo_campos><TD valign="top" width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">Mensagem:*  </TD><TD width="100%">	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"><TEXTAREA name="Campo14"  df_verificar="sim" onKeyPress="desabilita_cor(this)" class=campos_formulario rows="6" cols="35"></TEXTAREA>	  </p>	  <p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left"> </p>  </TD></TR></TABLE><p style="word-spacing: 0; margin-top: 0; margin-bottom: 0" align="left">                                       <input type="submit" name="submit" value="Enviar" class=textBoldColor style="font-family: arial; font-size: 11"></form><%End If%></BODY></HTML>

Valeu mais uma vez galera.

Maktub

maktub · Novembro 7, 2005

alguém?

N3G4T1V3 · Novembro 7, 2005

Primeiro você deve fazer com que o usuário digite obrigatoriamente o email dele... ai você faz assim:on error resume nextSet eObjMail = Server.CreateObject("CDONTS.NewMail")eObjMail.to = ParaEmaileObjMail.from = NomeEmail & "<" & Email & ">"eObjMail.subject = AssuntoeObjMail.Importance = 1eObjMail.BodyFormat = 0eObjMail.MailFormat = 0eObjMail.body = Mensagem eObjMail.sendSet eObjMail = nothingSet eObjMail2 = Server.CreateObject("CDONTS.NewMail")eObjMail2.to = EmailClienteeObjMail2.from = "Minha Empresa <empresa@empresa.com.br>"eObjMail2.subject = AssuntoeObjMail2.Importance = 1eObjMail2.BodyFormat = 0eObjMail2.MailFormat = 0eObjMail2.body = "Sua mensagem foi enviada com sucesso! em breve estaremos entrando em contato!"eObjMail2.sendSet eObjMail2 = nothing

maktub · Novembro 8, 2005

Da pra fazer assim tembém:

Case "CDONTS"on error resume nextSet eObjMail = Server.CreateObject("CDONTS.NewMail")eObjMail.to = ParaEmaileObjMail.from = NomeEmail & "<" & Email & ">"eObjMail.subject = AssuntoeObjMail.Importance = 1eObjMail.BodyFormat = 0eObjMail.MailFormat = 0eObjMail.body = Mensagem  eObjMail.sendSet eObjMail = nothingSet eObjMail = Server.CreateObject("CDONTS.NewMail")eObjMail.to = NomeEmail & "<" & Email & ">"eObjMail.from = ParaEmaileObjMail.subject = "SOBRE SEU CONTATO"eObjMail.Importance = 1eObjMail.BodyFormat = 0eObjMail.MailFormat = 0eObjMail.body = "RECEBEMOS SEU CONTATO EM BREVE NOSSA EQUIPE ENTRARÁ EM CONTATO COM VOCE"eObjMail.sendSet eObjMail = nothingEnd SelectEnd Function

ja testei e funciona perfeitamente, quem quiser pegar o código fique a vontade.

moderador, pode fechar o tópico.

Maktub

Entrar

Arquivado

envio de e-mail com CDONTS

Recommended Posts

maktub 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

maktub 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

N3G4T1V3 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

maktub 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Fixar div até atingir uma certa altura

Ajuda com Extends e envio para o banco

PHP+Codeginiter - Orientação para Impressão

Este projeto é apoiado pelas empresas

Fóruns

Tempo Real

Informação importante