Knowledge Base

A VBA module which allows the default printer to be changes. Then it is easy to print a document with the command line (Shell “Write /p file.txt”). After you can come back to the previous default printer. This module has been tested on PcVue 720d VBA under Windows XP. It should work on other versions of PcVue supporting VBA.

Below is a sample of code, executed from a mimic button, to print a specifc document on a specific printer (PDF995) :

Dim PathFile As String
Dim PrinterName As String
Dim DefaultPrinterName As String

PathFile = “””” & ThisProject.Path & “\TP\Test.txt” & “”””
DefaultPrinterName = ModPrinter.DefaultPrinter()
PrinterName = “PDF995″‘
PrinterName = “Microsoft XPS Document Writer”‘
PrinterName = “Auto RICOH sur Lyonsrv”

Shell “WRITE /p ” & PathFile
ModPrinter.ChangeDefaultPrinter (PrinterName)
ModPrinter.ChangeDefaultPrinter (DefaultPrinterName)

Download attachments: ModPrinter.zip