avrei questo...


Set dbAss = OpenDatabase(App.Path & "\db\db1.mdb")

strSQL = "SELECT * FROM clienti WHERE disabilita = 'A' order by ragione_sociale, citta"

Set rsClienti = dbAss.OpenRecordset(strSQL)