-
Cómo actualizar conjuntos de registros DAO
-
Conocer la forma de actualizar los datos en tablas de bases de datos utilizando conjuntos de registros puede ahorrar tiempo cuando se necesita para actualizar dinámicamente un registro. Microsoft Office Access se utiliza comúnmente para crear bases de datos locales. Visual Basic para Aplicaciones (VBA) se utiliza para automatizar tareas rutinarias de acceso, tales como la actualización de un registro en una tabla. Una consulta se utiliza para recuperar información de una tabla de base de datos, a continuación, un conjunto de registros se utiliza para manipular datos de la tabla.
Instrucciones
1 Abra la base de datos Neptuno Microsoft Office Access. La base de datos Northwind se incluye en el paquete de Microsoft Office.
2 Haga clic en "Herramientas de base de datos", a continuación, seleccione "Visual Basic" para abrir la ventana de Visual Básico Microsoft. Haga clic en el "insertar" y seleccione "Módulo".
3 Escribe lo siguiente para crear un nuevo subprograma:
DAORecordsetUpdate sub ()
Tipo "Enter".
4 Escribe lo siguiente para crear las variables que va a utilizar para actualizar un registro:
Dim db As DAO.Database
Dim primera medida DAO.Recordset
5 Escribe lo siguiente para definir la base de datos actual:
Set db = CurrentDb
Escriba lo siguiente para consultar los "empleados" tabla:
Set rst = db.OpenRecordset("Select Employees.* From Employees;")
6 Escriba siguiente para mover el conjunto de registros al último registro y actualizar las "Notas" columna:
rst.MoveLast
rst.Edit
rst.Fields ( "Notas"). Value = "Este empleado ya no trabaja aquí."
7 Escribe lo siguiente para actualizar el conjunto de registros y luego cerrarla:
rst.Update
rst.Close
Pulse la tecla "F5" para ejecutar la subrutina.