ELIZANDRO MARCELLINO EMILI

Bom dia a todos Tenho o seguinte problema, tenho um relatório que envio direto para a impressão via crystal reports , porem ele insiste em exibir uma tela de preview, que gostaria de retirar segue o código, lembrando que não uso Data source para popular o relatório, e tudo via código Dim report As New ReportDocument report.PrintOptions.PrinterName = "Argox OS-214 plus series PPLA" report.Load("../../CrystalReportEtiqueta.rpt", OpenReportMethod.OpenReportByDefault) report.SetParameterValue(0, FormPrincipal.TextBoxOperador.Text) report.SetParameterValue(1, FormPrincipal.TextBoxInspetores.Text) report.SetParameterValue(5, FormPrincipal.TextBoxLoteA.Text) report.SetParameterValue(3, FormPrincipal.TextBoxClienteA.Text) report.SetParameterValue(4, FormPrincipal.TextBoxProdutoA.Text) report.SetParameterValue(2, FormPrincipal.ComboBoxTurno.Text) report.SetParameterValue(6, FormPrincipal.TextBoxCodAltA.Text) report.SetParameterValue(7, FormPrincipal.TextBoxQuantEmbA.Text) report.SetParameterValue(8, Date.Now()) report.PrintToPrinter(1, False, 0, 0)

TENHO O SEGUINTE CODIGO E O MESMO TEM O PROBLEMA DE EXIBIR SEMPRE O PREVIEW , OBS , NÃO USO DATASOURCE alguém AJUDA Dim report As New ReportDocument report.PrintOptions.PrinterName = "Argox OS-214 plus series PPLA" report.Load("../../CrystalReportEtiqueta.rpt", OpenReportMethod.OpenReportByDefault) report.SetParameterValue(0, FormPrincipal.TextBoxOperador.Text) report.SetParameterValue(1, FormPrincipal.TextBoxInspetores.Text) report.SetParameterValue(5, FormPrincipal.TextBoxLoteA.Text) report.SetParameterValue(3, FormPrincipal.TextBoxClienteA.Text) report.SetParameterValue(4, FormPrincipal.TextBoxProdutoA.Text) report.SetParameterValue(2, FormPrincipal.ComboBoxTurno.Text) report.SetParameterValue(6, FormPrincipal.TextBoxCodAltA.Text) report.SetParameterValue(7, FormPrincipal.TextBoxQuantEmbA.Text) report.SetParameterValue(8, Date.Now()) report.PrintToPrinter(1, False, 0, 0)