Podria ser asi..
con DNS Usando nombre de usuario/password
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.open "DSNname","username","pas sword"
%>
De hecho existen pequeñas variaciones, dependiendo POR (ODBC,ORACLE,MYSQL)
