تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
المساعدة في كود الفلتر
#1
السلام عليكم ورحمة الله وبركاته الاخوة الاعزاء
 
برجاء المساعدة في كود الفلتر للمفاتيح الملونة باللون الاخضر في الشاشة  
 
 
     المفتاح الاول لعمل فلتر علي الاسم المكرر اكثر من او يساوي خمس مرات


  المفتاح الثاني لعمل فلتر علي الاسم الذي عمره اكبر من اويساوي 50  وايضا مرتبه اكبر من اويساوي 1000



 برجاء فحص المرفقات

مع جزيل الشكر


الملفات المرفقة
.rar   Repetitive01.rar (الحجم : 105.15 ك ب / التحميلات : 25)
الرد
تم الشكر بواسطة:
#2
PHP كود :
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click
    Dim sqlstr 
As String "SELECT Name FROM Staff GROUP BY Name HAVING COUNT(Name)>=5"
    
da = New OleDbDataAdapter(sqlstrcon)
    
dt.Clear()
    
da.Fill(dt)

    
DGVSearch.DataSource dt

End Sub

Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
    Dim sqlstr 
As String "SELECT * FROM Staff WHERE (Age>=50) And (Salary>=1000) "
    
da = New OleDbDataAdapter(sqlstrcon)
    
dt.Clear()
    
da.Fill(dt)

    
DGVSearch.DataSource dt

End Sub 
لكن الطلب الأول لا يصلح بإحضار كامل الأعمدة بسبب عدك تطابق البيانات
لهذا تم الاكتفاء بالبحث لتكرار الاسم فقط
الرد
تم الشكر بواسطة:
#3
(08-01-18, 12:20 PM)طالب برمجة كتب :
PHP كود :
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click
    Dim sqlstr 
As String "SELECT Name FROM Staff GROUP BY Name HAVING COUNT(Name)>=5"
 
   da = New OleDbDataAdapter(sqlstrcon)
 
   dt.Clear()
 
   da.Fill(dt)

 
   DGVSearch.DataSource dt

End Sub

Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
    Dim sqlstr 
As String "SELECT * FROM Staff WHERE (Age>=50) And (Salary>=1000) "
 
   da = New OleDbDataAdapter(sqlstrcon)
 
   dt.Clear()
 
   da.Fill(dt)

 
   DGVSearch.DataSource dt

End Sub 
لكن الطلب الأول لا يصلح بإحضار كامل الأعمدة بسبب عدك تطابق البيانات
لهذا تم الاكتفاء بالبحث لتكرار الاسم فقط


مشكوووووور جدا جدا جدا استاذي الحبيب

الكود يعمل تمام التمام Smile
الرد
تم الشكر بواسطة:
#4
(08-01-18, 12:48 PM)khaled12345 كتب :
(08-01-18, 12:20 PM)طالب برمجة كتب :
PHP كود :
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click
    Dim sqlstr 
As String "SELECT Name FROM Staff GROUP BY Name HAVING COUNT(Name)>=5"
 
   da = New OleDbDataAdapter(sqlstrcon)
 
   dt.Clear()
 
   da.Fill(dt)

 
   DGVSearch.DataSource dt

End Sub

Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
    Dim sqlstr 
As String "SELECT * FROM Staff WHERE (Age>=50) And (Salary>=1000) "
 
   da = New OleDbDataAdapter(sqlstrcon)
 
   dt.Clear()
 
   da.Fill(dt)

 
   DGVSearch.DataSource dt

End Sub 
لكن الطلب الأول لا يصلح بإحضار كامل الأعمدة بسبب عدك تطابق البيانات
لهذا تم الاكتفاء بالبحث لتكرار الاسم فقط


مشكوووووور جدا جدا جدا استاذي الحبيب

الكود يعمل تمام التمام Smile



السلام عليكم الاخوة الاعزاء

استاذي الحبيب طالب برمجة واساتذتي الاعزاء

من فضلك  اضفت فلتر بشرط اخر ---- وهو مطلوب في المشروع

الفلتر المطلوب مضاف بلون مختلف علي الفورم  وهو  لعمل الاتي :

اذا الاسم تكرر اكبر من او يساوي خمس مرات ومرتبه اكبر من او يساوي 1000

برجاء فحص المرفقات

مع جزيل الشكر


الملفات المرفقة
.rar   Repetitive0.rar (الحجم : 106.29 ك ب / التحميلات : 18)
الرد
تم الشكر بواسطة:
#5
PHP كود :
Dim sqlstr As String "SELECT Name FROM Staff  WHERE (Age>=50) And (Salary>=1000) GROUP BY Name HAVING COUNT(Name)>=5" 
لكن المفروض أن يكون هناك جدول للأسماء مع البيانات الثابتة
وجدول آخر للبيانات الكثيرة التي تخص كل اسم
الرد
تم الشكر بواسطة:
#6
(09-01-18, 12:13 AM)طالب برمجة كتب :
PHP كود :
Dim sqlstr As String "SELECT Name FROM Staff  WHERE (Age>=50) And (Salary>=1000) GROUP BY Name HAVING COUNT(Name)>=5" 
لكن المفروض أن يكون هناك جدول للأسماء مع البيانات الثابتة
وجدول آخر للبيانات الكثيرة التي تخص كل اسم

شكرا اخي الحبيب علي الرد والمساعدة

للاسف نفذت الكود ولكن لم يعمل معي Huh


الملفات المرفقة
.rar   Repetitive0.rar (الحجم : 104.74 ك ب / التحميلات : 20)
الرد
تم الشكر بواسطة:
#7
لكنك لم تضع بقية الكود كما الأزارير السابقة
PHP كود :
Private Sub Button3_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button3.Click

    Dim sqlstr 
As String "SELECT Name FROM Staff  WHERE (Salary>=1000) GROUP BY Name HAVING COUNT(Name)>=5"

 
   da = New OleDbDataAdapter(sqlstrcon)
 
   dt.Clear()
 
   da.Fill(dt)

 
   DGVSearch.DataSource dt

End Sub 
الرد
تم الشكر بواسطة:
#8
(09-01-18, 12:43 AM)طالب برمجة كتب : لكنك لم تضع بقية الكود كما الأزارير السابقة
PHP كود :
Private Sub Button3_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button3.Click

    Dim sqlstr 
As String "SELECT Name FROM Staff  WHERE (Salary>=1000) GROUP BY Name HAVING COUNT(Name)>=5"

 
   da = New OleDbDataAdapter(sqlstrcon)
 
   dt.Clear()
 
   da.Fill(dt)

 
   DGVSearch.DataSource dt

End Sub 

بارك الله فيك يا هندسة

مع جزيييييييل الشكر Smile
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن المساعدة فى برنامج البصمة مرفق مثال new_programer 3 214 12-10-20, 12:53 AM
آخر رد: new_programer
  ارجو المساعدة في كود حذف فاتورة بيع sofiane-phy 1 141 11-10-20, 12:12 AM
آخر رد: محمد كريّم
  ممكن المساعدة فى كود حساب الوقت new_programer 2 145 07-10-20, 06:49 PM
آخر رد: new_programer
  [VB.NET] ارجو المساعدة مشكل les boucles fohah 2 153 04-10-20, 06:19 PM
آخر رد: fohah
  المساعدة في انشاء شريط تحميل progress bar MustafaShaker 0 129 16-09-20, 05:41 PM
آخر رد: MustafaShaker
  المساعدة في التعديل على كود تعديل البيانات في قاعدة سيكوال سيرفر momani33 3 219 15-09-20, 08:10 PM
آخر رد: Anas Mahmoud
  المساعدة بكود استعلام khaled Mohammed 3 227 15-09-20, 08:42 AM
آخر رد: Anas Mahmoud
  [VB.NET] ارجو المساعدة في برنامج لتشغيل الملفات الصوتية لنطق الارقام eman kh 5 502 13-09-20, 06:05 PM
آخر رد: eman kh
  المساعدة بكتابة جملة IF khaled Mohammed 9 383 08-09-20, 08:39 PM
آخر رد: Anas Mahmoud
  مشكلة فى اضافة البيانات ممكن المساعدة talatm 7 437 04-09-20, 04:10 PM
آخر رد: عبد العزيز البسكري

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


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