enviar correo

[Willy Fog]

hola a todos, tengo un error que no puedo solucionar, es este:

Cuando quiero mandar un correo, mediante visual basic.net, escribo el siguiente código:

correo = New MailMessage()
correo.To = "[email protected]"
correo.From = "[email protected]"
correo.Subject = "Fichero diario"
correo.Body = "Fichero anexado"
correo.BodyFormat = System.Web.Mail.MailFormat.Text
atach1 = New MailAttachment(ruta & "/fich/fichero.zip")
correo.Attachments.Add(atach1)
SmtpMail.SmtpServer = "EXCHANGE"
SmtpMail.Send(correo)

El proble viene cuando meto la linea de SmtpMail.SmtpServer = "EXCHANGE"
Si la pongo como comentario, el corro va por internet y llega correcatmente, pero como mi programa va a enviar muchos correo s a muchas gente, si alguno no esta bien escrita la direccioón, no me entoro de que no le llega.
Para eso, quiero que los correos salgan por mi servidor de correo, que se llama "EXCHANGE" pero cuando meto esta linea, me salta error:
No se puede obtener acceso al objeto 'CDO.Message'
he probado con "SMTP.EXCHANGE", "EXCHANGE.<DOMINIO>.ES", "EXCHANGE.ES".

YA NO SE QUE HACER
el problema es que si el usuario manda un correo y no sabe si lo ha recivido o no es inseguro y eso no mola.

Cualquier ayuda me vendria muy bien, un saludo a todos y aupa
¿Se podria mandar correo con conformidad ?

[RootK]

he probado con "SMTP.EXCHANGE", "EXCHANGE.<DOMINIO>.ES", "EXCHANGE.ES".

Hola..., lo que te sugiero es que verifiques bien como se llama el servidor que te proporciona el servicio de correo electrónico.

SmtpMail.SmtpServer = "mi_servidor_de_correo"

Ojo... que si por otro lado no estas directamente en la intranet y haces una aplicacion externa es necesario que conozcas el smtp de tu site.

el problema es que si el usuario manda un correo y no sabe si lo ha recivido o no es inseguro y eso no mola.

En este caso puedes manejar un try y catch para verificar si llega o no el correo en caso de que no llegue te mandas a ti mismo (si eres el administrador) el mail informando a que usuario no le llegó el correo.. ejemplo.

correo = New MailMessage()
correo.To = "[email protected]"
...
....
try
SmtpMail.SmtpServer = "EXCHANGE"
SmtpMail.Send(correo)
catch
'aqui te envias la info del usuario que no le llegó el correo
end try

Saludos y suerte

[Willy Fog]

El error que me da es el siguiente:

"No se puede obtener acceso al objeto 'CDO.Message'." String

[RootK]

Mira.. la verdad no he leído bien el siguiente artículo porque ando con algo de chamba pero al parecer te puede dar una idea de lo que necesitas.

http://www.microsoft.com/latam/techn...04/default.asp

Espero te sirva

[fvela]

Hola, no se si os valdra de algo pero el problema que teneis es que vuestro servidor smpt en la maquina donde estan las paginas web por defecto esta desactivado lo activais y os funcionara.

Un saludo