[hamada salah90]

السلام عليكم

لدي جدول يسمى TBsalary

وبه حقول   Name   -   Salary  -  SalDate

كما بالصورة

المثال مرفق للتعديل عليه





أريد كود جمع العنصر Salary من الجدول  في الفترة بين تاريخين معينين  SalDate

[Ahmed_Mansoor]

أهلا بك أخي الكريم ، إستخدم هذه الطريقة :

كود :

RS.Open "Select SUM(Salary) As Total From TBsalary Where SalDat >=#" & Text1.Text & "# And SalDate <=#" & Text2.Text & "#"

IF RS.RecordCount > 0 Then
     Text3.Text = RS![Total]
Else
      Text3.Text = "0"
End IF

[hamada salah90]

أهلا بك أخي الكريم ، إستخدم هذه الطريقة :

كود :

RS.Open "Select SUM(Salary) As Total From TBsalary Where SalDat >=#" & Text1.Text & "# And SalDate <=#" & Text2.Text & "#"

IF RS.RecordCount > 0 Then
    Text3.Text = RS![Total]
Else
     Text3.Text = "0"
End IF

لك جزيل الشكر والتقدير

[احمداحمداحمد6]

s=val(date)
z=val(date2)
if sal<s and sal>z then ado.sal=ado.sal+x

---

العفو

x=ado.sla+x

[Ahmed_Mansoor]

أهلا أخي الكريم , تم التعديل على المثال .