Set objconnPI = CreateObject("ADODB.Connection")
Set objrsPI = CreateObject("ADODB.Recordset")

strconnPI = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & App.Path & "\UsaMeteonorm.mdb"

objconnPI.open strconnPI
objrsPI.open "select * from pianoinclinato where id = '" & cont & "'", objconnPI

While Not objrsPI.EOF

azimuth = objrsPI("azimuth")
inclinazione = objrsPI("inclinazione")

objrsPI.movenext
Wend

objconnPI.Close
**************objrsPI.Close*********************

objrsPI = Nothing
objconnPI = Nothing


in questo frammento interrogo semplicemente una tabella da un DB.
quando chiudo il recordset (objrsPI) il messaggio di errore e' "operation not allowed when the object is closed".

I recordset si chiudono da soli? :master: