Hola, tengo una consulta con imprimir un reporte
CODIGO
Private Dslista AsNew DataSet
Dim
rpt AsNew rptIngresos Dim Adaptador1 AsNew SqlDataAdapter("SELECT TipoDocumento.IdTipoDoc, Proveedor.Descripcion , Ingreso.Fecha, Ingreso.Monto ,unidad_medida.Descripcion , Marca.Descripcion , Producto.Descripcion FROm Ingreso INNER JOIN DetalleIngreso ON Ingreso.NroIngreso = DetalleIngreso.NroIngreso INNER JOIN producto ON DetalleIngreso.CodProducto = Producto.CodProducto INNER JOIN proveedor ON Ingreso.CodProveedor = Proveedor.CodProveedor INNER JOIN Unidad_medida ON Producto.CodUnidad = Unidad_medida.CodUnidad INNER JOIN marca ON Producto.CodMarca = Marca.CodMarca INNER JOIN TipoDocumento ON Ingreso.IdTipoDoc = TipoDocumento.IdTipoDoc WHERE Ingreso.Nroingreso = detalleingreso.Nroingreso", strcon) Adaptador1.Fill(Dslista)
rpt.SetDataSource(Dslista)
FrmReporteIngreso.CrystalReportViewer1.ReportSourc e = rpt
FrmReporteIngreso.Show()
FrmReporteIngreso.CrystalReportViewer1.Refresh()
La pregunta es cuando genero otro ingreso me graba correctamente, pero existe una dificultad, al generar una impresion arrasta del ingreso generado anteriormente