24-09-19, 03:30 AM
(23-09-19, 08:59 PM)0550192815 كتب :لم يعطينى اى نتيجه اخى الكريمPHP كود :
Public Sub SEARCH2DATE(order_date As Date, order_date2 As Date, ByVal mo_name As String)
Dim sql = "SELECT * FROM ORDERS WHERE (order_date BETWEEN @d1 AND @d2) AND (mo_name=@mn)"
Using da As New OleDbDataAdapter(sql, con)
da.SelectCommand.Parameters.AddWithValue("@d1", order_date)
da.SelectCommand.Parameters.AddWithValue("@d2", order_date2)
da.SelectCommand.Parameters.AddWithValue("@mn", mo_name)
DT_SEARCH.Clear()
da.Fill(DT_SEARCH)
End Using
End Sub

