-
Cómo consultar una base de datos en Access 2007
-
La posibilidad de consultar las bases de datos distintas a la que está utilizando actualmente puede hacer que su solicitud de acceso más dinámico; se puede lograr esto utilizando Visual Basic para Aplicaciones (VBA). En VBA, puede utilizar el método "OpenDatabase" para definir la ruta y el nombre de la base de datos que desea consultar. Después de definir la base de datos, puede utilizar el objeto "registros" para mostrar los resultados de la consulta.Instrucciones
1 Lanzar Access 2007, haga clic en "Base de datos en blanco" y luego haga clic en el botón "Crear". Seleccionar "Herramientas de base de datos" y haga clic en "Visual Basic".
2 Crear un nuevo procedimiento escribiendo el siguiente código:
Private Sub QueryDataBase ()
3 Crear tres nuevas variables escribiendo el siguiente código VBA:
Dim primera medida de registros
DBS dévil como Base de Datos
Dim como secuencia sqlstr
4 Definir la base de datos que va a consultar ingresando el código siguiente:
Set dbs = OpenDatabase ( "C: \ Neptuno 2007.accdb")
5 Crear una cadena SQL escribiendo el siguiente código para crear una consulta:
Sqlstr = "SELECT órdenes. [Nombre] de la nave, órdenes. [Dirección] Buque"
Sqlstr = sqlstr & "de las órdenes de"
Sqlstr = sqlstr y "GROUP BY órdenes [Nombre del barco], órdenes [Buque de direcciones];.."
6 Copia y pega el código siguiente para abrir la consulta a través de un "conjunto de registros" y mostrar los resultados a la ventana Inmediato:
Establecer primera = dbs.OpenRecordset (sqlstr)
rst.MoveLast
rst.MoveFirst
Aunque no hacer rst.EOF
Debug.Print rst.Fields("Ship Name").Value
Debug.Print rst.Fields ( "Nave Dirección"). Valor
rst.MoveNext
Lazo
7 Para terminar el procedimiento escribiendo el siguiente código:
rst.Close
dbs.Close
End Sub