• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

Адрес адресата в Оутлук сообщении

  • Автор темы Elvis
  • Дата начала
Статус
Закрыто для дальнейших ответов.
E

Elvis

Есть куча информация, про то как выдрать адресс отправителя из сообщения Оутлук, но не нашёл как выдрать адрес адрессата. Я не использую напрямую МайлАйтем, а делаю через ОлеВариант
Код:
outlook, NameSpace: OLEVariant;
MyFolder: OLEVariant;
MyItem: Variant;
outlook  := CreateOleObject('outlook.application');
NameSpace := outlook.GetNameSpace('MAPI');
MyItem := outlook.CreateItem(olMailItem);
MyFolder := Namespace.GetDefaultFolder(olFolderInbox);
for i := 1 to MyFolder.Items.Count do
begin
MyItem := MyFolder.Items[i];
 s:= MyItem.Subject;
s1:= MyItem.SenderName;
attCounter := MyItem.Attachments.Count;
Ниже надо выдирать адресс адрессата, стандартное MyItem.To_ ругается что типа обьект не имеет метода To_
Помогите найти выход из данной ситуации.
Заранее благодарен.
 
E

Elvis

Месага ошибки:
Method To_ is not supported by automation object.
 
E

Elvis

<!--QuoteBegin-Elvis+9:08:2005, 07:51 -->
<span class="vbquote">(Elvis @ 9:08:2005, 07:51 )</span><!--QuoteEBegin-->Месага ошибки:
Method To_ is not supported by automation object.
[snapback]23167" rel="nofollow" target="_blank[/snapback]​
[/quote]
Блин вот я прогнал, тупица я у майл айтем есть свойство То_, а просто То он выделяет жирным как ключевое но просто То почему-то работает.
 
D

Drema

Используй MyItem.Recipients. Получателей письма может быть не один, их много (To,CC,BCC).
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!