<% SET ObjetoConexion = SERVER.CREATEOBJECT("ADODB.Connection")
ObjetoConexion.OPEN "driver={SQL server};uid=yo;pwd=estoy;database=BD_GRANDE;server=ESTE"
SQL = "SELECT * FROM T_LOGIN WHERE LOG_USER='"&REQUEST.Form("TXT_USER")&"' AND LOG_PASS='"&REQUEST.FORM("TXT_PASS")&"'"
SET db=ObjetoConexion.EXECUTE(SQL) %>