منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

اريد كتابة كود مشروط بالتاريخ من الى وكذلك حسب محتوى الكومبو بوكس

k = "SELECT * FROM tb1 WHERE (dt BETWEEN #" & DTPicker1 & "# AND #" & DTPicker1 & "#) AND (mod='" & Combo1 & "')"

(01-01-18, 09:12 PM)eiocm كتب : [ -> ]k = "SELECT * FROM tb1 WHERE (dt BETWEEN #" & DTPicker1 & "# AND #" & DTPicker1 & "#) AND (mod='" & Combo1 & "')"

مشكور اخي لكن الكود يظهر كل الداتا بدل ان تكون محددة ضمن التاريخ المطلوب فقط

الاستعلام يستعلم عن بيانات بين تاريخين مع شرط محتوى الكومبو بوكس
ولا أعرف كيف نفذت الاستعلام
بالاضافة إلى أنك لم تضع مشروعك

(01-01-18, 09:59 PM)eiocm كتب : [ -> ]الاستعلام يستعلم عن بيانات بين تاريخين مع شرط محتوى الكومبو بوكس
ولا أعرف كيف نفذت الاستعلام
بالاضافة إلى أنك لم تضع مشروعك

اخي الكريم شكرا للرد عند وضع الكود بالشكل التالي 
zzz = "select * from data Where dates between #" & _
       Format(dt1.Value, "mm/dd/yyyy") & "# and  #" & _
       Format(dt2.Value, "mm/dd/yyyy") & "#  AND (customer='" & Combo1 & "')" 

فانه يعمل بشكل صحيح الان لو سمح كيف اضيف شرط اخر على اعتبار اسمه item   وسيتم كتابته للاستعلام عنه داخل text

أضفه مع الاستعلام مثل
zzz = "select * from data Where dates between #" & _
Format(dt1.Value, "mm/dd/yyyy") & "# and #" & _
Format(dt2.Value, "mm/dd/yyyy") & "# AND" & _
(customer='" & Combo1 & "') AND" & _
(item='" & Text1 & "')"

(01-01-18, 11:07 PM)eiocm كتب : [ -> ]أضفه مع الاستعلام مثل
zzz = "select * from data Where dates between #" & _
      Format(dt1.Value, "mm/dd/yyyy") & "# and  #" & _
      Format(dt2.Value, "mm/dd/yyyy") & "#  AND" & _
      (customer='" & Combo1 & "')  AND" & _
      (item='" & Text1 & "')"

مشكور اخي على الرد والمساعدة تم حل المشكلة