Conexión a SQL2000 con OLE

[Mulato]

Saludos tengo problemas para conectarme a través de OLEDB a una BD SQL2000, estoy usando esta conexión

<%'Abre la conexion con la base de datos a traves de una conexion ODBC
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "Provider=SqlOleDB;Data Source=hoyapp01; UID=usuario;PWD=clave;DATABASE=unica"

Lo que necesito es una conexión a través de OLE y no ADO agradeciendo su ayuda..!

Que debo cambiar para establecer una correcta conexión..?

Nuevamente gracias

[Vitorino]

¿No te vale esto verdad?

<%
Dim Conex
'Creamos el objeto de conexion ahora...
Set Conex = Server.CreateObject ("ADODB.Connection")
Conex.Open "driver={SQL Server};server=TU_SERVIDOR; database=NOMBRE_BASE; uid=sa;pwd="
%>

[Mulato]

Ya probe esta opción y me muestra esto:
T
ipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server does not exist or access denied.
/usuarios/directorio/ac.asp, line 13

La ruta la coloco asi : server=\servidor\servidordev;

y tengo permisologia

[bakanzipp]

La ruta la coloco asi : server=\servidor\servidordev; ??

ke ruta???

[Mulato]

la del servidor sql

[bakanzipp]

en el SERVER debes darle el nombre del servidor no la ruta

[CABEZOTA]

De todas formas la cadena con driver={SQL Server}; se conecta a través de ODBC, para utilizar OLEDB sería:

cnn.Open "Provider=SQLOLEDB; SERVER=nombreDePcServidor; UID=usuario;PWD=clave;DATABASE=basededatos; INITIAL CATALOG=basededatos"

Saludos

[Mulato]

Muchas Gracias Cabezota....

Por fin logre la conexión a través de OLE...

Tambien quiero agradecer a todos los que me ayudaron poco a poco logramos encontrar solución aqui les coloco el codigo definitivo....


Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "Provider=SQLOLEDB; SERVER=servidor; UID=usuario;PWD=clave;DATABASE=BD; INITIAL CATALOG=BD"

Uala....