in reply to Re: Re: WinNT Printer monitoring...
in thread WinNT Printer monitoring...
Here's a little sample. This will list the names of printers on a praticular NT server..
Hope this helps..!/usr/bin/perl -w use strict; use Win32::OLE qw/in/; #fill in domain and server my $domain = ''; my $server = ''; my $printer; my $objServer = Win32::OLE->GetObject("WinNT://$domain/$server"); $objServer->{FILTER} = ["printqueue"]; foreach $printer (in $objServer) { print "$printer->{NAME}\n"; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: (rchiav)Re(3): WinNT Printer monitoring...
by Necos (Friar) on Sep 06, 2001 at 07:05 UTC | |
by rchiav (Deacon) on Sep 06, 2001 at 18:01 UTC |