CrystalReport VB.net VS2008

[rikakashi]

Saludos a todos!! tengo un problema con CrystalReports al momento de asignar el dataset a mi documento ya que todo parece bien pero al momento de compilar y ejecutar no se muestra la tabla. este es el codigo que utilizo.

Código:

Imports System.Data
Imports System.Data.SqlClient
Imports System.Text
Imports CrystalDecisions.CrystalReports.Engine
Public Class Consulta_CrystalReport
    Public WithEvents oRpt As ReportDocument
    Public Sub New()
        MyBase.New()
        'VARIABLES conexion
        Dim sCnn As String = "Data Source=SISTEMAS2-PC;Initial Catalog=Pruebas;Integrated Security=True"
        Dim da As New SqlDataAdapter("SELECT Consecutivo, IdPersona, TipoPersona, Grupo FROM CrystalReport", sCnn)
        Dim ds As New DataSet
        Try
            da.Fill(ds)
            Dim CrReport As New CrystalDecisions.CrystalReports.Engine.ReportDocument
            'Windows Form Designer requiere esta llamada.
            InitializeComponent()
            oRpt = New ReportDocument()
            oRpt.Load("C:\Users\Sistemas2\Desktop\Ricardo Copia\menuss\WindowsApplication1\CrystalReport1.rpt")
            oRpt.SetDataSource(ds)
            CrystalReportViewer1.ReportSource = oRpt
        Catch ex As Exception
            MsgBox("no jala Mostrando Reporte")
        End Try
    End Sub
End Class

Espero y puedan ayudarme

[Aquaventus]

Has verificado con los breakpoints si al momento de enlazar tu reportdocument con el dataset en el SetDataSource le lleva datos?

[rikakashi]

Iniciado por Aquaventus

Has verificado con los breakpoints si al momento de enlazar tu reportdocument con el dataset en el SetDataSource le lleva datos?

Asi es ya eh verificado el datataset en tiempo de ejecucion y este lleva con sigo la tabla que quiero ver en mi crystalreport

[Aquaventus]

Haber agregale al final de tu codigo dentro del Try :

Código vb:

CrystalReportViewer1.Refresh()
 

y me cuentas. Saludos!.

[rikakashi]

Iniciado por Aquaventus

Haber agregale al final de tu codigo dentro del Try :

Código vb:

CrystalReportViewer1.Refresh()
 

y me cuentas. Saludos!.

no aun nada

[Aquaventus]

en tu reporte, como has hecho la relacion y estructurado de los datos? tienen los mismo nombres(Consecutivo, IdPersona, TipoPersona, Grupo)?

[rikakashi]

Todos los campos tanto en el reporte como en el dataset son exactamente iguales a los nombres de los campos en la tabla.
este es el ejemplo que estoy tratando de hacer para despues adaptarlo a mi proyecto solo que en lugar de sentencias OleDB lo hago con sentencias Sql

http://vbcodigopocketpc.blogspot.com/2009_01_01_archive.html

[Aquaventus]

se me hace raro porque todo va bien a simple vista... y si haces todo eso en el Load en vez de hacerlo en el Sub New?

[rikakashi]

Aun sin mostrarme nada. Tendras algun ejemplo que si funcione? necesito tener esto lo mas pronto posible muchisimas gracias

[HaverRamirez]

Oye subelo, asi se pueden arreglar las cosas de una sola ves...

[rikakashi]

Aun no me funciona!!!!! :(

[HaverRamirez]

rikakashi
Seria mas facil si lo subieras...asi veo el comportamiento y te digo porque...

[rikakashi]

Iniciado por HaverRamirez

rikakashi
Seria mas facil si lo subieras...asi veo el comportamiento y te digo porque...

No se como subirlo

[HaverRamirez]

hasta ahi , ya no tengo palabras...

[Aquaventus]

Subelo nosé a megaupload o algun otro servidor de almacenamiento... y nos das el link del archivo.

[rikakashi]

Lo consegui. mi problema estaba en la asignacion del dataset al reporte y lo logre con este codigo.

Código vb:

Dim objRpt As New CrystalReport1
        objRpt.SetDataSource(ds.Tables(1))
        CrystalReportViewer1.ReportSource = objRpt
        CrystalReportViewer1.Refresh()
 

el lugar de cargar el archivo solo lo llame asignandolo a objRpt

Gracias por el apoyo.
Saludos

[Aquaventus]

Excelente!.