تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تعديل على المثال التالي للاتصال بقاعدة بيانات 2016
#1
السلام عليكم ورحمة الله وبركاته

اريد التعديل على المثال المرفق لربط البرنامج باكسس 2016

وشكرا

كود :
Public DB       As New ADODB.Connection
Public RSFILE       As New ADODB.Recordset
Public Sub Connect_DB()
If DB.State = adStateOpen Then _
   DB.Close
   
   DB.CursorLocation = adUseClient

   DB.Provider = "Microsoft.ACE.OLEDB.16.0;"
   DB.Open App.Path & "\Data.accdb"

End Sub


الملفات المرفقة
.rar   New folder (7).rar (الحجم : 17.4 ك ب / التحميلات : 28)
الرد }}}
تم الشكر بواسطة:
#2
اتوقع هو نفس 2010
Microsoft.ACE.OLEDB.12.0
الرد }}}
تم الشكر بواسطة: sendbad100 , sendbad100
#3
(22-12-17, 04:20 PM)eiocm كتب : اتوقع هو نفس 2010
Microsoft.ACE.OLEDB.12.0

جربت وطلعتلي الرسالة

الرد }}}
تم الشكر بواسطة:
#4
كود :
Public DB       As New ADODB.Connection
Public RSFILE       As New ADODB.Recordset
Public Sub Connect_DB()
If DB.State = adStateOpen Then _
   DB.Close
   
   DB.CursorLocation = adUseClient

   DB.Provider = "Microsoft.ACE.OLEDB.12.0;"
   DB.Open App.Path & "\Data.accdb"

End Sub
الرد }}}
تم الشكر بواسطة: عبد العزيز البسكري
#5
(22-12-17, 10:40 PM)sendbad100 كتب :
كود :
Public DB       As New ADODB.Connection
Public RSFILE       As New ADODB.Recordset
Public Sub Connect_DB()
If DB.State = adStateOpen Then _
   DB.Close
   
   DB.CursorLocation = adUseClient

   DB.Provider = "Microsoft.ACE.OLEDB.12.0;"
   DB.Open App.Path & "\Data.accdb"

End Sub
جزاك الله كل خير
الرد }}}
تم الشكر بواسطة: sendbad100
#6
تسلم اخونا وجزاك الله خير على مجهودك
اعز معلمين :
1) Ahmed _Mansoor
2) sniper.ps 
3) myalsailamy
4) ahmedabdelaliem 
5) sendbad100
6)Amir_alzubidy

الرد }}}
تم الشكر بواسطة:
#7
كيف الحل وماذا فعلت يشتغل عندك المثال
انا تطلع عندي مشكلة ويظهر مكتبة لاختار منها ولكن وماذا اختار
اعز معلمين :
1) Ahmed _Mansoor
2) sniper.ps 
3) myalsailamy
4) ahmedabdelaliem 
5) sendbad100
6)Amir_alzubidy

الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل بيانات عمود DataGridView دفعة واحدة مصمم هاوي 0 73 05-03-24, 02:40 PM
آخر رد: مصمم هاوي
  [vb6.0] طريقة تصدير بيانات الداتا ريبورت datareport لصيغة pdf hamada salah90 6 1,479 19-01-24, 07:59 PM
آخر رد: hamada salah90
  [vb6.0] كيف يمكن إخفاء عمود رقم الصنف و إظهاره برمجياً نامل المساعدة في المثال التالي ؟ Microformt 2 387 19-11-23, 10:49 PM
آخر رد: Microformt
  اريد طريقة تصدير بيانات الاكتف ريبورت لملف اكسل scsi7000 0 299 03-11-23, 10:41 AM
آخر رد: scsi7000
  اختصار الكود حسب المثال المرفق abde6726 2 282 29-10-23, 11:00 AM
آخر رد: abde6726
  اختصار الكود حسب المثال المرفق abde6726 0 220 28-10-23, 05:01 PM
آخر رد: abde6726
Question [vb6.0] نامل المساعدة في المثال المرفق يوجد مشكلة في إضافة رقم الصنف الى قاعدة البيانات لا اع Microformt 1 241 23-10-23, 12:11 AM
آخر رد: Taha Okla
  نقل بيانات الجدول الى جدول اخر بعد تجميع البيانات haithamelareny 1 359 10-08-23, 11:54 PM
آخر رد: ahmedabdelaliem
Question [vb6.0] هل يوجد كود لضغط وإصلاح قاعدة البيانات ، أعني قاعدة بيانات Access؟ Microformt 1 455 27-07-23, 08:33 PM
آخر رد: Taha Okla
  [vb6.0] كود ربط قاعدة بيانات اكسيس 2010 بالفيجوال بيسك6 وادي العوضي 4 553 21-07-23, 12:11 AM
آخر رد: وادي العوضي

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


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