خاموش کردن ADODC برای اجرای دستور ADODB یا SQLqs

[ali3562]

من هر موقع خواستم یک دستور مثل زیر رو اجرا کنم همیشه ارور میده که کانکشن بازه و معلومه که هر وقت بعد از اجرای ADODC این ارور رو میده راه حل خاموش کردن ADODC چه جوریه

مثلا دستور زیر رو اگه بعد از اجرای ADODC اجرا کنم ارور میده


http://upload.iranblog.com/3/1244309198.jpg

Set DBase7 = OpenDatabase(App.Path & "\dbase\Soil.mdb", True, False)

DBase7.Execute "DELETE * FROM BHOLE WHERE Bhole ='" & Trim(Combo2.text) & "';"

DBase7.Close


:عصبانی++::عصبانی++::عصبانی++::� �صبانی++:

[polisoftco]

قبل از اجرای کد open database، وضعیت دیتابیس رو چک کن ببین دیتابیس بازه یا نه اگه باز بود (IF) ببندش وگرنه ادامه بده.


If Rs.State = 1 Then Rs.Close

[ali3562]

نه عزیزم
این برای خاموش کردن ADODB استفاده میشه نه ADODC
من مشکلم CLOSE کردن ADODC هست

[ali3562]

اصلا راه دیگه ای برای درست کردن یک TABLE تو دیتابیس وجود داره
از این
Set DBase7 = OpenDatabase(App.Path & "\dbase\Soil.mdb", True, False)

DBase7.Execute "DELETE * FROM BHOLE WHERE Bhole ='" & Trim(Combo2.text) & "';"

DBase7.Close

دستورها استفاده نکنیم

راه دیگه ای هم هست؟؟؟؟؟؟؟؟؟؟؟؟؟؟//

[reza_mn]

میبخشی دوست عزیز مگه این دستورات برای درست کردن تیبل تو دیتابیس هست ؟

[ali3562]

DBase5.Execute " CREATE TABLE BHOLE ( Bhole TEXT(50) , depth_k TEXT(50) , Hight_w TEXT(50))"


معذرت اشتباه COPY &PAST بود
دستور CREAT TABLE منظورم بود