No se por que!
Publicado por Geronimo (41 intervenciones) el 02/03/2006 22:24:07
Utilizo este codigo para establecer una conexion y generar informes filtrados a gusto. Sin problemas.
Dim comando As ADODB.Command
Dim Entorno As listados
Screen.MousePointer = vbHourglass
Set Entorno = New listados
Entorno.conex.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51; Data Source= " + App.Path + "\base.mdb"
Set comando = Entorno.Commands(acmComando)
comando.CommandType = adCmdText
El tema es que utilice el mismo codigo y un MSChart y le puse
DataSource=listados
DataMember=acmComando
El informe generado sale bien, pero si quiero el informe grafico me pone todos los renglones de la consulta menos el primero, Si tiene que traer 10 registros, trae 9 (el primero no)
Alguien sabe por que sucede esto?
Dim comando As ADODB.Command
Dim Entorno As listados
Screen.MousePointer = vbHourglass
Set Entorno = New listados
Entorno.conex.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51; Data Source= " + App.Path + "\base.mdb"
Set comando = Entorno.Commands(acmComando)
comando.CommandType = adCmdText
El tema es que utilice el mismo codigo y un MSChart y le puse
DataSource=listados
DataMember=acmComando
El informe generado sale bien, pero si quiero el informe grafico me pone todos los renglones de la consulta menos el primero, Si tiene que traer 10 registros, trae 9 (el primero no)
Alguien sabe por que sucede esto?
Valora esta pregunta
0