Visual Basic - direccionar reporte a impresora

Life is soft - evento anual de software empresarial
   
Vista:

direccionar reporte a impresora

Publicado por Agustín (6 intervenciones) el 16/05/2011 22:48:21
para usuarios que tienen más de una impresora conectadas a su PC, cómo hago para direccionar (por código) un reporte a una u otra impresora. Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

direccionar reporte a impresora

Publicado por Pedro Luis (128 intervenciones) el 17/05/2011 10:59:22
Con este ejemplo puedes hacer que el usuario elija la impresora, el control lo encontraras en proyecto - componentes- Microsoft Common Dialog.

Ejemplo del control CommonDialog del cuadro de diálogo Imprimir
El siguiente ejemplo presenta el cuadro de diálogo Imprimir.

Private Sub Command1_Click()
Dim BeginPage, EndPage, NumCopies, i
' Establecer CancelError a True
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
' Presentar el cuadro de diálogo Imprimir
CommonDialog1.ShowPrinter
' Obtener los valores seleccionados por el usuario en el cuadro de
' diálogo
BeginPage = CommonDialog1.FromPage
EndPage = CommonDialog1.ToPage
NumCopies = CommonDialog1.Copies
For i = 1 To NumCopies
' Código para enviar los datos a la impresora
Next i
Exit Sub
ErrHandler:
' El usuario ha hecho clic en el botón Cancelar
Exit Sub
End Sub

Como no dices que herramienta usas para listar, y en el caso de sepas que impresora vas a usar te paso comanos del Crystal 4.6 (el que viene con el visual)
Listado.PrinterDriver = Printers(n).DriverName
Listado.PrinterName = Printers(n).DeviceName
Listado.PrinterPort = Printers(n).Port
Siendo n el list index de las impresoras diponibles.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar