% cID = 0 if Request.QueryString("cid") <> "" then cID = Clng(Request.QueryString("cid")) end if if cID = 0 then response.redirect "index.asp" response.end end if bannerSecao = "" strConteudo = "select * from "& prefixo &"conteudo where id_conteudo = "& cID set objConteudo = objConexao.execute(strConteudo) if not objConteudo.EOF then titulo = objConteudo("titulo") criacao = objConteudo("data_criacao") bannerSecao = objConteudo("foto_banner") materia = objConteudo("materia") materia = Replace(materia,""",Chr(39)) if bannerSecao <> "" then bannerSecao = Replace(bannerSecao,"../","") bannerSecao = Replace(bannerSecao,"controlli/","") bannerSecao = "controlli/" & bannerSecao else bannerSecao = "imagens/secaogenerica.jpg" end if galeria = Cint(objConteudo("id_galeria")) aGaleria = "" if galeria > 0 then strGaleria = "select * from "& prefixo &"fotos where id_galeria = "& galeria &" and caminho_final like '%.%'" set objGaleria = objConexao.execute(strGaleria) if not objGaleria.EOF then aGaleria = "