+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ما هو كود البحث عن تاريخ باستخدام datetimepicker فى sql server كود vb.net (/showthread.php?tid=27082)
ما هو كود البحث عن تاريخ باستخدام datetimepicker فى sql server كود vb.net - vb2010 - 23-10-18
السلام عليكم
ما هو كود البحث عن تاريخ باستخدام datetimepicker فى sql server كود vb.net
RE: ما هو كود البحث عن تاريخ باستخدام datetimepicker فى sql server كود vb.net - vb2010 - 23-10-18
كود :
للبحث عن تاريخ واحد
Public Sub search_date()
dt_bank.Clear()
Select Case Me.CmbField.SelectedIndex
Case 11
da_bank = New SqlDataAdapter("SELECT * FROM bank WHERE bank_date = '" & Me.DateTimePicker0.Text & "'order by bank_id", Con)
End Select
da_bank.Fill(dt_bank)
DGVSearch.DataSource = dt_bank
End Subاما للبحث بين تاريخين
كود :
Public Sub search_between2date()
dt_bank.Clear()
Select Case Me.CmbField.SelectedIndex
Case 11
da_bank = New SqlDataAdapter("SELECT * FROM bank WHERE bank_date > '" & Me.DateTimePicker1.Text & "' AND bank_date < '" & Me.DateTimePicker2.Text & "'order by bank_date", Con)
da_bank.Fill(dt_bank)
DGVSearch.DataSource = dt_bank
End Select
End SubRE: ما هو كود البحث عن تاريخ باستخدام datetimepicker فى sql server كود vb.net - ابو يوسف النواوي 2 - 23-10-18
كود :
DataGridView1.DataSource = Nothing
Dim sql = "SELECT * FROM tb_name WHERE VoucherDate= '" & Format(DateTimePicker1.Value, "yyyy/MM/dd") & "' "
Dim adp As New SqlClient.SqlDataAdapter(sql, cn)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
DataGridView1.DataSource = dtكود :
DataGridView1.DataSource = Nothing
Dim sql = "SELECT * from tb_name WHERE VoucherDate>= '" & Format(DateTimePicker1.Value, "yyyy/MM/dd") & "'and VoucherDate<= '" & Format(DateTimePicker2.Value, "yyyy/MM/dd") & "'ORDER BY VoucherDate "
Dim adp As New SqlClient.SqlDataAdapter(sql, cn)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
DataGridView1.DataSource = dt