[VB6] stato della stampante

[allejo]

Ciao a tutti volevo sapere in vb come si fa a sapere che stato è la stampante?
Mi interessa sapere la stampante che sia in linea o no.
Non ne ho proprio idea su come fare.......
Mi aiiutate????

[ladyBlu]

allejo linguaggio e versione devono essere specificati nel titolo. non te ne dimenticare, anche perchè non sei un nuovo utente.
ciao

[allejo]

Eheheheheheh hai ragione LadyBlu......mi ero dimenticato......
Cmq è Visual Basic 6.
Non sono più venuto su questo forum perchè ero impegnato con altro linguaggio.
Scusa ancora!

[axsw]

Funziona con win NT/2000/XP
è necessaria una chimata alle API:

Private Declare Function ConnectToPrinterDlgLib "winspool.drv"(ByVal
hWnd As  Long ByVal flags As Long) As Long

ConnectToPrinterDlg Me.hWnd, 0

In Win 9X non si può ottenere ma puoi fare così
Shell "rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter"

ciao

[allejo]

Spiegati meglio......
ho copiato il tuo codice.......mi da errore su
"winspool.drv"
mi dice Errore compilazione previsto Lib
Che significa????

[axsw]

Private Declare Function ConnectToPrinterDlg Lib "winspool.drv" _(ByVal hWnd As  Long ByVal flags As Long) As Long

ConnectToPrinterDlg Me.hWnd, 0

In Win 9X non si può ottenere ma puoi fare così
Shell "rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter"

Sorry avevo scritto tutto attaccato (ConnectToPrinterDlgLib) invece di (ConnectToPrinterDlg Lib).

[axsw]

Copia questo

Private Declare Function ConnectToPrinterDlg Lib "winspool.drv"(ByVal hWnd As  Long ByVal flags As Long) As Long

ConnectToPrinterDlg Me.hWnd, 0

In Win 9X non si può ottenere ma puoi fare così
Shell "rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter"

Ciao