منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ما هي طريقة التصفية باكثر من كومبوبوكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : ما هي طريقة التصفية باكثر من كومبوبوكس (/showthread.php?tid=10885)

الصفحات: 1 2

ما هي طريقة التصفية باكثر من كومبوبوكس - haiderkh - 09-12-14

السلام عليكم لدي قاعدة بيانات مربوطة بالفيجوال 6 عن طريق ADO كيف يمكن عمل فلترة للبيانات داخل الداتاجريد باستخدام اكثر من كومبوبوكس
شكرا مقدما

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - السيد الغالي - 09-12-14

السلام عليكم
في المرفق تجد ما طلبته
تحياتي لك

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - haiderkh - 09-12-14

(09-12-14, 02:23 PM)السيد الغالي كتب : السلام عليكم
في المرفق تجد ما طلبته
تحياتي لك

شكرا جزيلا يا غالي "السيد الغالي"
سيدي الغالي '" & السيد الغالي& " شكرا جزيلا
هل يمكن طباعة محتوى الداتاجريد بعد تعديل الكود التالي شاكرا لك سرعة ردك .متمنيا لك التوفيق
كود :
Private Sub Command4_Click()
Select Case Combo1.Text
    Case "الصف"
      Dim D, Z
D = Combo3
Z = Combo4
Adodc1.RecordSource = " select * from [Tab1] where  [Class] like '" & D & "%' and [Div] like '" & Z & "%'"
    Case "الشعبة"
       Adodc1.RecordSource = "Select * From Tab1 Where  [Div] LIKE '" & Text8 & "%';"
End Select
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1

End Sub


RE: ما هي طريقة التصفية باكثر من كومبوبوكس - السيد الغالي - 09-12-14

السلام عليكم
في المرفق تجد ما طلبته 
تحياتي لك

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - larbihamri - 09-12-14

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

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - السيد الغالي - 09-12-14

السلام عليكم
وضعت لك مثال بسيط ويمكنك استبدال text4 and tex3 بالكومبو بوكس او تطبيق المثال على مشروعك
ملاحظة : لا اعلم هل الكود الذي ارفقه انت يعمل لديك ام لا . فاذا كان يعمل فقط اعمل تقرير وضع هذا الكود
Set DataReport1.DataSource = Adodc1
DataReport1.Show
واذا لم تنجح لديك ارفق مشروعك وساهتم بالموضوع
تحياتي لك

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - haiderkh - 12-12-14

[attachment=6219]بارك الله بك سيدي الكريم السيد الغالي
عملت ما تفضلت بة وحلت المشكلة ولكن ظهرت اخرى جديدة وهي انني اريد ان اطبع درجات مادة واحدة من بين ثلاث مواد من خلال تقرير
وعندما اعمل تصفية او بحث عن درجة المادة المقصوده لكي تخرج في التقرير لوحدها اي ان محتويات التقرير ستكون التسلسل ,اسم الطالب,الصف,الشعبة,درجة الاسلامية
وبدون درجة العربي والانكليزي . يضهر خطأ في التقرير .ومن محاولاتي المتكررة توصلت الى حل وانا متاكد انكم اي المبرمجون لا تفضلونه بل لا تعتبرونه برمجة حتى . وهي ان اعمل اكثر من تقرير وكل تقرير مصمم لمادة واحدة ولكني كنت اود ان يكون تقريرا واحدا للمواد الثلاث تتغير نتائجة بناءا على التصفيةوقد ارفقت مثال ارجو الاطلاع علي شاكرا تعاونك الكبير ووفقك الله

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - Ahmed_Mansoor - 12-12-14

لايوجد في الجدول حقل لإسم المادة !!!

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - haiderkh - 12-12-14

(12-12-14, 10:41 PM)Ahmed_Mansoor كتب : لايوجد في الجدول حقل لإسم المادة !!!

الاستاذ Ahmed_Mansoor المحترم هناك حقل لدرجة المادة وهو حقل Asdgree لمادة الاسلامية مثلا وحقل Ardgree لمادة العربي وحقل Endgree لمادة الانكليزي . عموما في الجدول انا احتاج لدرجة المادة لا اسمها
دمت سالما

RE: ما هي طريقة التصفية باكثر من كومبوبوكس - Ahmed_Mansoor - 13-12-14

اهلا , تم التعديل , في المرفقات .