% Set Conexao = Server.CreateObject("ADODB.Connection") Conexao.Open "DBQ=e:\home\anticoncepcao\dados\anticoncepcao.mdb;Driver={Microsoft Access Driver (*.mdb)};" ComandoSQL = "SELECT * FROM novidades order by data desc" Set bd = Conexao.Execute(ComandoSQL) %>
|
|
||||||
|