Zobrazenφ dialogu pro p°idßnφ tiskßrny

Postup:
' Pracuje pouze pod Windows NT a 2000
Private Declare Function ConnectToPrinterDlg Lib "winspool.drv" _
   (ByVal hWnd As Long, ByVal flags As Long) As Long

' 1. argument je ukazatel na aktußlnφ formulß°
' 2. argument je rezervovßn a musφ b²t nula
ConnectToPrinter Me.hWnd, 0

Pod Windows 9x nenφ tato API podporovßna a nejjednoduÜÜφ cesta je pou₧φt volßnφ Pr∙vodce pro p°ipojenφ k tiskßrn∞ s pomocφ shellu:
' Pracuje pod Windows 95, 98, NT a 2000
Shell "rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter"

Zp∞t

Autor: The Bozena