Conexão com SQLServer através do ASP

Uma das formas de conexão com banco de dados SQLServer se dá através do driver SQL Server nativo do servidor.

Neste exemplo a conexão é local, como ocorre com as aplicações Web. Como o servidor Web hospeda o banco de dados, podemos declarar o server com o IP de localhost (127.0.0.1).


<%
Dim con
Set con = CreateObject("ADODB.Connection")
con.Open "driver={SQL Server};server=127.0.0.1;" & "database=PROJETOS;uid=sa;pwd=password"
Response.write con
con.close
%>

Se a página ASP mostrar algum conteúdo sem erro, a conexão teve sucesso.