MsgBox Application.ActivePrinter when not Connected

[drom]

Hi and thanks in advance
If I use:

Dim wActPrinter As String:        wActPrinter = Application.ActivePrinter

If wActPrinter =""  Then 'I can request to install one, no problem

But If wActPrinter <>"" and is not connected, because for eg I am using a laptop in a Taxi and I do not have the possibility to print.

How can I get a message

Something like:

if  Application.ActivePrinter not Connected then MsgBox "No printer Connected"

My actual problem is:

If wActPrinter <> "" I do not get any error because I am sending copies to the queue of my printer

 

[Jaafar Tribak]

A quick search came up with this :
http://www.vbforums.com/showthread....rmine-if-a-printer-is-connected-and-available