Printer

[YL99]

Hi,

PRINT CHECK

I want to perform a check before printing to ensure that the printer is (online/connected).Does anybody know how do to this ??

Second : Once I've sent a page for printing is there anyway of knowning whether it has been printed. This would allow to update the number of pages printed.

Your help would be much appreciated.

 

[ArtieChoke]

Try this:

On Error Resume Next
p = Printer.DeviceName
If Err.Number = 484 Then
MsgBox "No printer was found. Please add a printer"
Exit Sub
End If


"I think we're all Bozos on this bus!" - Firesign Theatre