PHP كود :
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='" & DateTimePicker1.Value.Date & "'", con)
Dim dt As New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt
أو
PHP كود :
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\zir-3.mdb")
Dim da As New OleDbDataAdapter("SELECT * FROM USERS where [Survey Time]>='" & DateTimePicker1.Value & "'", con)
Dim dt As New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt
اللهم يا ارحم الراحمين ارحم اخي اباليث رحمة واسعة
