PageSetupDialog.ShowDialog Choix d'une imprimante
Bonjour,
Je ne comprend pas pourquoi en local ma fenetre de configuration s'ouvre correctement et une fois le code passé sur le serveur de DEV plus rien ne s'ouvre?!?
Comment faire pour que la page de configuration de l'imrpimante s'ouvre coté client avec la liste des imprimantes dispo sur son profil?
Merci de votre aide
Voilà le code utilisé:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
|
Private Sub Imprime()
Try
Dim pd As New PrintDocument()
'*****************************
Dim psDlg As New PageSetupDialog
Dim LePageSettings As New PageSettings
LePageSettings.Landscape = True
psDlg.PageSettings = LePageSettings
pd.DefaultPageSettings = LePageSettings
psDlg.Document = pd
psDlg.AllowOrientation = False
'*****************************
Dim result As DialogResult = psDlg.ShowDialog(Page)
If (result = System.Windows.Forms.DialogResult.OK) Then
AddHandler pd.PrintPage, AddressOf Me.pd_PrintPage
pd.Print()
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub |