VBScript: Anderen Drucker ansteuern

Hallo zusammen,

nun habe ich einletztes Problem mit meinem Script.
Wie kann man mit VBScript einen anderen Drucker ansteuern?
Der Ausdruck kommt bei mir immer auf den Standard-Drucker.

Dim DocToPrint, oWord, oDoc
DocToPrint = "C:\datei.doc"

Set oWord = CreateObject("Word.Application")
Set oWordActiveDoc = oWord.Documents.Open("" & DocToPrint)

ActivePrinter = "FreePDF"
Call oWordActiveDoc.PrintOut(, , , , , , , 3)
oWordActiveDoc.Close

Set oWord = Nothing
WScript.Quit(0)

Vielen Dank für eure Hilfe.

Gruss
Mauro

Aus vb-Sicht würde ich sagen: Du suchst dir erst den Drucker aus, den du haben willst aus der Printers-Auflistung (z.B. for each p in printers), dann übergibst du das Printer-Objekt an Word. Wenn das nicht geht, kannst du auch als Notlösung den Standarddrucker umbiegen:
(dim p as object: set p = printer : printer=„Gewünschter Drucker“:'drucken: set printer=p)

Ralph