Categorias

Enviando E-mail com o CDO.Message

Publicado por Angelo Resende Júnior

Uma maneira simples e eficiente de se enviar e-mail é usando o CDO.
Sua maior virtude além do fácil manuseio, é o fato de praticamente todos os provedores de hospedagem possuí-lo instalado.

'===== primeiro código - (default.asp) =====


.:: Código Fonte - Envio de email ::.



Preencha os campos abaixo!!!
Nome:
E-mail:
Mensagem:
'===== FIM PRIMEIRO CÓDIGO ===== '=============================== '===== segundo código - (envia.asp) ===== .:: Código Fonte - Envio de email ::.

OBRIGADO
Mensagem enviada com sucesso!!!

'===== FIM SEGUNDO CÓDIGO ===== '=============================== 'EXPLICAÇÕES 'Cria o objeto Set ObjMail = Server.CreateObject("CDO.Message") 'Remetente objMail.From = stremail 'Destinatário objMail.To = "seuemail@dominio.com.br" 'Assunto objMail.Subject = "Título da Mensagem" 'Mensagem objMail.HTMLBody = strmensagem 'Envia o E-mail objMail.Send 'Fecha o objeto Set objMail = Nothing '=============================== *´¨) AN-ICE ¸.•´¸.•*´¨) ¸.•*¨) (¸.•´ (¸.•` * ANGELO JÚNIOR (.)(.) Tags: