% SET objconexao = Server.CreateObject("adodb.connection") objconexao.open "Provider = Microsoft.JET.oledb.4.0;data source="& server.mappath("dados/dados.mdb")& ";Jet OLEDB:Database Password=wsbalaminut" '---------------------------------------------------------------- relação de categorias de produtos noticiasinstitucionaissql="select * from tab_noticias where not_oculto = 0 order by not_codigo desc" set noticiasinstitucionais_rs=objconexao.execute(noticiasinstitucionaissql) %>