none
Error en el codigo RRS feed

  • Pregunta

  • Cree el siguiente codigo, el ejecutable no se conecta en la maquina del cliente

    Imports CrystalDecisions.ReportSource
    Imports CrystalDecisions.Shared
    Imports CrystalDecisions.CrystalReports.Engine
    Imports CrystalDecisions.CrystalReports
    Imports CrystalDecisions.Windows
    Imports CrystalDecisions.Windows.Forms
    Public Class Form2

        Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim inventarios As New CrystalReport2
            inventarios.DataSourceConnections.Item(0).SetLogon("XY", "XYZABC")
            'inventarios.SetDatabaseLogon("XY", "XYZABC", "xxx.xxx.x.xx\YY", "MI Base") Esta linea la comente
            inventarios.SetParameterValue("@idsucursal", Me.txtidsucursal.Text)
            inventarios.PrintToPrinter(1, False, 0, 0)
            Me.Close()
        End Sub
    End Class

    gracias por la ayuda!!!

    lunes, 11 de agosto de 2014 19:23