<% Set conn = Server.CreateObject("ADODB.Connection") Conn.Open(Application("conexao")) set rs=Conn.execute("SELECT * FROM eventos") %> Boca Rica Capoeira
"><%enter(rs("imgprinc"))%>
<%=rs("clique")%>

<%enter(rs("texto1"))%>

<%enter(rs("texto2"))%>