Domino 9 und frühere Versionen > ND6: Entwicklung

Word-Dokument aus Notes drucken und schließen

(1/4) > >>

Glombi:
Ich möchte per Script ein Worddokument öffnen, drucken und Word danach schließen. Hier mein Ansatz:

Set  OLE_application = CreateObject( "Word.Application" )  
Call OLE_application.documents.add( filePath )  
Set wordDocument =  OLE_application.activedocument
Call wordDocument.PrintOut(True)         'Drucken
Sleep 5              'Warte N Sekunden (sonst wird Word vor Druck geschlossen)
Call wordDocument.Close                         'Word-Dokument schließen
Call OLE_application.Quit()                       'Schließe Word

Ohne das Sleep würde Word sofort geschlossen und es kommt eine Warnmeldung, dass das Dokument nicht gedruckt werden kann.

Wenn ich Call OLE_application.Quit()   nicht aufrufe, bleibt WINWORD als Task in der Taskliste stehen. Das möchte ich nicht.

Frage: Gibt es eine elegantere Möglichkeit, zunächst den Druckauftrag abzusetzen und dann erst Word zu schließen. Zur Zeit behelfe ich mir mit dem Sleep Befehl, der die Ausführung um die angegebenen Sekunden verzögert.

Andreas

eknori:
ich habe auch noch keine bessere Lösung gefunden  :D

Glombi:
Ulrich, das war mal wieder eine super schnelle Antwort  :D

Welchen Wert nimmst Du denn in der Regel? Ich bin mir nicht so sicher, ob 5 ausreicht.

Andreas

eknori:
es sei denn, du fragst irgendwie den Printer Status ab ... Frage des Aufwandes und des Nutzens

eknori:
Andreas: das hängt immer ein wenig davon ab, wie groß die Dokumente sind, die übertagen werden; 5 - 10 sec sollten aber allemal ausreichen.
Ist nicht die elegante Lösung, ich weiß.

Navigation

[0] Themen-Index

[#] Nächste Seite