je n'arrive pas à utiliser les API "OpenPrinter" et "Setjob" avec VB.NET. En VB6, ça marche tres bien, mais avec VB.NET je n'arrive pas à chopper le handdle de l'imprimante qui reste à 0.
Mon code :
Public Declare Function SetJob Lib "winspool.drv" Alias "SetJobA" (ByVal hPrinter As Long, ByVal JobId As Long, ByVal Level As Long, _
ByVal pJob As Byte, ByVal Command As Long) As Long
Public Declare Function OpenPrinter Lib "winspool.drv" Alias _
"OpenPrinterA" (ByVal pPrinterName As String, ByVal phPrinter _
As Long, ByVal pDefault As Long) As Long
Et l'appel à l"API :
Dim hwd As Long
OpenPrinter("\\PC_COMPTOIR\Canon LBP-810", hwd, 0)