Nell'evento Unload del tuo form principale verifica se i recordset esistono, sono aperti, e li chiudi.codice:adoMio.CommandTimeout = 600
Il codice sotto fa il lavoro sulla connessione, fai prima lo stesso coi recordset
Ciaocodice:if not adoMio is nothing then if adoMio.State = 1 then adoMio.Close endif Set adoMio = Nothing end if