16-01-19, 01:24 AM
16-01-19, 08:47 PM
تفضل أخي الكريم
مع ملاحظة ضرورة تعديل اسم الجدول وأسماء الحقول التي لديك في جدول قاعدة بياناتك
مع ملاحظة ضرورة تعديل اسم الجدول وأسماء الحقول التي لديك في جدول قاعدة بياناتك
كود :
Call ConnectionDatabase
If Rs.State = adStateOpen Then Rs.Close
Rs.Open "Select ID,Name,Date1,Date2 From Emp_Data WHERE [Date1] > '" & Val(Text1.Text) & _
"' AND [Date2] < '" & Val(Text2.Text) & "'", db, adOpenStatic, adLockOptimistic
MSHFlexGrid1.Clear
If Rs.RecordCount > 0 Then
Set MSHFlexGrid1.DataSource = Rs
Else
Set MSHFlexGrid1.DataSource = Nothing
End If
MSHFlexgridAlignment17-01-19, 12:15 AM
المشكل انه في الجدول لي معومات كالاتي
التاريخ
المبلغ
الشهر
التاريخ
المبلغ
الشهر
17-01-19, 12:31 AM
(17-01-19, 12:15 AM)tighrmte كتب : [ -> ]المشكل انه في الجدول لي معومات كالاتي
التاريخ
المبلغ
الشهر
لاعليك أخي الكريم كلنا نحتاج للمساعدة والعون
فقط ضع مثالاً ليتم التعديل عليه
17-01-19, 12:35 AM
حالا شكرا اخي