Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

tres datagrid enviar a un data report

Estas en el tema de tres datagrid enviar a un data report en el foro de Visual Basic clásico en Foros del Web. tengo 3 datagrid, que los he generado por consultas a mi base de datos, pero quisiera poder enviar las consultas (que se pueden ver en ...
  #1 (permalink)  
Antiguo 28/07/2014, 13:05
 
Fecha de Ingreso: abril-2005
Ubicación: Piura - Perú
Mensajes: 189
Antigüedad: 19 años
Puntos: 0
tres datagrid enviar a un data report

tengo 3 datagrid, que los he generado por consultas a mi base de datos, pero quisiera poder enviar las consultas (que se pueden ver en el datagrid) a un data report, he buscado pero solo muestran ejemplos donde se envia una consulta a un data report, pero en este caso son 3 datagrid. alguna idea
  #2 (permalink)  
Antiguo 29/07/2014, 15:16
 
Fecha de Ingreso: enero-2008
Ubicación: Lima - Perú
Mensajes: 1.127
Antigüedad: 16 años, 3 meses
Puntos: 10
Respuesta: tres datagrid enviar a un data report

Muestra el codigo con el cargar el datagrid
__________________
123.http://bunker.host22.com
  #3 (permalink)  
Antiguo 29/07/2014, 19:30
 
Fecha de Ingreso: abril-2005
Ubicación: Piura - Perú
Mensajes: 189
Antigüedad: 19 años
Puntos: 0
Respuesta: tres datagrid enviar a un data report

cuando yo envio los datos a un datareport lo hago asi

primero desde el load() cargo el datagrid con la informaciòn de la DB

Código:
Set rs17 = New Recordset
rs17.Open "SELECT .....", cn, adOpenDynamic, adLockOptimistic
DataGrid1.AllowUpdate = False
DataGrid1.MarqueeStyle = dbgHighlightRow
Set DataGrid1.DataSource = rs17
ahora cuando quiero mostrar la informaciòn de ese datagrid en el datareport lo hago de la siguiente manera..

Código:
Set rs26 = New Recordset
rs26.Open "SELECT .......", cn, adOpenDynamic, adLockOptimistic
Set reporte_individual_resumen.DataSource = rs26
reporte_individual_resumen.Show
reporte_individual_resumen.Sections("Sección1").Controls.Item("Etiqueta8").Caption = DTPicker1.Value
reporte_individual_resumen.Sections("Sección1").Controls.Item("Etiqueta10").Caption = DTPicker2.Value
.....
Pero la duda esta en que yo tengo 3 consultas a la DB diferentes que quiero que se muestren en el datareport

yo solo veo que el datareport solo soporta 1 ".DataSource"

como puedo hacer para que pueda ver 3 consultas en el datareport.
  #4 (permalink)  
Antiguo 31/07/2014, 09:57
 
Fecha de Ingreso: enero-2008
Ubicación: Lima - Perú
Mensajes: 1.127
Antigüedad: 16 años, 3 meses
Puntos: 10
Respuesta: tres datagrid enviar a un data report

Supongo quieres mostrar informacion de tres tablas diferentes lo que tienes que hacer es crear una sola consulta sql utilizando INNER JOIN o JOIN dependiendo el motor de bd que utilizes y asi metes las 3 tablas en un solo recordset.

Ahora si ya cargaste el rs17 en el evento load ese mismo rs17 puedes enviarlo al datareport y no tienes necesidad de crear otro solo declara la variable rs17 al inicio del codigo y no dentro del sub.
__________________
123.http://bunker.host22.com

Etiquetas: data, datagrid, report, tres
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 13:57.