Laboratorio 6 - Vb 2005

UNJBG ITEL CARRERA Técnico Analista Programador de Sistemas

¡¡LÍDER EN CAPACITACIÓN INFORMÁTICA!! Garantía del proceso Enseñanza-Aprendizaje con las últimas tecnologías, con computadoras de última generación, impresoras, escáner, multimedia, redes, Internet, material didáctico paso a paso, biblioteca y aula virtual con docentes del mas alto nivel.

CURSO Programación Visual .NET II

GUÍA DE LABORATORIO N° 06 OBJETIVOS:  

Creación de reportes con CrystalReport. Manejo del componente CrystalReportViewer

1. CREACIÓN DE LOS REPORTES UTILIZANDO CRYSTAL REPORT CONSIDERACIONES INICIALES: ¿ C r y s t a l R e p o r t s ? Es el generador de reporte por excelencia de Visual Basic desde versiones anteriores a .NET. Cristal es un producto creado en su esencia orientado al usuario final, es decir, que un ejecutivo pueda crear sus propios informes sin necesidad de asistencia de un desarrollador. El componente utilizado en la presente práctica para el manejo de los reportes de Crystal es el siguiente:  CrystalReportViewer: Este componente es la interfaz que utiliza la aplicación para desplegar los reportes, este componente se coloca sobre un Windows Forms o Web forms. Este esta localizado en la caja de herramientas en el ficha de Windows Forms (o Web Forms si es un proyecto web). 1.1. Agregue el elemento CrystalReport a su proyecto  Ir al menú Proyecto, luego seleccione agregar nuevo elemento  Luego nos visualizará una ventana [Agregar nuevo elemento], usted deberá seleccionar Crystal Reports  Luego escriba el nombre del reporte: rptRepClientes.rpt  Por último haga clic en el botón Agregar, luego éste reporte se habrá agregado al Explorador de soluciones.

Bimestre Acadêmico Ciclo

: 2009: V

(1 de 6)

Docente Fecha

: :

José Luis Ponce Segura. Tacna, Enero del 2009

Universidad Nacional Jorge Basadre Grohmann - ITEL Carrera: Técnico Analista Programador de Sistemas.



Curso: Programación Visual .Net II

Luego nos visualizará la siguiente ventana:====>

1.2. Galeria de Crystal Report:  

Marcamos la opción Usar Asistente de Informes. Luego en [Elegir un Asistente], Seleccionamos “Standard” damos clic en [Aceptar].



Luego se desplegará la ventana de Acceso a datos presentando diferentes fichas con diferentes tipos de fuentes de datos (OLEDB, ODBC, etc.). 



En ella deberá seleccionar el orígen de datos, para nuestro caso será OLEDB(ADO), y el Proveedor a elegir es Microsoft OLE DB Provider for SQL Server, luego deberá hacer clic en el botón siguiente, tal como se muestra en la figura siguiente: 



Luego en la siguiente ventana seleccione en Nombre de su [Servidor]: (local) e ingrese el Id de usuario: sa Luego seleccione la Base de Datos, ejemplo: Ventas20072 (El nombre de su Base de Datos), para luego hacer clic en [Siguiente] 



Damos clic en el botón [Finalizar]

Docente: José Luis Ponce Segura Cel. : 952636911

Prac06 (2 de 6)

e-mail: [email protected] www.redtacna.net

Universidad Nacional Jorge Basadre Grohmann - ITEL Carrera: Técnico Analista Programador de Sistemas.

Curso: Programación Visual .Net II

1.3. Seleccionando tablas para el reporte:  Seleccionaremos las tablas que utilizaremos para extraer la información que se presentará en el reporte, buscamos la tabla “Cliente”, damos clic sobre esta tabla y luego clic sobre el botón [>] y la tabla se desplegará en el cuadro de la derecha, esto nos indica que esta tabla estará incluida en nuestro reporte  Luego damos clic en [Siguiente].

1.4. Seleccionando los campos para nuestro reporte:  En el cuadro izquierdo están las tablas desde donde podemos seleccionar los campos y en el cuadro derecho los campos que ya seleccionamos.  Ahora haga clic en [>>]  Luego damos Clic en el botón [Finalizar].

1.5. Luego de diseñar el reporte este se presentara en el ambiente de diseño de reporte donde podemos mover los campos y modificar a nuestro antojo.

Docente: José Luis Ponce Segura Cel. : 952636911

Prac06 (3 de 6)

e-mail: [email protected] www.redtacna.net

Universidad Nacional Jorge Basadre Grohmann - ITEL Carrera: Técnico Analista Programador de Sistemas.

Curso: Programación Visual .Net II

2. CREACIÓN DEL FORMULARIO PARA REPORTE DE DATOS (FrmReporte.vb) 2.1. 2.2. 2.3.

Agregue un nuevo formulario a su proyecto y guárdelo con el nombre de frmReporte.vb Agregue 3 controles de tipo Panel, éstos nos servirán para organizar la información que contenga nuestra aplicación. Una vez agregado los 3 Paneles, proceda a establecer la propiedad Dock para cada uno de ellos los valores siguientes: Panel 1 Propiedad DOCK = Left

Docente: José Luis Ponce Segura Cel. : 952636911

Panel 2 Propiedad DOCK = Top

Prac06 (4 de 6)

Panel 3 Propiedad DOCK = Fill

e-mail: [email protected] www.redtacna.net

Universidad Nacional Jorge Basadre Grohmann - ITEL Carrera: Técnico Analista Programador de Sistemas.

2.4.

Curso: Programación Visual .Net II

Proceda a Establecer las propiedades a c/u de los objetos según el siguiente cuadro. Además deberá establecer otras propiedades para mejorar la apariencia de nuestro formulario. Objeto

Label1 RadioButton1 RadioButton2 RadioButton3 Button1 Button2 Button3 Button4 CrystalReportViewer1

Docente: José Luis Ponce Segura Cel. : 952636911

Propiedad Dock TextAlign Name Name Name Name Text Name Text Name Text Name Text DisplayGroupTree Dock ShowGroupTreeButton

Valor Asignado Fill MiddleCenter rbtEmpleados rbtClientes rbtArticulos btnEjecutar Ejecutar Reporte btnSeleccionar Seleccionar Reporte btnSelImpresora Seleccionar Impresora btnSalir Salir False Fill False

Prac06 (5 de 6)

e-mail: [email protected] www.redtacna.net

Universidad Nacional Jorge Basadre Grohmann - ITEL Carrera: Técnico Analista Programador de Sistemas.

2.5.

Curso: Programación Visual .Net II

Luego proceda a escribir el código correspondiente:

Private Sub btnSeleccionar_Click(ByVal sender As System.Object, .....) Handles btnSeleccionar.Click OpenFileDialog1.Filter = "Crystal Report|*.rpt" If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then CrystalReportViewer1.ReportSource = OpenFileDialog1.FileName Label1.Text = "Archivo de Reporte: " & CStr(OpenFileDialog1.FileName) End If End Sub Private Sub btnEjecutar_Click(ByVal sender As System.Object, .....) Handles btnEjecutar.Click If Me.rbtClientes.Checked = True Then Label1.Text = "Reporte de Clientes" Me.CrystalReportViewer1.ReportSource = "F:\jlponce\VBNET2\rptRepClientes.rpt" End If If Me.rbtEmpleados.Checked = True Then Label1.Text = "Reporte de Empleados" Me.CrystalReportViewer1.ReportSource = "F:\jlponce\VBNET2\rptRepEmpleados.rpt" End If If Me.rbtArticulos.Checked = True Then Label1.Text = "Reporte de Artículos" Me.CrystalReportViewer1.ReportSource = "F:\jlponce\VBNET2\rptRepArticulos.rpt" End If ‘ La ruta de los archivos *.rpt deberá ser reemplazada por la correcta, según cada alumno. End Sub

TAREA ENCARGADA:  

Deberá crear los reportes de Empleados y Artículo (rptRepEmpleados.rpt y rptRepArticulos.rpt respectivamente). Éstos deberían ser mejorados en su apariencia. Deberá implementar el botón “Seleccionar Tipo Impresora”, para que visualice la ventana de diálogo Propiedades de Impresora.

Docente: José Luis Ponce Segura Cel. : 952636911

Prac06 (6 de 6)

e-mail: [email protected] www.redtacna.net