devi crearti prima l'oggetto connection:
Codice:
Set dbConnection = Server.CreateObject("ADODB.Connection")
database = "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.Mappath("/mdb-database/dati.mdb")
dbConnection.Open database
set rs = server.createobject("ADODB.Recordset")
query = "select top 1 * from nomi where attiva='2' order by id desc"
rs.open query, dbConnection