AXForum  
Вернуться   AXForum > Microsoft Dynamics AX > DAX: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 16.06.2008, 11:03   #4  
if_maks is offline
if_maks
Участник
 
226 / 15 (1) ++
Регистрация: 26.08.2003
Спасибо конечно за пример на VBA но мне бы разобраться как это сделать на аксапте.
Пробую вот так. Говорит что нет метода objCDOMsg.sender()
X++:
static void maks_getMail_FromOutlook_(Args _args)
{
    #SysOutlookCOMDEF
    SysOutlookApplication       outlook = new SysOutlookApplication();
    SysOutlookRecipients        recipients;
    SysOutlookRecipient         recipientsItem;
    SysOutlookFormDescription   formDescription;
    SysOutlook_Items            collection;
    SysOutlook_NameSpace        nameSpace;
    SysOutlookMapiFolder        inboxFolder;
    SysOutlookMailItem          mailItem;
    COM                         nextItem;
    COM                         objSession;
    COM                         objCDOMsg;
    COM                         sender;
    ;

    namespace  = outlook.getNameSpace('MAPI');
    objSession = outlook.CreateObject("MAPI.Session");
    objSession.logon("", "", false, false);

    inboxFolder = namespace.getDefaultFolder(#OlDefaultFolders_olFolderInbox);
    collection = inboxFolder.items();

    nextItem = collection.GetFirst();
    while (nextItem)
    {
        mailItem        = new SysOutlookMailItem(nextItem);
        recipients      = mailItem.Recipients();
        recipientsItem  = recipients.Item(COMVariant::createFromInt(1));

        objCDOMsg = objSession.GetMessage(mailItem.EntryID());//, mailItem.Parent().StoreID());
        sender = objCDOMsg.sender();
        info(sender.address());

        info("??: "   + mailItem.SenderName());
        info("????: " + recipientsItem.Address());

        info("????: " + mailItem.Subject());
//        info(mailItem.HTMLBody());
        info("====================");
        nextItem = collection.GetNext();
    }
}
Теги
документация

 

Похожие темы
Тема Автор Раздел Ответов Посл. сообщение
Как получить указатель на отчёт когда пользователь выбрал Печать на принтер в просмотрщике, в форму SysPrintForm? rkorchagin DAX: Программирование 10 17.04.2008 11:59
Юридический и фактический адрес в счете на оплату madproger DAX: Программирование 2 26.01.2007 12:55
Адрес клиента Pegiy DAX: Функционал 4 29.07.2004 11:19
Можно ли в одном select`e получить maxof и minof по одному полю? ArturK DAX: Программирование 2 28.04.2004 12:28
Получить значение поля таблицы по номеру (Id) поля Anais DAX: Программирование 2 15.04.2004 13:00

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 13:23.