Cómo conectarse a la base de datos de Access en VB
①Objetos de acceso a datos/Jet
②Programación para la API ODBC
③Uso de la biblioteca Visual Basic de SQL Server (VBSQL) para programar la programación API de la biblioteca DB
④Objetos de datos remotos RDO (objetos de datos remotos)
⑤Objetos de datos ADO (objetos de datos activos)
1. Objeto de acceso a datos/Jet
VB admite un subconjunto de objetos de acceso a datos (DAO). El enfoque DAO no es la mejor manera de gestionar las conversaciones cliente-servidor, pero tiene muchas ventajas. DAO/Jet fue desarrollado para permitir que VB acceda a bases de datos de Access a través de objetos de interfaz del programa. El proceso de uso de DAO para acceder a SQL Server es el siguiente: la aplicación prepara la declaración y la envía a Jet, el motor Jet (MASJT200.DLL) optimiza la consulta, carga el administrador de controladores y se comunica con él, el administrador de controladores (ODBC .DLL) pasa Llame a la función del controlador (SQLSRVR.DLL) para conectarse a la fuente de datos, traducir y enviar declaraciones SQL a SQL Server y devolver los resultados. A continuación se muestra un ejemplo de VB del uso de DAO para acceder a SQL Server.
Comentario: Declaración de formulario
Atenuar mydb como base de datos
Atenuar mydynaset como Dynaset オ
Private Sub Form_Load()
Establecer mydb = OpenDatabase("", False, False, "ODBC; DSN=Miservidor; WSID=LCL; DATABASE = ventas")
Establecer mydynaset = mydb CreateDynaset("Seleccionar*de clientes " ) オ
End Sub ァ
El ejemplo anterior abre la base de datos de ventas en modo no exclusivo ni de solo lectura y recupera todos los campos de la tabla Clientes. El último parámetro de la función OpenDatabase es el parámetro de cadena de conexión ODBC, que especifica el número de campos en Microsoft Access. Donde "DSN" es el nombre de la fuente de datos, "WSID" es el nombre de la estación de trabajo y "DATABASE" es el nombre de la base de datos a la que se accederá.
2. Programación utilizando API ODBC
La idea de ODBC (Open Database Connectivity) es acceder a bases de datos heterogéneas de forma portátil. Las funciones prácticas para hablar con recursos de datos se recopilan en un enlace dinámico llamado administrador de controladores (ODBC.DLL). La aplicación llama a una función en el administrador de controladores, que envía la función al servidor a través del controlador (SQLSRVR.DLL).
El siguiente código utiliza algunas de las funciones anteriores. Primero inicia sesión en la base de datos del servidor y establece el identificador de declaración para el trabajo posterior.
giHEnv global siempre
giHDB global siempre
giHStmt global siempre
Atenuar myResult como entero
Atenuar myConnection como Srting
Atenuar myBuff como cadena*256
Atenuar myBufflen como entero
Si SQLAllocEnv(giHEnv)lt;gt;SQL_SUCCESS Entonces
MsgBox" La asignación no pudo comentar: ¡Sucedió!"
Fin si
Si SQLAllocConnect(giHEnv, giHDB)lt;gt;SQL_SUCCESS Entonces
MsgBox "SQL Server no pudo Nota: ¡No se puede conectar!"
Finalizar si
myConnection="DSN=myServer;UID=LCL;PWD=;APP=ODBCTest;WSID =LCL; DATABASE=ventas"
myResult="SQLDriverConnection="SQLDriverConnect"
MsgBox "¡SQL Server no puede conectarse! SQLDriverConnect(giHDB, Test, form1.hWnd, myConnection.len(myConnection), myBuff, 256, myBufflen, SQL_DRIVER_COMPLETE_REQUIED)
Hunan""
myResult = SQLExecDirect(giHStmt, rsSQL, Len(rsSQL))
3.
3. Utilice VBSQL para programar la API de la biblioteca DB
La biblioteca DB es la API local de SQL Server y SQL Server La biblioteca de Visual Basic (VBSQL) proporciona una API para programadores de Visual Basic. En cierto sentido, VBSQL es la forma más directa y de mejor rendimiento de conectar un programa de Visual Basic a SQL Server.