dim Conn Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "UID=usuariobasedatos;pwd=clave;DRIVER={SQL Server};SERVER=localhost;DATABASE=basedatos;Trusted_Connection=yes"