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

السلام عليكم
تظهر لى الرسالة الاتية
Syntax error (missing operator) in query expression 'day payment between #2018/05/05# and #2018/12/11#'.
عند التطبيق فى الكود التالى
Private Sub Button13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button13.Click

Dim dax As New OleDbDataAdapter
Dim dtx As New DataTable
dax = New OleDbDataAdapter("SELECT * FROM cairo1 WHERE day payment between #" & DateTimePicker1.Text & "# and #" & DateTimePicker2.Text & "#", con)
dax.Fill(dtx)
DataGridView1.DataSource = dtx
لوسمحتم ايه الحل

جرب هذا الكود اخي

PHP كود :

dim date1 as date =datetimePicker1.value
dim date2 as date = dateTimePicker2.value
dax =New OledbDataAdapter("select * from cairo1 WHERE day_payment between #" & date1.day & "/" & date1.monthe & "/" & date1.year and date2.day & "/" & date2.monthe & "/" &  date2.year & "#",con 

شكرا اخى الفاضل
الكود لم عمل
تظهر هذه الرسالة
Conversion from string "select * from cairo WHERE day_ p" to type 'Long' is not valid.

السّلام عليكم و رحمة الله و بركاته

إضافة لما قدّمه أخي " العربي " بارك الله فيه و له

مع إعتبار الحقل من نوع تاريخ .. جرّب هكذا ..

كود :

     Using da As New OleDbDataAdapter("SELECT * FROM [STUDENT] WHERE [BBIRTHDATE] BETWEEN @d1 AND @d2", con)

            da.SelectCommand.Parameters.AddWithValue("@d1", Me.DateTimePicker1.Value.Date)

            da.SelectCommand.Parameters.AddWithValue("@d2", Me.DateTimePicker2.Value.Date)

            Using dt As New DataTable

                da.Fill(dt)

                Me.DataGridView1.DataSource = dt

            End Using

        End Using

تحياتي

الف مليون شكر اخى الفاضل الكود شغال 100 % جزاك الله كل الخير وجعله فى ميزان حسناتكم واعانا الله على رد جميلكم

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

احمد خطاب

larbihamri

احمد خطاب

عبد العزيز البسكري

احمد خطاب