ODBC32.DLL y la creacion de DSN por codigo.

[xabi]

Buenas!!
Tomando como base un tip de
softjaen(http://www.mvp-access.com/softjaen/vb6/api/odbc/sjtodbc002.htm)
sobre como configurar y crear DSN estoy intentando crear eso,un DSN para SQL
Server,pero estoy pagando el ser novato...en el tip hace referencia a una
libreria: la ODBC32.DLL,enl a cual esta implementada la funcion
SQLConfigDataSource pero no se como poder instalar ni que hacer con esa
libreria...si tengo que instalarmela como lo hago?Y de no ser asi como puedo
hacer que el tip haga lo que debe?
Alguien tiene experiencia en esto???

Muchisimas gracias!!!

[SoftJaén]

...en el tip hace referencia a una libreria: la ODBC32.DLL, en la cual
esta implementada la funcion SQLConfigDataSource pero no se como
poder instalar ni que hacer con esa libreria...si tengo que instalarmela
como lo hago?Y de no ser asi como puedo hacer que el tip haga lo
que debe?

Por norma general, los Componentes de Acceso a Datos de Microsoft (MDAC) se
encuentran instalados de manera predeterminada en los sistemas operativos
Windows XP, Windows 2000 y Windows Me, y también se incluyen en muchos
productos, como por ejemplo Microsoft SQL Server 2000. Por tanto, si tienes
instalado un sistema operativo de los mencionados, me imagino que también
tendrás instalada las bibliotecas necesarias para conectarte vía ODBC a SQL
Server, Access y otros archivos de bases de datos.

Para confirmar que tienes instalado el ODBC Driver Manager, dirígete a la
carpeta de sistema de Windows (System o System32, dependiendo del sistema
operativo que tengas instalado), y mira a ver si aparecen algunos archivos
cuyo nombre empiezan por ODBC, como por ejemplo, odbc32.dll. O más fácil
aún: abre el Administrador de orígenes de datos ODBC que se encuentra en el
Panel de Control --> Herramientas Administrativas.

Por último, te hago saber que la función API «SQLConfigDataSource» no se
encuentra en el archivo ODBC32.dll; se encuentra en la biblioteca
ODBCCP32.DLL, tal y como así se indica en la declaración de la función API.
:-)

[xabi]

Bueno he conseguido crearlo...PERO no veo en que parte del codigo puedo
añadir el usuario y la contraseña de SQL Server.
Podriais ayudarme?
muchisimas gracias!!!

Post by xabi
Buenas!!
Tomando como base un tip de
softjaen(http://www.mvp-access.com/softjaen/vb6/api/odbc/sjtodbc002.htm)
sobre como configurar y crear DSN estoy intentando crear eso,un DSN para SQL
Server,pero estoy pagando el ser novato...en el tip hace referencia a una
libreria: la ODBC32.DLL,enl a cual esta implementada la funcion
SQLConfigDataSource pero no se como poder instalar ni que hacer con esa
libreria...si tengo que instalarmela como lo hago?Y de no ser asi como puedo
hacer que el tip haga lo que debe?
Alguien tiene experiencia en esto???
Muchisimas gracias!!!

[SoftJaén]

Post by xabi
Bueno he conseguido crearlo...PERO no veo en que parte
del codigo puedo añadir el usuario y la contraseña de SQL Server.

El usuario y la contraseña la deberás de especificar en la cadena de
conexión, que necesariamente tendrás que definir para abrir la conexión
mediante el driver ODBC para SQL Server.

Si al crear el DSN has especificado que vas a utilizar la Seguridad
Integrada de Windows NT, no es necesario que especifiques el usuario y la
contraseña. Pero si has elegido utilizar la seguridad de SQL Server, en la
cadena de conexión deberás de especificar ambos parámetros:

Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection

With cnn
.Provider = "MSDASQL"

.ConnectionString = _
"DSN=Nombre_DSN;" & _
"User Id=cuenta_usuario;" & _
"Password=contraseña_usuario"

.Open

End With

[xabi]

jeje,acabo de buscar sobre el tema y he visto un post tuyo haciendo
referencia a lo mismo:no es necesario indicar el usuario ni la contraseña a
la hora de crear el DSN para SQL Server,ya lo indico en la cadena de
conexion.
La duda de la libreria era porque no sabia que tenia que incluir el
siguiente codigo para AÑADIR un DSN:

Private Declare Function SQLConfigDataSource Lib "ODBCCP32.DLL" _
(ByVal hwndParent As Long, ByVal fRequest As Long, _
ByVal lpszDriver As String, ByVal lpszAttributes As String) _
As Long

Private Const ODBC_ADD_SYS_DSN = 4

muchisimas gracias :)