встроенные изображения в письмах из Outlook

1. пользователь 07.01.20 14:08
Сообщение было скрыто модератором.
...
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. a.m.minakov 09.01.20 10:30 Сейчас в теме
В итоге вот эталонный код.

	
 Письмо = Outlook.CreateItem(0);
	 Письмо.Recipients.Add("test@gmail.com");
	 Письмо.Subject = "Тестовое письмо";
	 ВременныйФайл = "C:\Pictures\MyPic.jpg"; 
	 нФайл = Письмо.Attachments.Add(ВременныйФайл,1,0);
	 
	 нФайл.PropertyAccessor.SetProperty("http://schemas.microsoft.com/mapi/proptag/0x370E001F", "image/jpeg");
	 //Change From 0x370eE001E
	 нФайл.PropertyAccessor.SetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F", "MyPic");
	 //'Changed from 0x3712001E
	 Письмо.PropertyAccessor.SetProperty("http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/8514000B", True);
	 
	 Письмо.BodyFormat = "olFormatHTML";
	 Письмо.HTMLBody = "<BODY>"+ТекущаяДата()+" Тут какой-то текст письма  <IMG src='cid:MyPic' align=baseline border=0>"+ТекущаяДата()+"</BODY>";
	 Письмо.Save();
	 Письмо.Send();
Показать
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот