26.07.2006, 16:56 | #1 |
Участник
|
Нужно: автоматически сформировать письмо (сабж, текст, получатели) и открыть его в аутлуке для того, чтобы пользователь его скорректировал и отправил. Так же нужно, чтобы в письмо подставилась текущая подпись пользователя (что настраивается в Сервис/Параметры/Сообщение/Подписи - у каждого юзера своя соотвественно). Вот с последним пунктом проблема. Кто-нибудь знает, как заставить вставиться подпись?
Пишу вроде этого: Код: CREATE(OutlookApp); OutlookApp.GetNamespace('MAPI'); MailItem := OutlookApp.CreateItem(0); MailItem."To" := 'vasya@mail.ru'; MailItem.Subject('Test subj'); MailItem.HTMLBody('HtMl'); MailItem.Display(1); IF MailItem.Sent THEN ... |
|