¿Cómo puedo imprimir etiquetas directamente en Flexygo sin necesidad de ver la vista previa?

Publicado en torno a 3 años hace por Flexygo Team

Publicar un tema
Flexygo Team
Flexygo Team

Podéis usar SumatraPDF para realizar la impresión desde el servidor sin mostrar ninguna alerta al usuario, siempre y cuando el servidor tenga acceso por red a la impresora de etiquetas, el código sería algo así:

Public Shared Function PrintCrystal(ByVal Entity As EntityObject, ByRef Ret As ProcessHelper, aReportName As String) As Boolean

        Try

            Dim ReportDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
            ReportDoc = Entity.GetCrystalReportDocument(aReportName, "", FLEXYGO.Reporting.eReportModes.PDF, Nothing).ReportDoc

            Dim pdfPath As String = "c:\Temp\MyPdf.pdf"

            ReportDoc.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.PortableDocFormat, pdfPath)

            'Usar esta linea si la impresora no es la defecto del servidor
            'Process.Start("c:\SumatraPDF\SumatraPDF.exe -silent -exit-on-print -print-to <printer-name> " & pdfPath)
            'Más documentación en: https://www.sumatrapdfreader.org/docs/Command-line-arguments
            Process.Start("c:\SumatraPDF\SumatraPDF.exe","-silent -exit-on-print -print-to-default " & pdfPath)

            Ret.Success = True


        Catch ex As Exception

            Ret.Success = False
            Ret.LastException = Entity.LastException
            Return False

        End Try

    End Function


0 Votos


0 Comentarios

Iniciar sesión o Registrarse para publicar un comentario