Programación General > Visual Basic 6.0 e inferiores

 Ayuda Datareport

(1/1)

Informatico:
:hola: ,tengo el siguiente problema tengo q mostrar las notas de los alumnos por cada uno utilizando el datareport, para ello mando el siguiente codigo:

--- Citar ---On Error GoTo errVer
sqlNotas = "select codigo,curso,primB from NotasLibreta where"
sqlNotas = sqlNotas & " nivel='" & vnivel & "'and grado='" & vgrado & "' and seccion='" & vseccion & "'"
sqlNotas = sqlNotas & " GROUP BY codigo,curso,primB"

Set rsVerLibreta = New ADODB.Recordset
rsVerLibreta.Open sqlNotas, cnx, adOpenDynamic, adLockOptimistic

Set DataGrid1.DataSource = rsVerLibreta
'---------------------------------------------------------------
ReporteLibretas.Sections("Sección2").Controls("Etiqueta9").Caption = cboNivel.Text
ReporteLibretas.Sections("Sección2").Controls("Etiqueta5").Caption = cbogrado.Text
ReporteLibretas.Sections("Sección2").Controls("Etiqueta7").Caption = cboSeccion.Text
'--------------------------------------------------------------
Set ReporteLibretas.DataSource = rsVerLibreta
ReporteLibretas.Show
--- Fin de la cita ---

ahora bien la senencia sql muestra los datos agrupados por alumno, hasta ahi todo perfecto pero al momento de mandarlos al datareport no los muestra por alumno sino entrega todos los resultados, es decir lo que DEBERIA mostrar es los siguiente:


--- Citar ---codigo:-.............
alumno:............
grado: ............
seccion: ........

curso              not1         not2
nombrecurso1   12           
nombrecurso2   12           
nombrecurso3   12           
nombrecurso4   12           

--- Fin de la cita ---

quisiera me brinden su ayuda. :comp:

davidsupervb6:
para eso tendrias q usar el DataEnviroment comunicate conmigo a
davidsryl@hotmail.com

Navegación

[0] Índice de Mensajes