Impresion sin printerdialog
Publicado por Borja (5 intervenciones) el 20/06/2018 03:31:28
Hola buenas a todos: tengo una duda.... quiero imprimir un formulario varias veces y uso el siguiente codigo
Este codigo me pide seleccionar la impresora y manda a imprimir sin problema, la cuestión es que quiero mandarlo a imprimir varias veces, pero me pide seleccionar la impresora en todas ellas, y quisiera que solo me lo pidiera la primera vez y que el resto fueran directamente a la impresora seleccionada en la primera ocasión. ¿Alguna idea? Muchas gracias por anticipado.
Un saludo
1
2
3
4
5
6
7
8
9
10
Dim result As DialogResult = PrintDialog1.ShowDialog
If (result = DialogResult.OK) Then
PrintForm1.PrinterSettings = PrintDialog1.PrinterSettings
PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Top = 0
PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Bottom = 0
PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Left = 0
PrintForm1.PrinterSettings.DefaultPageSettings.Margins.Right = 0
PrintForm1.PrinterSettings.DefaultPageSettings.Landscape = False
PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.ClientAreaOnly)
End If
Este codigo me pide seleccionar la impresora y manda a imprimir sin problema, la cuestión es que quiero mandarlo a imprimir varias veces, pero me pide seleccionar la impresora en todas ellas, y quisiera que solo me lo pidiera la primera vez y que el resto fueran directamente a la impresora seleccionada en la primera ocasión. ¿Alguna idea? Muchas gracias por anticipado.
Un saludo
Valora esta pregunta
0
