Obtener el email de un remitente de Outlook
Publicado por Ana (1 intervención) el 09/12/2005 12:55:50
Hola,
necesito como obtener el email de un remitente de Outlook utilizando código Visual Basic 6.
Sé como obtener el nombre del remitente de un correo que está en el Inbox, pero no conseguir su dirección de email.
Para conseguir el nombre del remitente lo que hago es lo siguiente:
Me creo una variable de tipo Email de Outlook:
Dim eMail As Outlook.MailItem
Me declaro una variable para recorrer una carpeta.
Dim fld As Outlook.MAPIFolder
For i = 1 To fld.Items.Count
If fld.Items.item(i).Class = olMail Then
Set eMail = fld.Items.item(i)
y aquí en una variable recojo el valor del nombre del remitente:
Dim Nombre as string
Nombre= eMail.SenderName
PERO NO SÉ RECOGER LA DIRECCIÓN DEL REMITENTE.
Cuando recojo el nombre tengo entendido que accedo a la propiedad
MAPI PR_SENDER_NAME del outlook pero para recoger la dirección debo acceder
a la propiedad PR_SENDER_EMAIL_ADDRESS.
Por favor, es urgente lo necesito para el trabajo, si alguien puede ayudarme se lo agradecería mucho.
Muchas gracias
necesito como obtener el email de un remitente de Outlook utilizando código Visual Basic 6.
Sé como obtener el nombre del remitente de un correo que está en el Inbox, pero no conseguir su dirección de email.
Para conseguir el nombre del remitente lo que hago es lo siguiente:
Me creo una variable de tipo Email de Outlook:
Dim eMail As Outlook.MailItem
Me declaro una variable para recorrer una carpeta.
Dim fld As Outlook.MAPIFolder
For i = 1 To fld.Items.Count
If fld.Items.item(i).Class = olMail Then
Set eMail = fld.Items.item(i)
y aquí en una variable recojo el valor del nombre del remitente:
Dim Nombre as string
Nombre= eMail.SenderName
PERO NO SÉ RECOGER LA DIRECCIÓN DEL REMITENTE.
Cuando recojo el nombre tengo entendido que accedo a la propiedad
MAPI PR_SENDER_NAME del outlook pero para recoger la dirección debo acceder
a la propiedad PR_SENDER_EMAIL_ADDRESS.
Por favor, es urgente lo necesito para el trabajo, si alguien puede ayudarme se lo agradecería mucho.
Muchas gracias
Valora esta pregunta
0