<%
Dim Conex
'Creamos el objeto de conexion ahora...
Set Conex = Server.CreateObject ("ADODB.Connection")
'Conex.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=GranjaVilla;Password=12345678;Initial Catalog=OmniClient;Data Source=10.10.10.10"
Conex.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Password=12345678;Initial Catalog=OmniClient;Data Source=OSC0008\SQL2000"
%>