Tareas

Conectar a una base de datos de SQL Server con VB6
Es curioso, pero de todos los ejemplos que tengo sobre acceso a bases de datos, (usando VB6 y anteriores), no tenía ninguno que usase una base dedatos de SQL Server, todos los ejemplos eran de bases de Access.
Pero más vale tarde que nunca, ¿verdad?
Pues aquí tienes un ejemplo para acceder a una base de datos de SQL Server, abrir una tabla y,para que el ejemplo no sea demasiado corto, mostraremos en un combo todos los campos (columnas) de dicha tabla.
Seguramente en otras ocasiones pondré ejemplos más completos que usen bases de datosde SQL Server, aunque, si te fijas, lo único que diferencia el uso de este tipo de bases de datos y las de Access es la forma de conectarse al "proveedor" de la base de datos.
Para este ejemplo,tendremos un formulario en el que colocaremos un botón llamado cmdAbrir y un ComboBox llamado cboCampos.
También necesitaremos una referencia a: Microsoft ActiveX Data Objects 2.0 Library o cualquierversión superior que tengas.
En la parte general de declaraciones tendremos definidas dos variables, una de un objeto Connection y otra de un objeto Recordset.
En el evento del botón cmdAbrir haremostodo el proceso de conectar a la base de datos, cargar el recordset con la tabla que queramos acceder y mostraremos los campos de dicha tabla en el combo.
Aquí tienes el código completo.
Nota:
Heresaltado en negrita y en rojo los sitios en los que deberías indicar tus propios datos, es decir, el Data Source (fuente de datos), la base de datos (Initial Catalog) y la tabla a abrir.

En esteejemplo, el Data Source usado en el ejemplo, es el que instala el SDK de .NET Framework. |



-------------------------------------------------'------------------------------------------------------------------------------
-------------------------------------------------
' Conectar a una base de datos de SQL Server (08/Sep/04)...