git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@42703 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
Chris Elliott 2006-10-30 09:07:20 +00:00
parent a387938f80
commit e822c5c9a6

View File

@ -26,6 +26,7 @@ Sub do_ps(mydir, myfile)
"", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto
ActivePrinter = "\\biolpc22\laserjet"
ActiveDocument.Fields.Update
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=False, PrintToFile:=True, PrintZoomColumn:=0, _