تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيفة ربط قاعدة البيانات بالمشروع
#1
السلام عليكم ورحمة الله

الكود صح مائة  بالمائة بس عندما اكتب مثل rs.recordset او rs.addnaw المفروض بمجرد انى اكتب ( . )  تظهر لى الاختيارت وانا  اختر منها المشكلة ان مبتظهرش الاختيارت دى

وايضا من ضمن المشاكل انى صممت قاعدة البيانات ب access  وكتبت كود الربط بينها وبين المشروع ومع ذلك لما بفتح المشروع مبيفتحش القاعدة  ياترى السبب اية

هل من افادة مشكوين
الرد
تم الشكر بواسطة:
#2
السلام عليكم
ارفق المشروع ,ليتم التعديل عليه
 Exclamation (سبحان الله العظيم سبحان الله وبحمده) Exclamation
الرد
تم الشكر بواسطة:
#3
اختي الكريمة يجب عليك اضافة مكتبة الادو
وذلك من نافذة project ثم Reference
Microsoft Active X Data Object 2.6 او فما فوق
و العلم لله
الرد
تم الشكر بواسطة: ghada abd elnabe
#4
اشكركم جدا جزاكم الله كل خير

في الحقيقة ان بالفعل حاولت انى ارفع المشروع ليتم التعديل علية بس معرفتش
الرد
تم الشكر بواسطة:
#5
(05-03-15, 11:56 PM)larbihamri كتب : اختي الكريمة يجب عليك اضافة مكتبة الادو
وذلك من نافذة project ثم  Reference
Microsoft Active X Data Object 2.6 او فما فوق
و العلم لله

اخى الكريم جزاك الله كل خير وبعد
انا فعلا ربط القاعدة بالمشروع عن طريق Microsoft DAO 3.6 Object Library
اما بالنسبة لكود الربط كتبت set rsdb = opendatabase("pharmace.mdb
set ghtb = rsdb.Recordset("المصروفات ")
ومع ذلك مبيفتحش القاعدة اعمل اية
ارجو الرد من فضلكم
الرد
تم الشكر بواسطة:
#6
حاولي ان تقومي بالخطوات كما قلت لك
عن طريق مكتبة الادو اما عن طريق Microsoft DAO 3.6 Object Library و الله ما اعرف الطريقة
و الكود كالتالي

Private Sub Form_Load()
With cn
.Provider = "microsoft.jet.oledb.4.0"
.CursorLocation = adUseClient
.Open App.Path & "\pharmace.mdb"
End With
sql = "select*from x"
x هنا تمثـــل الجــــــدول الــــذي تريديـــــن فتحـــــــــــــــه

If rs.State = adStateOpen Then
rs.Close
End If
rs.Open sql, cn, adOpenStatic, adLockOptimistic
End Sub
و الله اعلم
الرد
تم الشكر بواسطة: ghada abd elnabe


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في تكرار البيانات عند الطباعة DATAREPORT دهشوش1 3 80 منذ 8 ساعة مضت
آخر رد: Ahmed_Mansoor
  [vb6.0] كيفية الاتصال بقاعدة البيانات علي شبكة دون طلب اسم الجهاز وكلمة المرور kamalgadir 0 41 05-12-18, 05:58 PM
آخر رد: kamalgadir
  طباعة قيم مربعات نص غير مربوطة بقاعدة البيانات دهشوش1 4 82 30-11-18, 11:02 PM
آخر رد: دهشوش1
  [vb6.0] حل مشكلة حفظ الصورة في ملف وليس على قاعدة البياناتDataBase عبدالقادرعواد 3 207 26-11-18, 01:42 AM
آخر رد: عماد السيد
  [مثال] مثال متكامل للتعامل مع قاعدة بيانات من نوع mysql على الانترنت ahmedabdelaliem 14 3,393 26-11-18, 01:26 AM
آخر رد: عماد السيد
Question [vb6.0] كيف يتم إضهار الترقيم تلقائي المجود في قاعدة البيانات عند النقر على امر جديد ؟ Microformt 8 511 20-10-18, 09:54 PM
آخر رد: gonm64
  كيفية نسخ قاعدة بيانات جديدة وباسم في هذا المثال khezzani 5 145 15-10-18, 10:55 PM
آخر رد: سعداء
  مشكلة عندي مشكلة في فتح قاعدة بيانات اكسس 2000 بيتم التعامل مع اكسس 97 fathyfarag122 3 104 03-10-18, 02:54 AM
آخر رد: عبدالله الصافي
  احبابى فى الله ارجو المساعدة تغير ربط قاعدة البينات من (.accdb) الى mbp mhareek 6 197 14-09-18, 11:18 PM
آخر رد: mhareek
  [vb6.0] خاصية تعتمد علي Artificial intelligence عند كتابة في قاعدة بيانات اكسيس من خلال VB6 mohamed arafa 5 223 13-09-18, 03:47 AM
آخر رد: mohamed arafa

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


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