• Domingo 5 de Mayo de 2024, 18:59

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - cadenass

Páginas: [1]
1
VB .NET / dos datagrid y crystal reports.
« en: Lunes 16 de Mayo de 2011, 09:19 »
buenas,

Estoy haciendo un programa para controlar un taller de coches. El problema que tengo es para imprimir.

Tengo todo el formulario hecho, con varias cajas de texto y dos datagridview donde aparecen datos dinamicos.

Despues de probar y leer consegui enviar los datos al crystal reports, el problema es que me repite los datos de los datagridview.

h_ttp://img828.imageshack.us/img828/2244/ejemc.jpg
(quitar el guion bajo)

el codigo que utilizo es este. no soy experto en esto.

es visual 2010 y la ultima version de crystal reports.
Dim filas1 As Integer = DataGridView2.Rows.Count - 2
Dim filas2 As Integer = DataGridView3.Rows.Count - 2
Dim col1 As Integer = DataGridView2.Columns.Count - 2
Dim col2 As Integer = DataGridView3.Columns.Count - 2
Dim i1, i2 As Integer
Dim ds As New Dset1
For i1 = 0 To filas1
ds.Tables("db").Rows.Add()
For i2 = 0 To col1
ds.Tables("db").Rows(i1)(i2) = DataGridView2.Item(i2 + 1, i1).Value
Next
Next
For i1 = 0 To filas2
ds.Tables("db1").Rows.Add()
For i2 = 0 To col2
ds.Tables("db1").Rows(i1)(i2) = DataGridView3.Item(i2 + 1, i1).Value
Next
Next
Dim frm As New view_reporte
Dim rpt As New CrystalReport1
rpt.Load("CrystalReport1.rpt")
rpt.SetDataSource(ds)
frm.CrystalReportViewer1.ReportSource = rpt
frm.Show()

muchas gracias por la ayuda.

Páginas: [1]