Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/06/2008, 07:02
Avatar de Shikanara
Shikanara
 
Fecha de Ingreso: junio-2008
Mensajes: 2
Antigüedad: 16 años, 10 meses
Puntos: 0
Problema con envio de mail

Set oMail = Server.CreateObject("CDO.Message")
Set iConf = Server.CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
'Propiedades del correo
' Se configuran los parametros necesarios para el envío
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1"
iconf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = false
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
iConf.Fields.Update
' Se asignan las propiedades de configuración al objeto
Set oMail.Configuration = iConf
'Propiedades del correo
oMail.From = "F. A. Rodamientos"
oMail.To = emailr
oMail.subject = "Cuit y Contraseña"
oMail.HTMLBody = "<HTML><BODY><P>Estos son sus datos para ingrasar al sitio: </P><p>CUIT o DNI: " & Cuit & "</p><p>Clave: " & Clave & "</p></BODY></HTML>"
'Envio
oMail.Send
Set oMail = Nothing
Set Flds = Nothing

Tengo un problema con el envio de email desde una pagina en asp utilizando CDO (como vieron en el codigo) el problema es bastante raro ya que el e-mail se envia perfectamente y llega a correos como gmail y servidores locales pero lo probe enviando a hotmail y a yahoo y nunca me llega ¿alguien sabe porque pasa esto? y ¿si se puede arreglar de alguna manera?.
gracias