А как из Лотуса программно печатать вложение?

  • Автор темы rocsolanka
  • Дата начала
Статус
Закрыто для дальнейших ответов.
R

rocsolanka

#1
Надо по нажатию кнопки печатать карточку документа и документ-вложение. Печатать стандартными стредствами Lotus/приложения аттачмента не хотят :-( Можно такое сделать?
 
A

Axel

#2
Просто так не получится.
Можно через OLE сделать , то есть открытие аттача в ассоциированном приложении и печать уже методом Print у этого приложения. Точно пройдет для Ворда и Екселя. Для остальных не проверял.
 
R

rocsolanka

#3
Просто так не получится.
Можно через OLE сделать , то есть открытие аттача в ассоциированном приложении и печать уже методом Print у этого приложения. Точно пройдет для Ворда и Екселя. Для остальных не проверял.
А где можно посмотреть о методах приложения? я просто пока не понимаю даже где искать :-(
как его открыть я понимаю, а как из него печатать?
 
H

Hedg

#4
Вешаем на кнопку
@Command([EditGotoField];"Поле для атача");
@Command([EditInsertObject])
 
H

Hedg

#6
Когда запихнёшь обект таким образом , при открытии документа - атач откроется приложением которое зарегистрированно для данного типа объекта и отуда уже распечатаешь.
 
D

Domino6

#7
В тени печает файл(атач) средствами ОС
Не забудьте указать имя атача можно получить разніми способами переменная file$
Код:
Dim ws As New NotesUIWorkspace	
Dim doc As NotesDocument
Set doc=ws.CurrentDocument.Document
Dim Hwin32 As Long
file$="Имя атача"
Set fOBJ = doc.GetAttachment(file$)
file$="c:\"+file$
Call fOBJ.ExtractFile(file$)
Dim nShowCmd As Long
nShowCmd = 0
lpOperation = "Print" 
Hwin32 = ShellExecute(hwnd,"Print",file$,"",tmpPath,nShowCmd)
 
Статус
Закрыто для дальнейших ответов.