martes, 16 de junio de 2009

Práctica


1.- Crear un nuevo proyecto, en Proyecto/Componentes... seleccionar Microsoft ADO Data Control (OLEDB), pulsar Aceptar se añadirá un nuevo control a la barra de herramientas:

2.- Hacer dobleclick en ese control para que se añada al formulario, cambiarle la altura: 315 y añadir un TextBox, cambiar el tamaño, alto: 315, ancho: 2955.

3.- Crear un array del Text1 recién añadido: Seleccionar el Text1, pulsar el botón derecho y copiarlo; pulsar en cualquier lado del Form y Pegarlo, preguntará si se desea crear un array del control Text1?, responder que SI. Volver a pegar de nuevo y se creará un tercer Text1 y luego un cuarto Text1.

Ahora habrá tres controles Text1 con los índices desde 0 a 3

Configurar el ADO datacontrol:

4.- Seleccionar el datacontrol, en la ventana de propiedades pulsar en ConnectionString... mostrará un cuadro de diálogo:

En la ficha General, estará seleccionada la opción "Use Connection String", pulsa en el botón "Generar..."

Mostrará otro cuadro de diálogo, en la ficha "Proveedor", seleccionar Microsoft Jet 4.0 OLE DB Provider, pulsa en "Siguiente>>" y selecciona la base de datos que quieres usar, (Video Club MEGA.mdb); el resto de opciones dejarlos como están; pulsar en "Aceptar" dos veces para que se cierren los cuadros de diálogo.

Seleccionar la tabla a usar:

5.- Seleccionar la propiedad CursorType (Tipo de Cursor) y de la lista desplegable selecciona 2-adOpenDynaset.

6.- Seleccionar la propiedad RecordSource y pulsa en el botón, te mostrará un cuadro de diálogo: De la lista desplegable (Tipo de Comando), selecciona: 2-adCmdTable, la lista "Tabla o Nombre de procedimiento almacenado" se habrá habilitado, selecciona el nombre de la tabla que quieres usar, en este caso Actor y pulsa en Aceptar.

Para conectar cada Text1 con un campo de la base de datos:

7.- Pulsar en cualquier parte del formulario para quitar la selección actual.

8.- Seleccionar el Text1 con índice 0.

En la ventana de propiedades, selecciona DataSource y en la lista desplegable selecciona Adodc1.

9.- Selecciona DataField y de la lista desplegable, selecciona "id-actor"

10.- Hacer lo mismo con los otros dos Text1, pero para el de índice 1, selecciona "Nombre" y para el tercero: "Nacionalidad" y para el último: “Sexo”

Añadir y borrar registros de la tabla.

Para tener estas dos opciones, añade dos botones al formulario, al primero lo llamas cmdAdd y en el Caption escribe Añadir, al otro botón le cambias el nombre a cmdDel y en el Caption escribe: Eliminar.
Añade el siguiente código:

Private Sub cmdAdd_Click()
Adodc1.Recordset.AddNew
End Sub

Private Sub cmdDel_Click()
Adodc1.Recordset.Delete
End Sub








No hay comentarios:

Publicar un comentario