CDONTS.newmail en win 2003 server

19/09/2006 - 19:35 por Jol | Informe spam
hola , ateriormente tenia mi stio web en Win 2000 server, ahora lo pase a
Win2003 , todo me funciona bien excepto en la pagina que intento enviar un
mail con CDONTS, el codigo es el siguiente :

<%
Dim sAsunto, sCuerpo
Dim oMail

sAsunto="ASUNTO"
sCuerpo="CUERPO DEL EMAIL"

set oMail=Server.CreateObject("CDONTS.NewMail")
oMail.From = "micorreo@etb.net.co"
oMail.To = "miotrocorreo@aas.com.co"
oMail.Subject = sAsunto
oMail.Body = sCuerpo
oMail.Send
set oMail = nothing
%>

leyendo en las ayudas, dice que en win 2003 server ya no se utiliza CDONTS ,
que ahora se debe utilizr CDO , pero como se utiliza ?

gracias

Joel

Preguntas similare

Leer las respuestas

#1 Miguel Gonzalez
24/09/2006 - 20:12 | Informe spam
Hola Jol.

La forma de utilización del CDO es muy parecida:

<%
Dim mensaje, conf, mensajeConf
Set mensaje = Server.CreateObject("CDO.Message")
Set mensajeConf = Server.CreateObject("CDO.Configuration")
Set conf = mensajeConf.Fields
With conf
.Item("http://schemas.microsoft.com/cdo/co...sing") = 2 'SMTP externo
.Item("http://schemas.microsoft.com/cdo/co...rver") = "smtp.dominio.com"
.Item("http://schemas.microsoft.com/cdo/co...port") = 25
.Item("http://schemas.microsoft.com/cdo/co...eout") = 60
.Update
End With
With mensaje
Set .Configuration = mensajeConf
.From = """Remitente"" "
.To = """Destinatario"" "
.Subject = "Asunto del mensaje"
.TextBody = "Texto del mensaje"
.HTMLBody = "Texto en formato HTML" 'Si se utiliza no hace falta usar "TextBody"
.AddAttachment "C:\files\attachament.doc" 'Adjunta un documento, si procede
End With
mensaje.Send
Set conf = Nothing
Set mensajeConf = Nothing
Set mensaje = Nothing
%>

Para más "refinamientos" mírate este ejemplo y su referencia:

http://msdn.microsoft.com/library/e...dbc8a8.asp


Saludos!
Miguel


Jol escribió:
hola , ateriormente tenia mi stio web en Win 2000 server, ahora lo pase a
Win2003 , todo me funciona bien excepto en la pagina que intento enviar un
mail con CDONTS, el codigo es el siguiente :

<%
Dim sAsunto, sCuerpo
Dim oMail

sAsunto="ASUNTO"
sCuerpo="CUERPO DEL EMAIL"

set oMail=Server.CreateObject("CDONTS.NewMail")
oMail.From = ""
oMail.To = ""
oMail.Subject = sAsunto
oMail.Body = sCuerpo
oMail.Send
set oMail = nothing
%>

leyendo en las ayudas, dice que en win 2003 server ya no se utiliza CDONTS ,
que ahora se debe utilizr CDO , pero como se utiliza ?

gracias

Joel



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida