Hola!!
tengo un problema si me podeis ayudar, necesito recorrer unos registros con dataenvironmet y despues mostrarlos por datareport, el problema esta que si pongo el datareport.show despues del bucle me muestra el informe vacio, aqui mando el codigo por si me podeis ayudar:
Set rec12 = base.OpenRecordset("select proyectoid,descripcion from proyectos", dbOpenDynaset)
If rec12.RecordCount > 0 Then
rec12.MoveFirst
If DataEnvironment1.rsCommand1_Grouping.State = 1 Then DataEnvironment1.rsCommand1_Grouping.Open
Do Until rec12.EOF
j = rec12.Fields(1)
DataEnvironment1.Command1_Grouping j
DataEnvironment1.rsCommand1_Grouping.Fields (1)
DataEnvironment1.rsCommand1_Grouping.Close
rec12.MoveNext
If DataEnvironment1.rsCommand1_Grouping.State = 1 Then DataEnvironment1.rsCommand1_Grouping.Open
Loop
End If
DataReport1.Show 1
