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

Es posible agrupar un Datareport sin Dataenvironment?

Estas en el tema de Es posible agrupar un Datareport sin Dataenvironment? en el foro de Visual Basic clásico en Foros del Web. Tengo un codigo y corre bien pero depende de un DataEnvironment ademas de utilizar las clausulas SHAPE y COMPUTE para agrupar la tabla productos por ...
  #1 (permalink)  
Antiguo 13/06/2010, 18:43
 
Fecha de Ingreso: junio-2008
Mensajes: 343
Antigüedad: 11 años
Puntos: 4
Es posible agrupar un Datareport sin Dataenvironment?

Tengo un codigo y corre bien pero depende de un DataEnvironment ademas de utilizar las clausulas SHAPE y COMPUTE para agrupar la tabla productos por categoria, es posible hacerlo sin el DataEnvironment?

Código:
Sub Productos_categoria()
Dim cnxListado As ADODB.Command 'Objeto de tipo comando.
Dim Entorno As dteEntornoDatos  'Nuestro entorno de datos.

Set Entorno = New dteEntornoDatos 'Iniciamos el entorno de datos.
Entorno.cnxListados.ConnectionString = cn.ConnectionString
        
Set cnxListado = Entorno.Commands("ComProducto_Grouping")
    
Con_sql = "SHAPE{SELECT P.CodProd, P.NomProd,P.PrecioVenta, P.CodCat, C.NomCat" & _
                 " FROM Categoria C, Producto P WHERE C.CodCat=P.CodCat" & _
                 "}AS ComProducto COMPUTE ComProducto BY 'CodCat','NomCat'"
  
cnxListado.CommandType = adCmdText
cnxListado.CommandText = Con_sql
    
Load drShape

Set drShape.DataSource = Entorno
drShape.Show 1

End Sub
Aqui esta la imagen del reporte que tengo el cual utiliza datenvironment.

Etiquetas: agrupar, datareport, posible
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 15:48.