Visual Basic - Error al conectar con sql-server

Hola amigos. Tengo la siguiente situación: dos ordenadores conectados en red, en uno está instalado sql-server 2000 Personal Edition y en el otro hay una aplicación visual basic que quiere acceder a una base de datos en el primer equipo, de la siguiente forma:

cnn.Provider = "sqloledb"
cnn.Properties("Data Source").Value = "PC-RAFA"
cnn.Properties("Initial Catalog").Value = "NEKA"
cnn.Properties("user id").Value = "pepe"
cnn.Properties("Password") = txtContra
cnn.Open

PC-RAFA es el nombre del servidor registrado, y mi sistema operativo es windows 98. Ah también instalé las MDAC 2.7 (por probar), pero nada. El error que me da es:
[DBNETLIB][ConnectionOpen(connect())] SQL server dos not exist or acces denied

¿Puede ayudarme alguien?
Gracias anticipadas, un saludo.

Mejor prueba como el sitio propone....ojo tienes que buscar para SQL Server, pues tiene muchos ejemplos de conexión.

es mejor asi

Set Conn = New ADODB.Connection
Conn.CommandTimeout = 0
strDerechos = "DSN=OrigenDato; uid=" & NombreUsuario & ";pwd=" & Password & ";database=BDConeccion"
Conn.Open strDerechos
debes agregar eso si las referencias de ado a vb

chao y suerte

Para qué utilizar ODBC cuando ya cuentas con OLEDB para trabajar una conexión más eficiente?