Select Code to Download

typedef struct _PRINTER_INFO_2 { 
  LPTSTR    pServerName; 
...
  DWORD     cJobs; 
  DWORD     AveragePPM; 
} PRINTER_INFO_2, *PPRINTER_INFO_2;

$a="\0";
$printer_info_2=pack('PPPPPPPPPPPPPLLLLLLLL',$a,$a,$a,$a,$a,$a,$a,$a,$
+a,$a,$a,$a,$a,0,0,0,0,0,0,0,0);

$GetPrinter=new Win32::API('winspool.drv','GetPrinterA','NNPNP','N');
$GetPrinter->Call($handle,2,$printer_info_2,10000,$bytesgot);

@a=unpack('P32P32P32P32P32P32P32P32P32P32P32P32P32LLLLLLLL',$printer_i
+nfo_2);

\\http://192.168.4.98\Lexmark T4
  \\http://192.168.4.98\Lexmark 
...
0
0
0