Как выгрузить список емаилов из MS Outlook?

Есть код (см. MainCode.txt) который должен выгрузить список адресов в виде: «Имя email», но код вместо нормального, удобоваримого email выгружает абракадабру (см. adr.txt).

Что нужно поменять в коде, чтобы email был нормальным, типа

GeniushAA@anpz.rosneft.ru

?