none
reporte crystal report cargado de dos datagridview utilizando dataset tipado vb.net RRS feed

  • Pregunta

  • Agradeceria cualquier ayuda

    Como pudo realizar un solo reporte en crystaReport usando dos datagridview y un dataset tipado,  utilizo el siguiente codigo. Solo carga un solo datagrid

    Dim dt As New DataTable

            With dt

                .Columns.Add("Movimientos")

                .Columns.Add("Fecha")

                .Columns.Add("Kg_Entrado")

                .Columns.Add("Movimiento")

                .Columns.Add("Fechas")

                .Columns.Add("KG_Salido")

            End With

     

            For Each dr As DataGridViewRow In Me.DataGridView1.Rows

                dt.Rows.Add(dr.Cells("Movimientos").Value,

                dr.Cells("Fecha").Value,

                dr.Cells("Kg_Entrado").Value,

                dt.Rows.Add(dr.Cells("Movimiento").Value,

                dr.Cells("Fechas").Value,

                dr.Cells("KG_Salido").Value))

            Next

          

            Dim rptDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument

            rptDoc = New CrystalR

            rptDoc.SetDataSource(dt)

     

            frmImpresion3.CrystalReportViewer1.ReportSource = rptDoc

            frmImpresion3.ShowDialog()

            frmImpresion3.Dispose()

    Aqui solo cargo un datagrid?


    gracias

    miércoles, 2 de octubre de 2013 19:14

Todas las respuestas

  • BUENOS DIAS AMIGO...

    LOGRO RESOLVER EL PROBLEMA?????

    YO TENGO EL MISMO PROBLEMA Y NO HE DADO CON LA SOLUCION....

    domingo, 11 de enero de 2015 12:39
  • Hola:
    Comentarios (en MAYUSCULAS) acerca del codigo

    Dim dt As New  DataTable
    With dt
       .Columns.Add("Movimientos")
       .Columns.Add("Fecha")
       .Columns.Add("Kg_Entrado")
       .Columns.Add("Movimiento")
       .Columns.Add("Fechas")
       .Columns.Add("KG_Salido")
    End With
    'CREACION DE DATATBLE
    For Each dr As DataGridViewRow In Me.DataGridView1.Rows
        dt.Rows.Add(dr.Cells("Movimientos").Value,
        dr.Cells("Fecha").Value,
        dr.Cells("Kg_Entrado").Value,
        dt.Rows.Add(dr.Cells("Movimiento").Value,
        dr.Cells("Fechas").Value,
        dr.Cells("KG_Salido").Value))
    Next
    'CARGA DEL DATATABLE CON LOS VALORES DE DATAGRID, SE PUEDE CONSEGUIR CON LA SIGUIENTE LINEA
    Dim TU_DATATABLE As DataTable = CType(Me.DataGridView1.DataSource, DataTable)

    Dim rptDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
    rptDoc = New CrystalR
    rptDoc.SetDataSource(dt)
    'CARGA DEL DATATABLE EN EL REPORTDOCUMENT

    Conclusion:
    Estas cargando 1 datatable en el reportdocument, no estas cargando 2 datatables.

    ¿Puedes explicar que es lo que tienes (Estructuras de datos y consulta que efectuas) y que es lo que quieres conseguir (campos que van el el fichero RPT)?

    Un saludo desde Bilbo
    Carlos

    martes, 13 de enero de 2015 8:59