<%
strProv = "driver={SQL Server};server=201.76.55.15;uid=triesportes;pwd=jor2512;database=triesportes"
set midia=Server.CreateObject("ADODB.Connection")
midia.Open strProv
%>
<%
SQL = "SELECT top 1 * from NOTICIAS WHERE DESTAQUE = 01 order by data desc"
set rs3 = Server.CreateObject("ADODB.Recordset")
rs3.Open SQL, midia, 3, 3
%>
<%
strProv = "driver={SQL Server};server=201.76.55.15;uid=triesportes;pwd=jor2512;database=triesportes"
set midia=Server.CreateObject("ADODB.Connection")
midia.Open strProv
%>
<%
SQL = "SELECT top 1 * from NOTICIAS WHERE DESTAQUE = 01 order by data desc"
set rs3 = Server.CreateObject("ADODB.Recordset")
rs3.Open SQL, midia, 3, 3
%>