How to get list of Mail Subject of all unread emails in Outlook Inbox using QTP.

Qtp Script to get list of all unread emails in Outlook Inbox with Mail Subject

Set a = CreateObject("Outlook.Application")

Set b = a.GetNameSpace("MAPI")

Set c = b.GetDefaultFolder(6)

for i=1 to c.items.count

if c.items(i).unread then

List = List & c.items(i).Subject & vbCrLf

end if

next

How to get list of Senders Email Ids/Email Address of all unread emails in Outlook Inbox using QTP.

Qtp Script to get list of Senders Email Ids/Email Address of all unread emails in Outlook Inbox.

Set a = CreateObject("Outlook.Application")

Set b = a.GetNameSpace("MAPI")

Set c = b.GetDefaultFolder(6)

for i=1 to c.items.count

if c.items(i).unread then

List = List & c.items(i).SenderEmailAddress & vbCrLf

end if

next