Programación General > Visual Basic 6.0 e inferiores
Reporte, Mandar Una Variable Al Command
(1/1)
MeLaT:
Hola !!
He hecho reportes pero con todos los registros de una tabla.
Ahora quiero un reporte de un sólo registro tomando en cuenta 2 tablas. Tengo un DataEnvironment con un command con el origen de datos con conexión sql:
--- Código: Text ---select *from T_COND, T_VEHwhere (T_COND.TVH_ZE=T_VEH.TVH_ZE) and T_COND.TVH_ZE = ZE
Debo mencionar que la sentencia SQL si esta bien, por que la probe como vista en la bd, obvio que cambie el ZE por un número existente. Pero bueno, regresando al DataReport, si utilizo like abre el reporte, pero no se ve el registro. (LIKE ' & ZE &') Si utilizo el igual me manda:
"El parámetro ZE no tiene un valor predeterminado."
Con lo cual creo que no reconoce la variable ZE, pero no se cómo enviarla del InputBox a la variable que tiene el command.
El reporte lo abro desde un menú, y ya tiene los RptTextBox con el campo y la variable ZE la pregunta un inputbox. Pero no se como mandarle el valor que introdujo en el inputbox, o tal vez ni siquiera es asi.
Alquien me podría decir que utilizo o en dónde pongo el código.
En el inputbox tengo esto:
--- Código: Text ---ZE = InputBox("Introduce la Zeta que desea ver en el reporte:", "Zeta")If IsNumeric(ZE) Then If ZE > 0 And ZE < 500 Then 'asi lo puse pensando que envia ZE ,pero no 'dtr_info.Show (ZE) dtr_info.Show Else Exit Sub End IfElse Exit SubEnd If
Cualquier comentario se agradece...
mamex:
Mira en un programa yo ocupo éste codigo para imprimir un reporte mandandole parametros:
--- Código: Text --- 'Si esta cerrada la conexión la abroIf DEnv1.CxnOrdClientes.State <> 1 Then _ DEnv1.CxnOrdClientes.Open'Mando a llamar al command, enviandole mi parametroDEnv1.cmdOrdCliente_Grouping miVariable 'Muestra el reporte drOrdCliente.Show 1 'Cierra la conexion DEnv1.CxnOrdClientes.Close
Navegación
Ir a la versión completa