% 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" newsql="select * from tab_news_cad order by new_cod asc" Set newrs=objconexao.execute(newsql) id = request("id") stringSQL="select * from tab_correspondente where cod="&id set registros = objconexao.execute(stringSQL) %>
"" style="border: none; height: 0px; width: 0px;" />