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

جزاك الله كل خير أخي " [b]Amir " ، وأنا حاولت أستخدم هذا الكود ولكن لم يعطي أي نتيجة ، مع العلم أني قمت بربط Datagrid1 بـ Adodc1 ولكن دون جدوى !![/b]

---

الكود المدخل :


Private Sub Command9_Click()
On Error Resume Next
Adodc1.RecordSource = "SELECT * FROM report WHERE Date BETWEEN #" + Format(DateTimePicker1.Value, "dd/mm/yyyy") + "# AND #" + Format(DateTimePicker2.Value, "dd/mm/yyyy") + "#"

End Sub

بفضل الله عز وجل ، ثم ببركة ما أفاض الله به عليك من العلم تم حل المشكلة أخي "Amir" 

جُزيت خيراً ، وأسأل الله أن يُسعدك في الدارين