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

عندي طلب 
عايز اظهر فورم عند بدأ البرنامج يظهر فيه العاملين اللى تاريخ انتهاء الهوية فيه اقل من شهر 
عن طريق انه يبجث فى جدول العاملين
الرد
تم الشكر بواسطة:
#2
تفضل اخي :


كود :
      Dim query As String = "SELECT * FROM Employees
                            WHERE    DateValue(ExpDate) <= DateValue(DATEADD('d',30, now()))
                            AND    DateValue(ExpDate) >= DateValue(now())"

      Dim cmd As New OleDbCommand(query, Con)
      Dim da As New OleDbDataAdapter(cmd)
      Dim dt As New DataTable

      Dim RowCount As Integer

      Con.Open()

      RowCount = da.Fill(dt)

      Con.Close()

      If RowCount > 0 Then

          'عرض تفاصيل الوثائق
          DataGridView1.DataSource = dt

      End If

غير Employees الى اسم الجدول و ExpDate الى اسم حقل تاريخ الانتهاء


http://vb4arb.com/vb/showthread.php?tid=...#pid166300
الرد
تم الشكر بواسطة: عبد الهادي بهاب , tryold , tryold , muaamar



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


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