Generar automáticamente una cadena de conexión OLEDB VB6
A veces necesitamos conectar con un servidor SQLServer, Oracle o similares a través de un asistente, para trabajar con Visual Basic 6 o similares hay una forma muy fácil de hacerlo (con Windows):
- Creamos un fichero de texto normal y corriente
- Renombramos su extensión a .udl (el nombre de fichero da igual)
- hacemos doble click sobre el fichero y nos saldrá un asistente como este:
-
- MUY IMPORTANTE Pinchar en la primera pestaña y cambiar o seleccionar el proveedor de datos
- Siempre es preferibel usar un proveedor de tipo OLEDB y NO un proveedor de tipo ODBC
- Si tenemos una base de datos Acess el proveedor es Jet 4.0 o superior, si tenemos SQL server o Oracle cogemos preferentemente el driver OLEDB para SQL server o Oracle.
- Si hay varios proveedores por ejemplo Microsoft Driver para Oracle y Oracle Driver para microsoft cogemos el del fabricante, no el de Microsoft.
- Insisto OLEBD es más rápido y eficente que ODBC que es un estandard más antiguo
- En el resto de las pestañas seleccionamos nuestro servidor y usuario y contraseña si es necesario
- Si es posible siempre usamos seguridad integrada Windows antes que usuario y contraseña.
- Una vez terminado pulsamos : Probar Conexión y luego Aceptar
- Volvemos a renombrar el fichero .udl a extensión .txt y lo abrimos con Notepad u otro editor de texto
- Veremos algo parecido a esto:
- [oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind;Data Source=ALDEAMEDIASQL
- Copiamos la última linea entera: esa es nuestra connectionString, ya podemos borrar el fichero UDL si queremos.
Espero que os sirva.