<%option explicit%> <% 'Abre conexão OLE-DB Dim conn, rs set conn = server.createobject("adodb.Connection") conn.open DSNString %> ABEn- Associação Brasileira de Enfermagem - Departamento ES

 


<% 'Selecionar notícia a ser exibida set rs = conn.execute(" Select * from Noticias where numNoticia="&cint(request("numNoticia"))) if not rs.eof then %>

<%=rs("titulo")%>

<%=replace(rs("texto"),vbcrlf,"
")%>


 
 
 
<% conn.close set conn = nothing %>