Hola,

Estoy intentando imprimir un informe realizado con crystal reports 2008 directamente por una impresora pero no soy capaz. Lo máximo que he conseguido, es que me salga el cuadro de dialogo para elegir la impresora y que así se imprima pero necesito, que se imprima sin el cuadro de dialogo.

Antes, con el VB6 y crystal report 7 se hacía así:

with crystalreport
.ReportFileName = RutaReport
.Destination = crptToPrinter
.SelectionFormula = ""
.PrintReport
end with


Saludos y gracias.

Ya lo he conseguido.

Dim ImprimirReport As New CrystalDecisions.CrystalReports.Engine.ReportDocument

ImprimirReport.Load(InformeRpt)
ImprimirReport.RecordSelectionFormula = "" \'El where
ImprimirReport.PrintOptions.PrinterName = Impresora
ImprimirReport.PrintToPrinter(1, False, 1, 0)


Saludos.