<% 'Conexão banco MSSQL Set db_conn = Server.CreateObject("ADODB.Connection") str_conn = "Provider=SQLOLEDB;Server=mssql.seudominio.com.br,1039;User ID=base;Password=xxx;Database=base;" db_conn.connectionstring = str_conn db_conn.Open %>
Não esqueça de trocar o hostname, mssql.seudominio.com.br, substituindo seudominio.com.br pelo seu domínio.