NEO AMIGO ¿ME PUEDES ENVIAR EL EJEMPLO DE REPORTE?
Publicado por HELDER MARTINEZ (711 intervenciones) el 18/03/2008 16:23:50
HOLA NEO YA INTENTE DE LA FORMA QUE ME DICES TU LO HICE DE ESTA FORMA;
PUBLIC cNom_cliente, cFoto, cFoto_identidad
cNom_cliente=ALLTRIM(thisform.grdClientes.column2.text1.Value)
SELECT clientes
SELECT distinct Identidad, nom_cliente, fecha, sexo, ocup_prof_ofic, estado_civil,;
nom_conyuge, pais, cod_pais, nacionalidad, domicilio, departamento, cod_depto, municipio,;
cod_muni, telefono_casa, telefono_celular, trabaja_empresa, nom_empresa, telefono_trabajo,;
e_mail, foto, foto_identidad FROM clientes;
ORDER BY nom_cliente where clientes.nom_cliente=alltrim(cNom_cliente) INTO CURSOR _clientes
STORE ALLTRIM(_clientes.foto) TO cFoto
STORE ALLTRIM(_clientes.foto_identidad) TO cFoto_identidad
SELECT _clientes
thisform.Hide
REPORT FORM c:invent_system eports pt_clientes.frx PREVIEW
thisform.Show
Y ASIGNE EL NOMBRE DE LAS VARIABLES A CADA UNO DE LOS OBJETOS DE IMAGEN OLE EN EL REPORTE, PERO ME LANZA EL MISMO MSG.
CREES QUE ME PUEDES ENVIAR TU EJEMPLO, POR FAVOR AMIGO ME URGE.
TE LO AGRADECERE MUCHO....
SALUDES
HELDER
PUBLIC cNom_cliente, cFoto, cFoto_identidad
cNom_cliente=ALLTRIM(thisform.grdClientes.column2.text1.Value)
SELECT clientes
SELECT distinct Identidad, nom_cliente, fecha, sexo, ocup_prof_ofic, estado_civil,;
nom_conyuge, pais, cod_pais, nacionalidad, domicilio, departamento, cod_depto, municipio,;
cod_muni, telefono_casa, telefono_celular, trabaja_empresa, nom_empresa, telefono_trabajo,;
e_mail, foto, foto_identidad FROM clientes;
ORDER BY nom_cliente where clientes.nom_cliente=alltrim(cNom_cliente) INTO CURSOR _clientes
STORE ALLTRIM(_clientes.foto) TO cFoto
STORE ALLTRIM(_clientes.foto_identidad) TO cFoto_identidad
SELECT _clientes
thisform.Hide
REPORT FORM c:invent_system eports pt_clientes.frx PREVIEW
thisform.Show
Y ASIGNE EL NOMBRE DE LAS VARIABLES A CADA UNO DE LOS OBJETOS DE IMAGEN OLE EN EL REPORTE, PERO ME LANZA EL MISMO MSG.
CREES QUE ME PUEDES ENVIAR TU EJEMPLO, POR FAVOR AMIGO ME URGE.
TE LO AGRADECERE MUCHO....
SALUDES
HELDER
Valora esta pregunta
0