Fallo al enviar un correo en VB.net
 

Buenas tardes.

Verán, yo tengo el siguiente problema, cuando me dispongo a enviar un email, através de VB.NET me salta este error:


Could not access 'CDO.message' object.

en el codigo yo especifico el servidor smtp de lasiguiente manera:

SmtpMail.SmtpServer = "smtp.miservidor.com"

¿Que problema puedo tener? ¿Será que al ser un servidor privado no me deja?, tengo una cuenta en ese servidor, ¿Tengo q mandar el usuario y la contraseña?, si es asi, ¿Como lo hago?

En fin, haber si pueden ayudarme y desde ya gracias.

Hola! Has probado a poner como smtpserver el localhost? Yo
lo tengo así y me funciona. Otra posibilidad es que el servidor
de smtp del IIS no lo tengas activado, míralo por si acaso.

El código que he utilizado yo es:

Try
Dim email As New MailMessage
With email
.From = direccionSalida
.To = direccionEnvio
.Subject = "Prueba"
.Body = textomensaje
.BodyFormat = MailFormat.Html
.Priority = MailPriority.High
End With
SmtpMail.SmtpServer = "localhost"
SmtpMail.Send(email)
Catch ex As Exception
objResponse.write(ex.Message)
objResponse.write(ex.InnerException.InnerException .Message)
End Try

End Sub


Espero que te sirva de algo. Un saludo.