Картинка-подпись генерируемая vbs для Outlook
Есть vbs скрипт, который берёт из AD данные и формирует нужную подпись, но в подписи используются наши шрифты, можно как-то перевести эту подпись из текста в картинку и прикреплять её либо в disclaimer либо ещё куда что бы в подписи был такой же текст, только картинкой.
Пробовал canvas подрубать к html подписи, но не обрабатывает JS outlook.
|
Цитата:
Цитата Black_Sun
можно как-то перевести эту подпись из текста в картинку »
|
Можно. Бесплатно —ImageMagick, платно — GflSDK (библиотека бесплатна только для некоммерческого применения). WIA вроде как текст рисовать не умеет, если я не ошибаюсь.
P.S. Ничего, кроме безудержного мата, бессмысленные, повторяющиеся из письма в письмо, картинки-подписи не вызывают.
|
Iska,
:D это да, что ж делать, тогда придётся искать универсальный шрифт, который есть на всех ПК.
про ImageMagick слышал, но по моему там сложно.
|
Цитата:
Цитата Black_Sun
про ImageMagick слышал, но по моему там сложно. »
|
Отнюдь. Скажем, самое простое:
Код:
With WScript.CreateObject("ImageMagickObject.MagickImage.1")
.Convert "-size", "250x50", "xc:none", "-font=C:\Windows\fonts\UNVR58C.TTF", "-pointsize=24", "-fill=yellow", "-draw=text 20,20 'Мама мыла раму'", "C:\Песочница\052\Sample.gif"
End With

|
Black_Sun, можете выложить скриншот с образцом Вашей подписи, указать, какая её часть будет переменной, и сам шрифт. Я посмотрю, можно ли и как сие сделать.
|
Вложений: 1
Iska, Ну идея в том что бы сделать подпись целиком картинкой, ну может кроме слов "С уважением", подпись генериться vbs с данными из AD, запускается через GPO каждый раз при входе пользователя в свою учётку.
Шрифты Modern H Medium, Modern H Light, Modern H Bold, выложить их не могу.
|
Нашёл функцию PasteSpecial появилась идея вставить как объект, только не получается вставить, видимо параметры не знаю какие, кто знает?
|
Цитата:
Цитата Black_Sun
Нашёл функцию PasteSpecial появилась идея вставить как объект, »
|
А у получателя не окажется такого объекта. И?
|
Эм, скрипт выполняется на каждом ПК отдельно, как это не окажется?
|
Black_Sun, не у отправителя. У получателя.
Так что Вам мешает использовать ImageMagick?
|
Iska, в общем сделал через
Код:
objSelection.copy
objSelection.PasteSpecial , , , , wdPasteMetafilePicture
objSelection.ShapeRange.ConvertToInlineShape
в каждом письме теперь 2 вложения (image001.emz и oledata.mso)
а ImageMagick я не знаю абсолютно, если vbs я ещё могу где-то нагуглить, где-то додумать, то тут уже просто ноль, у меня даже выше "самое простое" не получилось :(
|
Решил проблему с вложениями конвертанув объект в PNG строчками
Код:
objSelection.copy
objSelection.PasteSpecial , , , , 14
|
Цитата:
Цитата Black_Sun
Решил проблему с вложениями конвертанув объект в PNG строчками »
|
Вот это совсем замечательно.
|
Время: 11:13.
© OSzone.net 2001-