منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

التعديل في الكود 

 On Error Resume Next: Err.Clear
  Call ConnectionDatabase
If HD.State = adStateOpen Then HD.Close
HD.Open "Select distinct  id_person From Emp_DataFIRST order by id_person asc", db, adOpenStatic, adLockOptimistic
If HD.RecordCount > 0 Then
 'Label22.Caption = HD.RecordCount
Set MSHFlexGrid1.DataSource = HD
Else
' Label22.Caption = HD.RecordCount
 MSHFlexGrid1.Clear
 Set MSHFlexGrid1.DataSource = Nothing

 End If
 MSHFlexgridAlignment
If HD.State = adStateOpen Then HD.Close




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

اخواني كل سنه وانتو طيبين



    1 - عايز لو تكرمتو اظهار البيانات في الفلكس قريد المكرر مرتين بزر (اي البيانات المكرره مرتين )
مثلا :   الاسم    العمر   الوظيفة     رقم الثابت

             احمد       33      طبيب          93734
            احمد        33      طبيب          93731
            ياسر        34      فني            45464
            ياسر        34      فني             45464
           

    2-   اظهار البيانات في الفلكس قريد المكرر ثلاث مرات بزر       (  MSHFlexGrid1)
         (اي البيانات المكرره ثلاث مرات )  
 مثلا :      الاسم       العمر       الوظيفة          رقم الثابت  
                امير         27           كبتن               29934
                امير         27           كبتن              29934
               امير          27           كبتن              29934
              مرسى       56          عامل              44555
              مرسى       56          عامل              44555
              مرسى      56            عامل              44555


                                               تحياتي ...

هل السؤال واضح

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

أهلا بك أخي الكريم , وكل عام وأنت بخير , جرب هذا الإستعلام بعد تغيير أسماء الحقول والجدول بأسماء الحقول والجدول التي لديك :


حيث الرقم 2 هو عدد التكرار تستطيع تغييره بعدد التكرار الذي تريد .

سلمت الايادي .....حفظك الله ورعاك اخي احمد وجزااك الله الف االف الف خير .

حاولت اخي احمد ولم افلح 


وهل يمكن ان يتم على جميع البيانات كما هو موضح بالاسفل 

او انه يجب اختيار الاسم العمر.....؟

أهلا بك أخي الكريم , لا , لايمكن إستخدام النجمة إذا يوجد في الإستعلام عبارة التجميع group by يجب وضع الحقول نفسها التي بعد Select تضعها بعد group by , بالتوفيق .