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. |