<%Call Topo()%>

<%Call ColunaESQ()%>

<%Call ColunaDIR()%>

<%Call copyright()%>

<%Call banco(cn) Set RsPac = server.CreateObject("ADODB.RecordSet") StrSQL = "SELECT * FROM tbPacotes WHERE pripgPacote = True ORDER BY codPacote DESC" RsPac.Open (StrSQL), Cn%>

<%=RsPac("nomePacote")%> " > <%=RsPac("chamaPacote")%> " class="l03">Saiba Mais...   Cotação Dólar e Euro QualityBrasil - 23/07/08 - 12h CONSEG Dólar (US$ 1) R$ 1,635 CONSEG Euro (E 1) R$ 2,575 Quality Dólar (US$ 1) R$ 1,65 Quality Euro (E 1) R$ 2,61 AVIS Dólar (US$ 1) R$ 1,70 IATA Dólar (US$ 1) R$ 1,5811 GS Dólar (US$ 1) R$ 1,64 GS Euro (E 1) R$ 2,60 Sun & Sea (Dólar US$ 1) R$ 1,72