Printqueue auslesen

[Bytestream 10]

Moin ,

 

ich möchte via Script eine Printqueue auslesen. Folgendes Script funktioniert schonmal ganz gut :

 

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

 

Set colPrintJobs = objWMIService.ExecQuery _

("Select * from Win32_PrintJob")

 

Wscript.Echo "Print Queue, Job ID, Owner, Total Pages"

For Each objPrintJob in colPrintJobs

strPrinter = Split(objPrintJob.Name,",",-1,1)

Wscript.Echo strPrinter(0) & ", " & _

objPrintJob.JobID & ", " & objPrintJob.Owner & ", " _

& objPrintJob.TotalPages

Next

 

Ich würde jetzt aber gerne den generierten Output des Scripts in eine Textdatei umlenken. Meine Frage ist nur "wie" ?

 

THX and Greetz

 

Byte

[BinDabeI 10]

Hi Bytestream,

 

habe mal Google gefragt und der hat mir folgendes ausgespuckt:

 

Textfile-Scripting using VBS and VB

 

ich hoffe das hilft weiter.

 

Gruß

Chris

[blub 115]

Hi,

Unter VBS musst du dir das Filesystemobject ansehen. Hier ist eine schöne Anleitung:

Microsoft Windows 2000 Scripting Guide - FileSystemObject

 

cu

blub