<% set rs=server.CreateObject("adodb.recordset") rs.activeconnection=strconn set rsAux=server.CreateObject("adodb.recordset") rsAux.activeconnection=strconn idn=request("idn") lg=request("lg") checkIntegerInjection array(idn) template="shownews.asp?idn="&idn&"&" label_css="engenharia" imagem_conteudo=da_foto_topo_generico() if lg="pt" then lbl_recuar="Recuar" lbl_empresa="Empresa" lbl_assunto="Assunto" lbl_download="download do ficheiro incluido " reg_noticia="noticia" reg_titulo="titulo" reg_ficheiro="ficheiro" else lbl_recuar="Back" lbl_empresa="Company" lbl_assunto="Subject" lbl_download="download attached file" reg_noticia="ENG_noticia" reg_titulo="ENG_titulo" reg_ficheiro="ENG_ficheiro" end if set RSNotic=Server.CreateObject("ADODB.Recordset") RSNotic.ActiveConnection=strconn sql="SELECT * FROM SMG_Noticias WHERE idnoticias="&idn RSNotic.Open sql data1=convertedata(RSNotic("data")) hora1=hora(RSNotic("data")) data=data1&" "&hora1 assunto=server.HTMLEncode(RSNotic(reg_titulo)) empresa=server.HTMLEncode(RSNotic("empresa")) noticia=RSNotic(reg_noticia) imagem= RSNotic("imagem") ficheiro=RSNotic(reg_ficheiro) RSNotic.close titulo="Media Center" id=38 'Media Center %> <%=assunto%> - Media Center - Somague
Imagem Topo
<%=titulo%>
<% if trim(nome_empresa)<>"" then %> <%=lbl_empresa%>: <%=nome_empresa%> <% end if %>
<%=data%>


<%=lbl_assunto%>: <%=assunto%>

<% if imagem<>"" then %>
<% end if %>
<%=noticia%> <% if ficheiro&""<>"" then %>

<%=lbl_download%> <% end if %>
Seta Recuar  <%=lbl_recuar%>


<% set rs=nothing set rsAux=nothing %>