| Pregunta: | 3093 - COMO TRABAJA EL DATA REPORT |
| Autor: | Luis Martinez |
| Quisiera sbar todo lo referente a Datareport que viene con el visual basic 6, ya que quiero realizar diversos informes y no se como puedo hacer que el usuario seleccione exactamente los datos que deben ser listados. Gracias de antemano. | |
| Respuesta: | José María Pascual garcía |
| Bueno, para que funcione el DataReport antes tienes que crear un DataEnvironment, esto se hace haciendo clic en el Menu "PROYECT" y luego en "MORE ACTIVEX designers", una vez creado esto lo enlazas a la base de datos haciendo doble clic sobre "Dataenvironment" en la ventana proyecto te saldrá éste y Conection1, haces clic con el boton derecho del ratón sobre la conexión y en PROPIEDADES te encuentras con un tab, en la pestaña PROVIDER, haces clic sobre "Microsoft jet 3.51 ole DB Provider" y en la segunda pestaña, pones los datos de tu BD... luego de nuevo haces clic con el botón derecho sobre la conexión y selecciones ADD COMMAND, y cliqueas con el bt. derecho sobre este nuevo command y en propiedades te encuentras de nuevo con otro TAB, allí tienes: Command name: el nombre del Command. Connection: El nombre de la conexión. Database Objet: buscas en el combo TABLE. Objet Name: buscas la tabla que vas a enlazar... te aparecerán todos los campos de esa tabla... ¿Como usar esto? Bueno si lo que quieres es una consulta de toda la tabla con su correspondiente reporte, es facil, ya la tienes creada dandole el nombre de la tabla... creas tu pagina de reporte como se hacia antes con, por ejemplo VB4, y cuando quieras llamar a este reporte para ser visto por ventana: reporte.show (Reporte, el nombre que le hayas dado al reporte...) si quieres que aparezca con un filtro de por ejemplo, tal o cual cliente entonces lo que debes de hacer es que el programa cree una tabla temporal con los datos que desees y el reporte lo haces sobre esa tabla temporal... Por ejemplo: Select Case Consulta Case 1 Unload DataEnvironment1 dbs.Execute "DROP TABLE Cheques1;" dbs.Execute "SELECT CHEQUES.* | |