sistema de reportes

[zxs23]

1.- Especifica que procedimientos utilizas, cierras y vacias el recordset, quizas lo dejas en visible=false y por eso no lo puedes ver.

2.-Lo mejor que puedes hacer dejar de utilizar el dataEnvironment por que no se puede lo que quieres, hazlo todo desde codigo, algo asi, recuerda que se puede hacer lo mismo q el dataenvironmente pero con codigo y asi tener la posibilidad de utilizar .ini para la ruta.

Código:

Dim sRep As New Recordset
Dim Con_sql As String
Dim iFormato As New StdDataFormat

Screen.MousePointer = vbHourglass
iFormato.Format = "Fixed"

Con_sql = "SELECT*FROM tabla"

    Set sRep = New Recordset
    sRep.Open Con_sql, variable_cadena_conexion
    Set Datareport1.DataSource = sRep
    Load Datareport1
Screen.MousePointer = vbDefault
    
With Datareport1
    .Sections("ReportHeader").Controls("EtiqDesde").Caption = "Fecha: " & dtpDesde & " - " & dtpHasta
    .Sections("ReportHeader").Controls("etqBase").Caption = "Reporte # 12"
    
    Set .Sections("NIVEL2").Controls("txtTotal").DataFormat = iFormato
    Set .Sections("ComCliente_venta_Grouping_Footer").Controls("Función1").DataFormat = iFormato
    .Show 1
End With