14-11-12, 10:02 PM
مراد بورجي كتب :اخي الكريم جزيت خير الاجزاء ان شاءلله وجعلة في ميزان حسناتك
سؤالى البحت بتاريخ ما يجيب نتيجة مائة بلمائة شوف الصورة وانت تفهم وهدا الكود مرفق ايظن اخي
PHP كود :
dt.Clear()
Dim ds As New DataSet
Dim sql1 As String = "select i.inv_no,i.code,i.drive,i.engine,i.transf,i.chass_no,i.eng_no,i.vin,i.color,i.cd_no,i.cd_date,i.key_no from Invoice3 i , cust_information c where i.inv_no = c.inv_no And i.model like '%" & ComboBox1.Text & "%' And c.inv_date >='" & DateTimePicker1.Text & "' And c.inv_date <='" & DateTimePicker2.Text & "'"
con3.Open()
Dim da As New SqlDataAdapter(sql1, con3)
da.Fill(dt)
DataGridView1.DataSource = dt
DataGridView1.Refresh()
''-----------------------------------------
''-----------------------------------------
DataGridView1.Columns(0).Width = 60
DataGridView1.Columns(1).Width = 80
DataGridView1.Columns(2).Width = 80
DataGridView1.Columns(3).Width = 80
DataGridView1.Columns(4).Width = 80
DataGridView1.Columns(5).Width = 90
DataGridView1.Columns(6).Width = 80
DataGridView1.Columns(7).Width = 180
DataGridView1.Columns(8).Width = 80
DataGridView1.Columns(9).Width = 80
DataGridView1.Columns(10).Width = 80
DataGridView1.Columns(11).Width = 90
DataGridView1.Columns(0).HeaderText = " Invoice No "
DataGridView1.Columns(1).HeaderText = "Mark"
DataGridView1.Columns(2).HeaderText = "Drive"
DataGridView1.Columns(3).HeaderText = "Engine"
DataGridView1.Columns(4).HeaderText = "Trans"
DataGridView1.Columns(5).HeaderText = "chass_no"
DataGridView1.Columns(6).HeaderText = "Eng_no"
DataGridView1.Columns(7).HeaderText = "VIN"
DataGridView1.Columns(8).HeaderText = "Color"
DataGridView1.Columns(9).HeaderText = "CD_no"
DataGridView1.Columns(10).HeaderText = "CD_date "
DataGridView1.Columns(11).HeaderText = "Key_no"
DataGridView1.ColumnHeadersDefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
'-------------------------------------------
con3.Close()
بالإضافة الى الكلمة المحجوزة between عليك احاطة التواريخ بالرمز #
PHP كود :
Where c.inv_date BETWEEN #" & DateTimePicker1.Text & "# And #" & DateTimePicker2.Text & "#"
