+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : عايز كود البحث بين تاريخين باستخدام datetim,erpick,er (/showthread.php?tid=12414)
عايز كود البحث بين تاريخين باستخدام datetim,erpick,er - hatem555 - 02-06-15
عايز كود البحث بين تاريخين باستخدام datetimerpicker
في داتا بيز 2002 اكسس
وعرض النتيجة في داخل داتا جريد فيو
RE: عايز كود البحث بين تاريخين باستخدام datetim,erpick,er - الطالب - 02-06-15
سلام
ان شاء الله تستفيد من هذا المثال
كود :
Dim dataAdapter As New OleDb.OleDbDataAdapter("SELECT * FROM [tb1] WHERE [dt] BETWEEN @d1 AND @d2", cnn)
dataAdapter.SelectCommand.Parameters.AddWithValue("@d1", DateTimePicker1.Value.Date)
dataAdapter.SelectCommand.Parameters.AddWithValue("@d2", DateTimePicker2.Value.Date)
Dim dataTable As New DataTable
dataAdapter.Fill(dataTable)
DataGridView1.DataSource = dataTableموفقين
RE: عايز كود البحث بين تاريخين باستخدام datetim,erpick,er - hatem555 - 03-06-15
تسلم كود كامل واكثر من رائع
RE: عايز كود البحث بين تاريخين باستخدام datetim,erpick,er - عادل القطعاني - 08-06-15
نقوم باضافة الاداة DateTimePicker2 , DateTimePicker1
وتغيير من نافذة الخصائص Format=Short
Dim con As New OleDb.OleDbConnection
con.ConnectionString = "provider = microsoft.ace.oledb.12.0;data source=db1.accdb"
con.Open()
Dim sql As String
sql = "select * from main where date1 >= # " & DateTimePicker1.Value.Year & " / " & DateTimePicker1.Value.Month & " / " & DateTimePicker1.Value.Day & " # and date1 <= # " & DateTimePicker2.Value.Year & " / " & DateTimePicker2.Value.Month & " / " & DateTimePicker2.Value.Day & " #"
Dim oda As New OleDbDataAdapter(sql, con)
Dim dt As New DataTable
oda.Fill(dt)
DataGridView1.DataSource = dt