تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] طلب : أريد كود قطع الإتصال بقاعدة البيانات
#1
اريد قطع الإتصالات الآتية بواسطة الكود وذلك عندما كتبت كود هكذا

dim rs as recordset
dim db as database


Dim db9 As New ADODB.Connection
dim rss as new ADODB.Recordset

في منطقة general

.وفي الفورم لوود

Set db = OpenDatabase("data.mdb")

Set rs = db.OpenRecordset("Safe")

db9.Provider = "Microsoft.JET.OLEDB.4.0;"
db9.Open App.Path & "\data.mdb"
rss.Open "[Orders]", db9, adOpenStatic, adLockReadOnly
 

"" بارك الله لكل من استفاد و أفاد بعلمه ""
hamada salah
الرد }}}}
تم الشكر بواسطة:
#2
اذا كنت تقصد قطع الاتصال بالقاعدة فيكون
db.close
اذا الاتصال بالجدول للانتقال لجدول اخر
rs.close
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , hamada salah90
#3
(17-09-15, 02:43 AM)أبو عمر كتب : اذا كنت تقصد قطع الاتصال بالقاعدة فيكون
db.close
اذا الاتصال بالجدول للانتقال لجدول اخر
rs.close

شكرا يا غالي
 

"" بارك الله لكل من استفاد و أفاد بعلمه ""
hamada salah
الرد }}}}
تم الشكر بواسطة:
#4
مثلما جاوبك سابقا ابو عمر
اذا كنت معرف قاعدة البيانات على اسمها DB
فكود قطع الاتصال يكون db.close
ياألله
.:. سبحانك اللهم لاعلم لنا الا ماعلمتنا .:.
إقتباس :Istanbul
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] تعديل كود تحديث البيانات ZaerAllail 0 39 10-01-18, 05:24 AM
آخر رد: ZaerAllail
  [vb6.0] أريد أفضل برنامج SQL Server يعمل مع الفيجول بيسك وطريقة ربطه بالبرنامج VB.6 Rami_Mezo 4 167 06-11-17, 03:00 PM
آخر رد: Rami_Mezo
  [سؤال] طلب كود للبحث عن اسم في قاعدة البيانات كلها وكود نقل سجل sher 7 232 18-10-17, 04:02 AM
آخر رد: عبد العزيز البسكري
  [سؤال] سؤال عن ربط قاعدة البيانات اكسس amer2000 4 354 14-05-17, 01:08 PM
آخر رد: Amir_alzubidy
  ادوات التنقل في قاعدة اجدول البيانات بواسطة List view haniblack 4 266 13-04-17, 09:57 AM
آخر رد: haniblack
  [vb6.0] طلب مساعدة - أريد كود البحث السريع وعمل ملف تثبيت لبرنامجي المرفق Soufyane 1 231 10-04-17, 01:45 PM
آخر رد: Amir_alzubidy
  كيف اربط قاعدة البيانات ل سكول سرفير ahmed_egypt 8 908 05-04-17, 04:39 PM
آخر رد: ahmed_egypt
Lightbulb [vb6.0] طلب : أريد مجموعة من الأكواد تخص فتح open لفتح مجلد - فتح برنامج - فتح ملف بأي صيغة hamada salah90 6 1,252 29-03-17, 01:44 PM
آخر رد: MicroDoha
  [سؤال] اصلاح قاعدة البيانات من نوع اكسس amer2000 4 753 15-12-16, 12:49 PM
آخر رد: Amir_alzubidy
  [سؤال] سؤال حول البحث. المتكرر في قاعدة البيانات وفرزها في التكستات عمور2016 10 1,073 10-12-16, 03:02 PM
آخر رد: عبد العزيز البسكري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم