IADsPrintQueueOperations Method: PrintJobs

PrintJobs()As IADsCollection;

This method returns the collection of print jobs currently in the queue.


Dim PrintQueueOperations As IADsPrintQueueOperations
Dim PrintJob As IADsPrintJob
Dim PrintJobCollection As IADsCollection
'Get the interface. In the path HP DeskJet 500C is the print queue.
Set PrintQueueOperations = GetObject ("NTDS://MSFT/MOON/HP DeskJet 500C")
'Get Print Jobs
Set PrintJobCollection = PrintQueueOperations.PrintJobs
For each PrintJob In PrintJobCollection
 Debug.Print PrintJob.Description
Next PrintJob


See Also