set rs.ActiveConnection = Nothing

forse questo???