[nabil.1710]

السلام عليكم اساتذتنا

قمت بانشاء مثال للبحث بين تاريخين بقاعدة بيانات اكسس و فيجوال استوديو 2012
عند امر لود يقوم برفع البيانات فى داتا جريد فيو بكفائه اما فى حالة البحث يعطى خطاء 

المثال فى المرفقات 
و شكرا

[محمود بكرى]

جربته وشغال تمام اعتقد المشكلة فى ضبط تنسيق الويندوز لديك

[adel27]

أتمنى التوضيح أكثر

[nabil.1710]

(21-12-16, 11:11 PM)adel27 كتب : أتمنى التوضيح أكثر

هذا الفيديو لشرح المشكلة 
وشكرا

[video=dailymotion]https://youtu.be/U70_CgIQzI0[/video]

و هذه صورة الخطاء

[محمود بكرى]

جرب الكود بالشكل ده فهو ادق

كود :

da = New OleDbDataAdapter("select * from جدول1 where تاريخ between #" & DateTimePicker1.Value.ToShortDateString & "# and #" & DateTimePicker2.Value.ToShortDateString & "#", cn)
       da.Fill(dt)
       Me.DataGridView1.DataSource = dt

[Adrees]

ايضاً بإمكانك استخدام الطريقة التالية

PHP كود :

       Dim pm(1) As OleDbParameter

        pm(0) = New OleDbParameter("@Date1", OleDbType.Date)
        pm(0).Value = DateTimePicker1.Value.Date

        pm(1) = New OleDbParameter("@Date2", OleDbType.Date)
        pm(1).Value = DateTimePicker2.Value.Date

        da = New OleDbDataAdapter("select * from جدول1 where تاريخ between @Date1 and @Date2", cn)

        da.Fill(Dt)
        Me.DataGridView1.DataSource = Dt 


[nabil.1710]

(22-12-16, 12:58 AM)محمود بكرى كتب : جرب الكود بالشكل ده فهو ادق

كود :

da = New OleDbDataAdapter("select * from جدول1 where تاريخ between #" & DateTimePicker1.Value.ToShortDateString & "# and #" & DateTimePicker2.Value.ToShortDateString & "#", cn)
       da.Fill(dt)
       Me.DataGridView1.DataSource = dt

اخى الفاضل تم البحث بهذا الكود ولكن النتائج غير دقيقة بل غير الذى طلبته
جرب فى المرفقات

---

(22-12-16, 01:54 AM)Adrees كتب : ايضاً بإمكانك استخدام الطريقة التالية

PHP كود :

       Dim pm(1) As OleDbParameter

        pm(0) = New OleDbParameter("@Date1", OleDbType.Date)
        pm(0).Value = DateTimePicker1.Value.Date

        pm(1) = New OleDbParameter("@Date2", OleDbType.Date)
        pm(1).Value = DateTimePicker2.Value.Date

        da = New OleDbDataAdapter("select * from جدول1 where تاريخ between @Date1 and @Date2", cn)

        da.Fill(Dt)
        Me.DataGridView1.DataSource = Dt 


اخى Adrees هذا الكود اتا بنفس الخطاء المتواجد فى الصورة

[zinom]

المثال شغال معايا في كلتا الحالتين لكن
جرب المثال بعد التعديل ده كده

[nabil.1710]

(22-12-16, 04:22 AM)zinom كتب : المثال شغال معايا في كلتا الحالتين لكن
جرب المثال بعد التعديل ده كده

اخى الفاضل zinom ظهرة نفس المشكلة عندى والله انا محتار الاكواد و الامثله كلها سليمه و المشكلة دى عندى فقط

طب ناخذ المو ضوع واحدة تلو الاخرى هل ازدار الاكسس هو المشكلة انا اشتغلت على اكسس 2003 و 2007 و برده نفس المشكلة .

و المرة دى المشكله فى مثال حضرتك عن اللود

اما فى المثال اول المشاركة اللود يعمل و يرفع البيانات على الفورم و البحث هو اللى بيدى الخطاء

اما كود الاستاذ / محمود بكرى  يعمل و لا يعطى اى اخطاء فى البحث ولكن النتائج غير صحيحة

---

هذا مثال لكود الاستاذ / محمود بكرى 

البحث ليس به اى اخطاء برمجية ولكن الخطاء فى النتائج لاحظ الصورة

البحث من 01/01/2016 الى 06/01/2016 ظهر نتيجة اخى لم تكون بين التاريخين 25/01/2016

و المثال فى المرفقات التنفيز  ( اكسس 2003  فيجوال استوديو 2012 )

[Basil Abdallah]

http://vb4arb.com/vb/thread-17367.html