یک error در هنگام rs.close

[vb_nima]

در هنگامی که برنامه را اجرا میکنم این Error داده میشه این error چی را میخواد بگه:



Operation is not allowed when the object is closed

اون قسمت کد هم اینه:
rs.close را انتخاب میکنه



CN.Open Connection_String
SQL_Query = "DELETE CDs_info WHERE CDname='" & CD_name & "'"
RS.Open SQL_Query, CN, adOpenKeyset, adLockOptimistic, adCmdText

RS.Close
CN.Close

[S_VB.max]

چون جایی که رکوردست داشته اشاره می کرده پاک شده و دیگه وجود نداره پس نیاز نیست که اونا دوباره ببندی
اگه بعد از اون ، دستور باز کردن دیگه ای بنویسی می بینی دیگه خطا نمی ده