codice:
If rs_pippo.State = adStateOpen Then
rs_pippo.Close
End If