Синтаксис:
procedure SaveMailAsClientContact(
RecipientList: WideString;
CreationDate: WideString;
DateDespatched: WideString;
FullDocumentName: WideString);
Параметры:
• | RecipientList – список почтовых адресов, которые следует занести в DIRECTUM. Почтовые адреса в списке разделяются точкой с запятой «;»; |
• | CreationDate – дата создания письма; |
• | DateDespatched – дата отправки письма; |
• | FullDocumentName – полный путь до файла с текстом письма. |
Описание:
Функция сохраняет письмо электронной почты как контакт с клиентом в системе DIRECTUM. На каждое письмо создается отдельная запись в справочнике Контакты с клиентами.
Если в адресной строке содержится несколько адресов, каждый адрес помещается в отдельную запись детального раздела «Контактные лица». Текст письма помещается в поле Описание.
Пример:
' Сохранить письмо как контакт с клиентом в системе DIRECTUM.
Set Mail = Application.ActiveInspector.CurrentItem
Call Mail.SaveAs(Path, olTXT)
Call IntLib.SaveMailAsClientContact(Mail.SenderEmailAddress, _
Mail.CreationTime, Mail.SentOn, Path)
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |