Hola gente, les comento mi problema
Cuando se carga el primer formulario vb6 lee los mails recibidos por outlook y agrega los sender en un list1.
Tengo que hacer que cuando hago click en un sender especifico me muestre el body en un ritchtextbox. Hasta ahora solo puede hacer que me muestre todos los bodys de todos los mails recibidos, osea, no se como pocicionarme en un mail especifico para que lo muestre.
Este es el codigo con el que estoy intentando leer los bodys
Código:
rtb1.Text = ""
Dim olApp As Outlook.Application
Dim Inbox As Outlook.MAPIFolder
Dim InboxItems As Outlook.Items
Dim MailObject As Object
Dim Dealer As Integer
Set olApp = CreateObject("Outlook.Application")
Set Inbox = olApp.GetNamespace("Mapi").GetDefaultFolder(olFolderInbox)
Set InboxItems = Inbox.Items
For Each MailObject In InboxItems
rtb1.Text = MailObject.Body
Next
Set olApp = Nothing
Set Inbox = Nothing
Set InboxItems = Nothing
Set MailObject = Nothing
Espero que alguien me pueda dar una mano, se que es muy sencillo esto, pero es la primera vez que trabajo con mails. Y ya que estamos si alguien tiene algun ejempli completo sobre este tema se los agradeceré!
Salu2!