I'm missing the "winspool" constant when getting the default printer via "Printer$". My software requires a syntax like " CANON MP610 series Printer,winspool,LPT1:". I'm using the following code and currently add manually ",winspool," which i think is not quite correct. It seems that "Printer$" could only give back the printer's name and port. Perhaps one of You knows more.
Code:
If PrinterCount > 0 Then For i = 1 To PrinterCount sPrinter = Printer$(Name, i) XPrint Attach sPrinter XPrint Close Next i XPrint Attach Default, "" 'Den Standarddrucker als Dummy anfügen For i = 1 To PrinterCount sPrinter = Printer$(Name, i) sPort = Printer$(Port, i) If sPrinter = XPrint$ Then sDefaultPrinter = sPrinter + ",winspool," + sPort Exit For End If Next i End If