01-08-19, 04:43 PM
If rs13.State Then rs13.Close
rs13.Open "select * from gma where n ='" & Combo2.Text & "'AND DATA <= cdate('" + Text2.Text + "') and DATA >= cdate('" + Text1.Text + "') AND R_SA3= " & Text10.Text & "OR da11 = " & Text10.Text & "OR T_W = " & Text10.Text & "OR dva = " & Text10.Text & "OR ksm = " & Text10.Text & "OR dans= " & Text10.Text & "OR kyma = " & Text10.Text & "OR r4_sa3 = " & Text10.Text & " order by ml", cn, adOpenKeyset, adLockOptimistic
If rs13.RecordCount <> 0 Then
'=============================
الاخوة الاعزاء هذا كود البحث بس للاسف يقوم بالبحث عن N و باقي ال OR بدون التقيد بالتاريخ .. ارجو حل المشكلة في الكود
rs13.Open "select * from gma where n ='" & Combo2.Text & "'AND DATA <= cdate('" + Text2.Text + "') and DATA >= cdate('" + Text1.Text + "') AND R_SA3= " & Text10.Text & "OR da11 = " & Text10.Text & "OR T_W = " & Text10.Text & "OR dva = " & Text10.Text & "OR ksm = " & Text10.Text & "OR dans= " & Text10.Text & "OR kyma = " & Text10.Text & "OR r4_sa3 = " & Text10.Text & " order by ml", cn, adOpenKeyset, adLockOptimistic
If rs13.RecordCount <> 0 Then
'=============================
الاخوة الاعزاء هذا كود البحث بس للاسف يقوم بالبحث عن N و باقي ال OR بدون التقيد بالتاريخ .. ارجو حل المشكلة في الكود