none
Dos DataTables en 1 CrystalReport RRS feed

  • Pregunta

  • Bien amigos, la forma en la que mando el Datatable al CrystalReport es la siguiente:

     Dim imprimir As New Reporte_Factura
            'le indicamos el datasource al report, que sera el recordset
            'que hemos llenado
            imprimir.SetDataSource(DSCLIENT.Tables("VENTA")) 'venta es mi Datatable

    Pero como hago si quiero 2 Datatables?... En mi crystalreport los anexe manualmente, pero no se como enviar 2 Datatable, hasta ahora solo se con 1 solo..


    Jhonatan Plata http://kayprogramacion.blogspot.com/

    domingo, 13 de mayo de 2012 13:18

Todas las respuestas

  • Bien ya encontré la Solucion, primero que todo al agregar los DataTables al CristalReport, toca buscar la Forma de conectarlos con Llaves Foraneas... Luego la Duda que tenia al enviar los Datatables al CrystalReports fue solucionada con este Codigo:

     

     Dim ds As New DataSet1

    ds.Tables("VENTA").Rows.Add(Text1.Text, Text2.Text, Text3.Text) 'agrego registro a mi datatable venta

    ds.Tables("CLIENTE").Rows.Add(Text4.Text, Text5.Text, Text6.Text) 'agrego registro a mi datatable cliente

    Dim objRpt As New CrystalReports1

    objRpt.Database.Tables("CLIENTE").SetDataSource(ds.Tables("CLIENTE")) objRpt.Database.Tables("VENTA").SetDataSource(ds.Tables("VENTA"))

    frmReporte.crvMiReporte.ReportSource = objRpt 'envio mi reporte al form donde tengo mi CrystalReportView
    frmReporte.Show()


    Jhonatan Plata http://kayprogramacion.blogspot.com/

    domingo, 13 de mayo de 2012 16:05