Help for this page

Select Code to Download


  1. or download this
    $word = CreateObject Win32::OLE 'Word.Application' or die $!;

...
## Outputs: \\TRHMC-IMGDIS1\ECRTJPLF on NE01:
$word->{ActivePrinter} = '\\trhmc-prt6\EDNLJP5L';
print "Default printer: $word->{ActivePrinter}\n";
  2. or download this
        Options.DefaultFilePath(Path:=wdDocumentsPath) = _
        "\\trhmc-fs04\users04\U02904\audit_basic\cgi-bin\"
...
    ActivePrinter = "PDFill PDF Writer"
    ActivePrinter = "\\TRHMC-IMGDIS1\ECRTJPLF"
    ActivePrinter = "\\trhmc-prt6\EDNLJP5L"