<%
strSQL = "select * from Promocao where Jornal = 'Viamao' ORDER BY idPromocao desc"
set rsPromocao = Server.CreateObject("adodb.recordset")
rsPromocao.Open strSQL,conexao, 3
if not rsPromocao.eof then
idPromocao = rsPromocao("idPromocao")
strImgPromocao = "../img/promocao/"&rsPromocao("idPromocao")&"_promocao.jpg"
else
idPromocao = 0
strImgPromocao = "../img/promocao_aguarde.jpg"
end if
%>
Grupo CG - Diário de Viamão
