<% Set Conexao = Server.CreateObject("ADODB.Connection") Conexao.Open "driver={SQL Server};server=JOSE;uid=facijr;pwd=fjr146;database=facijr" %>