Ho risolto.

il problema era un una funzione contenuta in una mia classe.

A questa funzione passavo l'oggetto OleDbConnection come parametro, ed invece di utilizzarlo così com'era ne creavo uno nuovo.

Prima:
codice:
Public Function Pippo(CN as OleDbCobnnection) as String
 Dim NewCN as New OleDBConnection(cn.connectionstring)
NewCn.Open()
'......
End Function
Ora:
codice:
Public Function Pippo(CN as OleDbCobnnection) as String
CN.Open()
'......
End Function