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

سؤال في الداتا جريد

مغلق
بدأه Saad AL.Moosa في 28 أبريل 2007 · 14 رد · 984 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

أخواني لدي إشكالية في الداتا جريد

أنا لدي قاعدة بيانات وأريد أن أجعل نتائج البحث تعرض في الداتا جريد وهذا كل مالدي وشكرا وأتمنى أن تكون الإجابة مفصلة.

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

#2

مالاده المستحدمة

الفلكس ام ماذا

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#3

Microsoft DataGrid Control 6.0 (OLEDB)

هذا إسم الأداة المستخدمة

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

#4
Set x.DataSource= RS

x هي اسم ال DataGrid

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#5

نسيت وال RS

هي الـ سجلات او مصدر البيانات

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#6

عذرا أخوي بس ممكن توضح لي وين أحط هذا الكود معليش والله تعبناك

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

#7

الأخ الفاضل ...

راجع: عرض النتائج في الdatagrid

شكراً

Eng. Usama El-Mokadem

Nothing is impossible, the word impossible itself says that: I M - Possible

#8

قم بوضع هذا الكود في المكان الذي تريد فيه تنفيزه

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#9

شكرا أخيEng. Usama El-Mo... ولكن أنا ما زلت مبتدأ في الفيجيوال بيسك وأنا أريد شرح وأريد وضع نتائج البحث في الداتا جريد وشكرا لك يا أخي آسفين إذا تعبناك.

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

#10

لا شكر على واجب انت اامر

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#11

الرجاء الرد السريع إذا سمحتم

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

#12

انت بتستخدم ايه

داتا كنترول ولا ادو ولا ايه ؟

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#13

الأخ الفاضل ...

بأفتراض أن لديك قاعدة بيانات أكسس وأسم الملف DB.mdb تحتوى على جدول Student نريد عرضه على الـ grdDataGrid:

فبكس سهولة يمكنك وضع الأداة على الفورم وضبط أسمها إلى grdDataGrid وأستخدام الكود التالى:

Private Sub Form_Load()
	Dim conn As New Connection
	Dim rs As New Recordset

	conn.CursorLocation = adUseClient
	conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DB.mdb;"

	rs.Open "select * from Student", conn, adOpenKeyset, adLockOptimistic
	Set grdDataGrid.DataSource = rs
End Sub

حيث

Dim conn As New Connection

لإنشاء أداة أتصال بقاعدة البيانات

Dim rs As New Recordset

لإنشاء أداة Recordset يتم استخدامه فى جمل الـ SQL ومنها يمكن البحث

conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DB.mdb;"

للإتصال بقاعدة البيانات DB.mdb الموجودة فى نفس مجلد البرنامج App.Path

rs.Open "select * from Student", conn, adOpenKeyset, adLockOptimistic

جملة Select لإظهار نواتج هذه الجملة داخل الـGrid فيما بعد بالسطر:

Set grdDataGrid.DataSource = rs

الذى يقوم بتخصيص الـ Recordset المسمى rs للـ grdDataGrid.

وبالطبع يمكنك تغير محتوى جملة SQL كما تشاء، فللبحث عن الطلاب الذى يبدء أسمهم الأول بحرف A يمكن أستخدام جملة SQL كالتالى:

rs.Open "select * from Student Where First_name like 'A%'", conn, adOpenKeyset, adLockOptimistic

لمزيد من التفاصيل راجع المثال: DatabaseGrid.zip فى ازاي اعمل جدول المستخدم يكتب فيه مباشرة

شكراً

Eng. Usama El-Mokadem

Nothing is impossible, the word impossible itself says that: I M - Possible

#14

بارك الله فيك اخي اسامه

شرح وتميز

لن اوفي ابدا ما قدمه لي هذا المنتدى

سامر

#15

أخواني أعرف إني تعبتكم معاي بس تحملوني شوي عندي كم سؤال

أولا كيف أبحث في قاعدة البيانات وأنا أستخدم مكتبة ADO ???

ثانيا أريد أن أعرض نتائج البحث في الداتا جريد؟

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

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

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