La Web del Programador: Comunidad de Programadores
 
    Pregunta:  56882 - IMPRIMIR AUTOMATICAMENTE UN REPORTE DE CRYSTAL
Autor:  oliver ruiz cruz
hola, tengo el siguiente problema, estoy trabajando con reportes de crystal en vb.net para una aplicacion cliente servidor,mediante un procedimiento almacenado con parametros realizo mi consulta y visualizo perfectamente bien mi reporte en un crystalreportviwer mediante el siguiente codigo:

Private Sub FrmVisor_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Me.CrpParam.ReportSource = Nothing
Dim NUMERO_CONSECUTIVO As New ParameterDiscreteValue()
Dim FECHA_ALTA As New ParameterDiscreteValue()
NUMERO_CONSECUTIVO.Value = PARAMCONSECUTIVO
FECHA_ALTA.Value = PARAMFECHA_ALTA
Dim PARAMLIST As New ParameterFields()
Dim PARAMTEMP As ParameterField
PARAMTEMP = New ParameterField()
PARAMTEMP.ParameterFieldName = "@NUMERO_CONSECUTIVO"
PARAMTEMP.CurrentValues.Add(NUMERO_CONSECUTIVO)
PARAMLIST.Add(PARAMTEMP)
PARAMTEMP = New ParameterField()
PARAMTEMP.ParameterFieldName = "@FECHA_ALTA"
PARAMTEMP.CurrentValues.Add(FECHA_ALTA)
PARAMLIST.Add(PARAMTEMP)
CrpParam.ParameterFieldInfo = PARAMLIST
CrpParam.ReportSource = New Etiquetas()

End Sub

(CrpParam = Es el CrystalReportViwer)

lo que necesito es mandar a imprimir automaticamente al abrir el reporte.

por favor alguien que me ayude o que me diga donde puedo encontrar algo parecido ya que he buscado por todos lados, se lo agradecer mucho.

  Respuesta:  Javier Moyano
Hola con la funcion PrintToPrinter mandas a imprimir automaticamente.


reporte.PrintToPrinter(Cantidad, False, 0, Cantidad)

Saludos.