Visual Basic.NET - Error al anviar correo

 
Vista:

Error al anviar correo

Publicado por Jorge (20 intervenciones) el 04/07/2005 20:43:49
Hola intento enviar un correo y cuando llega a la linea:

SmtpMail.Send(oMsg)

me sale esto:

Excepción no controlada del tipo 'System.Web.HttpException' en system.web.dll

Información adicional: No se puede obtener acceso al objeto 'CDO.Message'.

E reinstaldo el visual studio y nada sigue saliendo,puede ser q sea porque tengo el windows home Edition??
Alguien puede ayudarme porfavor es para el proyecto final de carrera, gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error al anviar correo

Publicado por Darker4Ever (24 intervenciones) el 06/07/2005 12:39:59
estas utilizando el iis como servidor de correo? te recomiendo que especifies un server real, que no sea el tuyo, con un user y un password para mandar emails.
yo he tenido varios problemas con el CDONTS (libreria que se usa para eso). No te puedo ayudar mucho, pero mucho animo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error al anviar correo

Publicado por Jorge (20 intervenciones) el 06/07/2005 20:41:51

Me podrias decir como lo haces tu.Gracias mi codigo es este:
********************************************************************
Dim oMsg As MailMessage = New MailMessage

' TODO: Replace with sender e-mail address.
oMsg.From = "[email protected]"
' TODO: Replace with recipient e-mail address.
oMsg.To = "[email protected]"
oMsg.Subject = "Send using Web Mail"

' SEND IN HTML FORMAT (comment this line to send plain text).
oMsg.BodyFormat = MailFormat.Html

'HTML Body (remove HTML tags for plain text).
oMsg.Body = "<HTML><BODY><B>Hello World!</B></BODY></HTML>"

' ADD AN ATTACHMENT.
' TODO: Replace with path to attachment.
Dim sFile As String = "C:\proba1.lis"
Dim oAttch As MailAttachment = New MailAttachment(sFile, MailEncoding.Base64)

oMsg.Attachments.Add(oAttch)

' TODO: Replace with the name of your remote SMTP server.
SmtpMail.SmtpServer = "MySMTPServer"
SmtpMail.Send(oMsg)

oMsg = Nothing
oAttch = Nothing
************************************************************************************
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar