+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ارجو تعديل فى جملة SELECT (/showthread.php?tid=36702)
ارجو تعديل فى جملة SELECT - new_programer - 14-10-20
السلام عليكم
اخواني الكرام
لدى جملة استعلام عن الوقت كيف احسب الوقت لتاريخ محدد
توضيح اكتر اريد جلب عدد ساعات الدوام لكل يوم
الكود التالي يجب وقت الحضور ثم وقت الانصراف
ارجو المساعدة اخواني
كود :
tb_table.Clear()
Dim cmd As New OleDbCommand("select * from qury1 where USERID=@qty and CHECKTIME > @dat1 and CHECKTIME > @dat2", con)
cmd.Parameters.Add("@qty", OleDbType.Integer).Value = Val(txtCode.Text)
cmd.Parameters.Add("@dat1", OleDbType.Date).Value = ddat1.Value
cmd.Parameters.Add("@dat2", OleDbType.Date).Value = ddat2.Value
con.Open()
tb_table.Load(cmd.ExecuteReader)
dvg_invsales.DataSource = tb_table
con.Close()RE: ارجو تعديل فى جملة SELECT - new_programer - 14-10-20
برجاء الرد من احد الاخوة
محاولاتي كلها فاشلة
RE: ارجو تعديل فى جملة SELECT - abdou - 14-10-20
اتفضل اخي جرب الكود ده وقولي النتيجة
كود :
Dim D1 As DateTime
Dim D2 As DateTime
Dim TS As New TimeSpan()
D1 = DateTimePicker1.Value.ToString
D2 = DateTimePicker2.Value.ToString
TS = D1 - D2
Me.TextBox1.Text = TS.ToStringRE: ارجو تعديل فى جملة SELECT - new_programer - 14-10-20
(14-10-20, 09:39 PM)abdou كتب : اتفضل اخي جرب الكود ده وقولي النتيجة
كود :
Dim D1 As DateTime
Dim D2 As DateTime
Dim TS As New TimeSpan()
D1 = DateTimePicker1.Value.ToString
D2 = DateTimePicker2.Value.ToString
TS = D1 - D2
Me.TextBox1.Text = TS.ToString
شكر اخي لكن انا بعمل استعلام قاعدة بيانات وعايز اجيب عدد ساعات الدوام
لتاريخ محدد
عايز اعمل استعلام لتاريخ محدد
ازاى اقدر اعمل استعلام لتاريخ اليوم