<<< voltar

:: ASP :: 

Envio de e-mail utilizando CDONTS

Com este script você pode enviar seus e-mails diretamente 

da sua página em ASP. Para isto, você vai utilizar o objeto CDONTS.

Descrição do  objeto CDONTS

CDONTS (Collaboration Data Objects for NT) é um componente

 que permite enviar mensagens de correio eletrônico diretamente uma página em ASP..

Como seu nome indica esta disponível em servidores NT e em 

particular a partir da versão 4.0. 

Entre algumas de suas características mais importantes está a possibilidade de enviar mensagens em formato de texto ou HTML.

Para utilizar CDO é requerido que esteja instalado e em 

operação, um serviço SMTP (Simple Mail Transfer Protocol) 

 no próprio servidor ou em outro servidor da rede local. O SMTP é instalado por default com o IIS 4.0.

Instruções necessárias para a criação e envio de mensagens

Criação do objeto

    Set mailobj = Server.CreateObject("CDONTS.NewMail")

Formato da mensagem (texto ou HTML)

    mailobj.mailFormat = 0
        mailobj.bodyFormat = 0

Propriedades do e-mail

    
    mailobj.from = "seu_email@nome.com.br"
        mailobj.to = "email@nome.com.br"
        mailobj.subject = "Saudações"
        mailobj.body = "Ola, esta é uma mensagem enviada 

pela scriptshelp em ASP"

Ação de enviar a mensagem 

    mailobj.send

Ação de enviar a mensagem

    
    myCDO.Send "seu_email@nome.com.br", "email@nome.com.br","Saudações",_
        "Ola, esta é uma mensagem enviada pela Geek Brasil em ASP"

Outras propriedades

Entre outras propriedades interessantes que podem ter 

as mensagens enviadas com CDONTS destaca-se o parâmetro importância, arquivos adjuntos, a codificação MIME da mensagem.

No caso de anexar arquivos (atachment), estes devém estar 

localizados em unidades acessíveis pelo servidor e não pelo 

cliente ou navegador).

Abaixo segue o script para você colocar no seu site:
pagina form.asp

<FORM ACTION="enviar.asp" METHOD="POST">
<TABLE>
<TR>
<TD ALIGN="RIGHT">Para:</TD>
<TD><INPUT TYPE="TEXT" SIZE="30" NAME="destinatario"></TD>
</TR>
<TR>
<TD ALIGN="RIGHT">De:</TD>
<TD><INPUT TYPE="TEXT" SIZE="30" NAME="remetente"></TD>
</TR>
<TR>
<TD ALIGN="RIGHT" NOWRAP>Assunto:</TD>
<TD ALIGN="LEFT">
<INPUT TYPE="TEXT" SIZE="67" NAME="assunto">
</TD>
</TR>
</TABLE>
<TABLE>
<TR>
<TD VALIGN="TOP" ALIGN="RIGHT" NOWRAP>Texto da mensagem:</TD>
<TD ALIGN="LEFT" NOWRAP>
<TEXTAREA WRAP="OFF" ROWS="7" COLS="50" NAME="corpo"></TEXTAREA> 
</TD>
</TR>
</TABLE>
<INPUT TYPE="RESET" NAME="Cancelar" VALUE="Limpar"> &nbsp; <INPUT TYPE="SUBMIT" NAME="Enviar" VALUE="Enviar">
</FORM>

Abaixo segue a página enviar.asp

<%
Set mailobj = Server.CreateObject("CDONTS.NewMail")
mailobj.mailFormat = 0
mailobj.bodyFormat = 0
mailobj.from = request.form("remetente")
mailobj.to = request.form("destinatario")
mailobj.subject = request.form("assunto")
mailobj.body = request.form("corpo")
mailobj.send
%>
<p>Seu e-mail foi enviado com sucesso</p>

Bannerlandia