sqlcmd5.Parameters.AddWithValue("@Note3",DateTimePicker3.Value.ToString("hh:mm"))
كود :
Dim sqlq5 As String = "insert into Details_Table3 values(@Job,@Note2,@Day,@official_Time,@Khoroj_Time,@Emp_State1,@Details,@Note1,@Note3)"
Dim sqlcmd5 As New SqlCommand(sqlq5, Sqlcon)
sqlcmd5.Parameters.Add(New SqlParameter("@Note2", SqlDbType.NVarChar, 80) With {.Value = ComboBox2.Text})
sqlcmd5.Parameters.Add(New SqlParameter("@Job", SqlDbType.NVarChar, 25) With {.Value = DataGridView2.CurrentRow.Cells(15).Value.ToString})
sqlcmd5.Parameters.Add(New SqlParameter("@Day", SqlDbType.NVarChar, 50) With {.Value = DataGridView2.CurrentRow.Cells(3).Value.ToString})
sqlcmd5.Parameters.Add(New SqlParameter("@official_Time", SqlDbType.NVarChar, 10) With {.Value = DataGridView2.CurrentRow.Cells(22).Value.ToString})
sqlcmd5.Parameters.Add(New SqlParameter("@Khoroj_Time", SqlDbType.NVarChar, 10) With {.Value = DataGridView2.CurrentRow.Cells(57).Value.ToString})
sqlcmd5.Parameters.Add(New SqlParameter("@Emp_State1", SqlDbType.NVarChar, 25) With {.Value = "متأخر"})
sqlcmd5.Parameters.Add(New SqlParameter("@Details", SqlDbType.NVarChar, 50) With {.Value = ""})
sqlcmd5.Parameters.Add(New SqlParameter("@Note3", SqlDbType.Time) With {.Value = DateTimePicker3.Value.ToString("hh:mm")})
Sqlcon.Open()
sqlcmd5.ExecuteNonQuery()
Sqlcon.Close()
