23-02-18, 09:58 PM
(آخر تعديل لهذه المشاركة : 23-02-18, 09:59 PM {2} بواسطة محمد اسماعيل.)
استخدمت الكود التالي للبحث عن تاريخ بقاعدة البيانات وحذف كل الحقول
ولا يعمل معي
ولا يعمل معي
كود :
ElseIf IsDate(TextBox1.Text.Trim) = True Then
Dim DataAdapter As New OleDbDataAdapter("SELECT * FROM TB1 WHERE DATENOW_TB LIKE '%" & Trim$(Format(TextBox1.Text, "dd/MM/yyyy")) & "%'", con)
con.Open()
DataSet1.Clear()
DataAdapter.Fill(DataSet1, "TB1")
con.Close()