الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال في في الاداة DBCombo???

مغلق
بدأه آنين الصمت في 3 مارس 2003 · 4 رد · 831 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

لسلام عليكم ورحمه الله وبركاته

لو سمحتم يااخوان

انا عندي فورم رابطته بالاداة Ado

ومستخدمه داتا كمبو

يعني عندي فورم لتسجيل الطالبات

اسمها ورقمها وبرنامجها الدراسي والمستوى الدراسي لها

وعندي يحدد في الداتا كبو البرنامج الي هي تدرسه مثل دبلوم سنه او

دبلو م سنتين او دورات متقدمه او مبتدئه

هاذا راح يظهر لي في الداتا وانا اختار اوكي

وبعدين عندي داتا كمبو اخرى يظهر فيه المستوى الدراسي

بحيث اذا كان دبلوم سنه يظهر لي مستوى اول وثاني فقط وانا اختار من الداتا

واذا كان دبلوم ستين البرنامج يظهر لي في داتا كمبو مستوى اول وثاني وثالث ورابع

واذا اخترت راح يخزن لي على طول في القاعده يعني اي برنامج لهاذي الطالبه واي مستوى دراسي هيا

وهاكذا ياليت تشوفون لي الحل

وعندي ايضا في شاشه

اني اختار من الداتا كمبو رقم الطالبه

راح يظهر لي على طول في التكست ينطبع اسم الطالبه

وهاكذا كل مااخترت رقم لطالبه ينطبع لي في التكست اسمها

تكفون يااخوان انكم تساعدوني في اسرع وقت ممكن

وانا حاولت ارفق البرنامج بس لسبب حجمه

تكفوووووووون المساعده

وجزاكم الله خيررررررررر

اختكم

انين الصمت

#2

ياجماعت الخير احد يرد على سؤالييي:'(

بليز :'(

وهو امل وليس امر

اختكم

انين الصمت

#3

:'(:'(:'(:'(:'(:'(

تكفووووووووون المساعده

ارجوكم رجاء خااااااااااااااااااص

انين الصمت

#4

السلام عليكم

مع اني ماخذ بخاطري منك لكن ما عليه .

'ضعي الكود التالي في قسم التصاريح العامة

Dim db As ADODB.Connection

Dim WithEvents adoPrimaryRS As ADODB.Recordset

'

'

Sub ConnectDB'

Set db = New ADODB.Connection

db.CursorLocation = adUseClient

db.Provider = "Microsoft.Jet.OLEDB.3.51"

'YourDataBase اسم قاعدة البيانات

db.Open App.Path & "YourDatabase.MDB"

'

'لإضافة البيانات

db.Execute "INSERT INTO YourTable (Fields1,Fields) VALUES ('Data1','Data2');"

'YourTabel اسم الجدول

'Field1 الحقل الأول

'Field2 الحقل الثاني

'

'Data1 البيانات التي سوف تحفظ في الحقل الأول

'Data1 البيانات التي سوف تحفظ في الحقل الثاني

'

' من أجل الخاصية الثانية فيمكنك استخدام دالات البحث او التصفية لإظهار البيانات المحددة وهي كالتالي :

'Filter للتصفية

Set adoPrimaryRS = New ADODB.Recordset

adoPrimaryRS.Open "SELECT * FROM YourTable WHERE Field1='Data1';", db, adOpenForwardOnly, adLockPessimistic

'وهذا مثال مرفق للبحث وإظهار البيانات في المكان المخصص لها بستخدام ADO , DAO

'

End sub

اتمنى الاسفادة بما ذكر أعلاه .

وإذا فيه أي استفسار أنا بالخدمة .

أخوك Visitor_OM

#5

عفوا نسيت أضع المثال

تفضلي :

vsearch.zip

هذا الموضوع مغلق.

مواضيع مشابهة