Сообщения

1

Разработка приложений / отображение вложения в письме

« : 26 Февраль 2016, 19:42:26 »

Мы не работаем с Лотусовской почтой, но принцип, вроде, я понял, что Вы хотите. Но тут понадобятся знания Лотуса.
(пока писал, чет разогнался, надеюсь понятно будет и я описал то, что требовалось)
Если в письме такое возможно отобразить, то можно сделать так:
1. добавить в него, в письмо, встроенное представление (я так понимаю в форму письма или в подформу)
само представление создать по принципу первый столбец это текстовый вариант ответного поля (на что отвечает документ, типа @Text(Имя ответного поля)) и сделать его категоризированным. В остальных столбцах отобразить нужную информацию о письмах, например Автор, тема, и столбец с текстовым отображением наименования файлов вложений (надеюсь такое имеется в письме, за счет которых можно отобразить, что там за вложения есть)
2. Далее во встроенном преставлении указываем, само собой, наше новое представление. Там же в настройках встроенного представления имеется, что то вроде формула "Подрезки" по категории, там вот и указываем @Text(@DocumentUniqueID)), т.е. будут отображаться только те, у которых в поле ответе ИД этого документа, в который мы смотрим (это когда в дизайнере встаем на форме или подформе на встроенное представление слева есть типа Show Single Category, не помню как по русски, но там их всего два одно выбор представления, второе указать формулу)
3. Теперь при открытии письма Вы увидите все ответные письма.
4. Если уже поизвращаться, то можно в событии нашего представления QueryOpenDocument прописать, что при открытии документа, если есть вложения, лезть в них (если их несколько то вывести список с именами файлов, что б можно было указать, что открыть) и открывать только вложение, а не документ. Прикольная штука
Если это то самое, то непонятные вещи могу подробнее рассказать.

2

Разработка приложений / отображение вложения в письме

« : 26 Февраль 2016, 15:30:30 »

Я так понимаю ты работаешь с почтой лотусовской. Я там не совсем в курсе как все устроено, но наверно так же как и везде.
Т.е. надо, что б в первом письме (документе) отображались все вложения из ответных документов? или хотя бы просто текстовки имен вложенных файлов?
Если надо отображать вложения всех ответов, то это надо где то в переходах кодом их перетакскивать в саму голову, т.е. верхний самый верхний документ.

3

Разработка приложений / работа с вложениями, конвертация word в pdf

« : 26 Февраль 2016, 09:32:36 »

Раз никто не вкурсе как это по нормальному делается, то напишу как это можно сделать через "Костыль". Может пригодится.


Dim wrdApp As Variant ' Объект MS Word
Set wrdApp= CreateObject("Word.Application")
wrdApp.Visible = False
Dim wordDoc As Variant

Dim word As Variant
Dim FullFilePath As String
' тут мы или открываем с диска или можем взять его с вложения из аттача
Set wordDoc = wrdApp.Documents.Open(Fullfilepath, False, True, False)

FullFilePath = StrLeftBack(FullFilePath, ".") 'надо в пути урезать расширение файла, а то получится файл.doc.pdf
Call wordDoc.ExportAsFixedFormat(FullFilePath, 17) ' сохранить в PDF
Call wordDoc.Close(0)

wrdApp.quit

' а далее, тот файл, который сохранится как .PDF либо новым объектом "подбираем" и вкладываем во вложение, либо просто открываем для работы

4

Разработка приложений / работа с вложениями, конвертация word в pdf

« : 11 Февраль 2016, 07:58:50 »

Здравствуйте!
Подскажите, пожалуйста, как можно реализовать конвертирование вложенного файла word в pdf без сохранения его на диск. Как его сохранить на диск в pdf я сделал, но таким способом получится, что надо сначала word сохранить, потом его через open поймать с диска, снова сохранить, но уже в pdf и потом только вкладывать во вложение, в сам документ Lotus.
Т.е. вопрос состоит в том, как преобразовать файл, так сказать в "потоке", без лишних сохранений.
Я делаю так (вкратце):

Dim wrdApp As Variant
Dim attach As NotesEmbeddedObject
Dim dDoc as NotesDocument

Set dDoc=мой документ
Set wrdApp= CreateObject("Word.Application")
Set vEmb=dDoc.GetFirstItem( "Files" )
Set attach=vEmb.EmbeddedObjects(0)

и все, тут затык, как attach прикрутить к wrdApp, что б в итоге его конвертнуть или может по другому как то это делается? сразу attach можно преобразовать?