Visual Basic.NET - Recibir correo electronico

   
Vista:

Recibir correo electronico

Publicado por Jesus (9 intervenciones) el 23/06/2011 08:17:32
Hola.
Para enviar correos electronicos, utilizo el siguiente codigo:

Mi_Email = Mi_Mensajero.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem)
Mi_Inspector = Mi_Email.GetInspector()
'
Mi_Email.Subject = AsuntoMail
Mi_Email.Body = CuerpoMail
Mi_Email.To = EmailDestino
Mi_Email.Attachments.Add("C:\Carta.pdf", 0, 0)
Mi_Email.Send()

El problema, es que no consigo hacer que me reciba correo, utilizando el siguiente codigo:

If Mi_Email.UnRead Then

Nombre = Mi_Email.SenderName
Nombre = Mi_Email.Subject
Nombre = Mi_Email.ReceivedTime
Nombre = Mi_Email.Body
End If

Con el codigo anterior, puedo recibir correos electronicos, pero no consigo recibir los adjunto, para guardarlos.

¿Puede alguien darme una idea?

Gracias
Un saludo
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