<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
revista = request.QueryString("revista")
if revista = "" then
sql = "SELECT * FROM adm_revista WHERE publicar = 1 ORDER BY str_to_date(data_cad,'%Y-%m-%d') DESC limit 1;"
else
sql = "SELECT * FROM adm_revista WHERE cod_revista="& revista &" and publicar = 1 ORDER BY str_to_date(data_cad,'%Y-%m-%d') DESC limit 1;"
end if
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.open sql, conn
cod_revista = RS("cod_revista")
data_cad = RS("data_cad")
ano = RS("ano")
periodo = RS("periodo")
numero = RS("numero")
titulo = RS("titulo")
resumo = RS("resumo")
arquivo = RS("arquivo")
editorial = RS("editorial")
Rs.close
Set RS = nothing
%>
Editorial- Revista OQ - Observatorio Quilombola
