Bodega

cias



ACCESO A BASE DE DATOS EN ACCESS

Posterior mente lo realizaremos en la base de datos en Access.
Abrimos un archivo en Microsoft Access.



Se selecciona la base de datos enblanco.

Se introduce el nombre de la base de datos en este caso será (tfonos.mdb.accdb) y dar clic en el botón crear.

Se crea una tabla en la vista de diseño.

Se introducen el nombretipo y las propiedades de cada uno de los campos de un registro.



CAMPO
TIPO
DESCRIPCIÓN
PROPIEDAD
REQUERIDO
INDEXADO
Nombre
Texto de 30 caracteres
Nombre y apellido
Si

DirecciónTexto de 30 caracteres
Dirección de la persona
Si

Teléfono
Texto de 12 caracteres
Número de teléfono
si
Si(sin duplicados)
Observaciones
Texto de 240 caracteres
Observaciones
noColocamos en Nombre de nuestra base de datos:
Dirección:

Teléfono:
Teléfono se define como clave principal.



Cerrar la ventana del diseño.
Asignar un nombre a la tabla en este caso será(teléfonos).
Se abre la tabla para introducir los datos.
COMENZAMOS A REALIZAR LA APLICACIÓN EN CONSOLA EN VISUAL BASIC.

Se realizara la conexión con el origen de datos (tfonos), base de datosAccess y utilizando un lector de muestra en una consola los datos nombre y teléfono de cada uno de los registro de la base.
Damos clic en crear nuevo Project.
En consola de aplicación.
CÓDIGOImports System
Imports System.Data
Imports System.Data.OleDb
Module BaseDeDatos
Public Class BaseDeDatos
Private conexiónConBD As OleDbConnection
Private orden AsOleDbCommand
Private Lector As OleDbDataReader

Public Sub LeerDeBaseDeDatos()
'Abrir la base de datos
Dim strConexion As String ="Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=C:\Users\yolis\Documents\tfonos.mdb.accdb"
conexiónConBD = New OleDbConnection(strConexion)
conexiónConBD.Open()

'Crear una consulta...