Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

fabiosc80

cdosys

Recommended Posts

Peguei esse código no site da Locaweb.

 

<% 
'cria o objeto para o envio de e-mail 
Set objCDOSYSMail = Server.CreateObject("CDO.Message")

'cria o objeto para configuração do SMTP 
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")

'SMTP 
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp2.locaweb.com.br"

'porta do SMTP 
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

'porta do CDO 
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

'timeout 
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 

objCDOSYSCon.Fields.update 

'atualiza a configuração do CDOSYS para o envio do e-mail 
Set objCDOSYSMail.Configuration = objCDOSYSCon

'e-mail do remetente 
objCDOSYSMail.From = "eu@MeuDominio.com.br"

'e-mail do destinatário 
objCDOSYSMail.To = "destinatario@dominio.com.br"

'assunto da mensagem 
objCDOSYSMail.Subject = "Teste do CDOSYS"

'conteúdo da mensagem 
objCDOSYSMail.TextBody = "Teste do componente CDOSYS"
'para envio da mensagem no formato html altere o TextBody para HtmlBody 
'objCDOSYSMail.HtmlBody = "Teste do componente CDOSYS"

'objCDOSYSMail.fields.update
'envia o e-mail 
objCDOSYSMail.Send 

'destrói os objetos 
Set objCDOSYSMail = Nothing 
Set objCDOSYSCon = Nothing 

response.write "E-mail enviado para destinatario@dominio.com.br ..." 
%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Qual é o melhor eu não sei... mas a tendência é acabar com o CDONTS e ficar o CDOSYS.... Eu prefiro o CDONTS... e na falta dele, prefiro o ASPMAIL.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Qual é o melhor eu não sei... mas a tendência é acabar com o CDONTS e ficar o CDOSYS.... Eu prefiro o CDONTS... e na falta dele, prefiro o ASPMAIL.

eu uso Jmail, AspEmail, Cdonts agora e acho que vou ,migrar pro CDOSYS que acha?

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.