Dokument drucken

[skywook]

Hallo,
folgendes Script sucht ein Dokument aus dem Backend und öffnet dieses (soweit funktioniert das Script):

keys(0) = a2
keys(1) = "M9"
Set tmpdoc = v.GetDocumentbyKey(Keys,True)
If Not (tmpdoc Is Nothing) Then
Call ws.EditDocument( True , tmpdoc)
.....
End if
 
aber das Problem:
Wie kann ich diese Dokument jetzt drucken mit
Call tmpdoc.print(1)
funktionierts nicht.

[koehlerbv]

Bitte nicht posten "geht es nicht" ! Bitte genauere Angaben - wir lösen hier Probleme in unserer Freizeit, und uns jetzt erstmal auf "Kaffee(satzleser)Tour" zu schicken, ist nicht ganz fair !!

Hier ist es aber ganz einfach: tmpdoc ist ein NotesDocument, die Methode Print funktioniert aber nur mit NotesUIDocuments.
Nach dem Öffnen des Backend-Docs (NotesUIWorkspace.EditDocument) musst Du also auch das FrontEnd-Document instantiieren:
Set uidoc = ws.CurrentDocument

Dann klappt es auch mit uidoc.Print.

Bernhard

[skywook]

Danke! Hat funktioniert.