%
sqlDocuments1="select * from Documents where id_idioma=" & session("lang" & prj)& " and DocumentID=2"
set rsDocuments1=server.CreateObject("ADODB.Recordset")
rsDocuments1.Open sqlDocuments1,con,1,2
if not rsDocuments1.EOF then
strContents=rsDocuments1("content")
title=rsDocuments1("ptitle")
description=rsDocuments1("pdescription")
keywords=rsDocuments1("pkeywords")
end if
%>
<%=strContents%>
<%function menu_sitemap(pid)
sql_site="select id, name from unlimit_pages where id_idioma=" & session("lang" & prj)& " and activo=1 and pid = " & pid
set rs_site=server.CreateObject("ADODB.Recordset")
rs_site.Open sql_site,con,1,2
'if not rs_site.EOF then%>