<%
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"
'Conex.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Password=12345678;Initial Catalog=OmniClient;Data Source=JOHAN\SQL2000"
'sConn 	= "Driver={SQL Server};SERVER=JOHAN\SQL2000; DATABASE=OmniClient;UID=sa;PWD=12345678"
'Conex.Open = sConn

sConn 	= "Driver={SQL Server};SERVER=OSC0008\SQL2000; DATABASE=OmniClient;UID=sa;PWD=12345678"
Conex.Open = sConn
%>