none
Ejecutar reportes de Crystal 8 en VB2010 por medio de conexion UDL RRS feed

  • Pregunta

  • buen dia

    tengo la solucion para los que tienen la forma de programacion por medio de archivo UDL y que ya tienen reportes de crystal funcionando en VB 6.0

    me gustaria enviar el path del reporte en otra ubicacion si alguien puede aportar sera exelente

    1. agregar estas lineas al archivo app.config

      <startup useLegacyV2RuntimeActivationPolicy="true">
        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/>
      </startup>
    

    2. crear una forma con el objeto de crystalreportviewer

    3. desde la forma que se llamara el reporte agregar estas lineas al inicio

    Imports CrystalDecisions.CrystalReports.Engine
    Imports CrystalDecisions.Shared
    

    4. desde el boton que ejecutara el reporte agregar este codigo y listo

        Private Sub btnReporte_Click(sender As System.Object, e As System.EventArgs) Handles btnReporte.Click
    
            Dim ds As New DataSet
            Dim sql As String
    
            strSqlCnn.Open() 'cadena de conexion desde un modulo
            strSQLBuscar = "SELECT * " & _
                           "  From vst_hoja_responsabilidad " & _
                             " where emp_codigo = '" & lblCodigo.Text & "'"
    
            sql = strSQLBuscar
            Dim dscmd As New OleDb.OleDbDataAdapter(sql, strSqlCnn)
            dscmd.Fill(ds, "vst_hoja_responsabilidad")
            strSqlCnn.Close()
    
            Dim objRpt As New rpt_hoja_responsabilidad 'nombre del reporte fisico
            objRpt.SetDataSource(ds.Tables("vst_hoja_responsabilidad"))
            frmRPT.crvRPT.ReportSource = objRpt
            frmRPT.crvRPT.Refresh()
            frmRPT.ShowDialog()
    
        End Sub
    

    • Cambiado Youen Zen jueves, 2 de mayo de 2013 4:48 From en-US VB forum
    • Cambiado Enrique M. Montejo viernes, 17 de mayo de 2013 6:50 Consulta sobre Crystal Reports
    miércoles, 1 de mayo de 2013 22:29