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

السلام عليكم
عندي استعلام بين تاريخين شغال كويس خالص علي قاعدة بيانات اكسيس ولكن عند استخامه علي قاعدة بيانات سيكوال سيرفر
يظهر لي خطأ .
ارجو المساعده وبارك الله فيكم
مرفق الكود وصوره من الخطأ
[attachment=22265]

الغ المسافات الموجودة قبل و بعد / 

(29-07-19, 09:19 PM)asemshahen5 كتب : [ -> ]الغ المسافات الموجودة قبل و بعد / 

PHP كود :

WHERE (AccountDate >= '2019,04,07') AND (AccountDate <= '2019,05,09') 


شكرا علي اهتمامك اخي عاصم
ولكن اعطاني نفس الخطأ

---

(29-07-19, 09:46 PM)AAAAAAAAA كتب : [ -> ]

كود :

            da = New SqlDataAdapter("SELECT * FROM [Analysis_Table] WHERE ([ResultDate] BETEEN @d1 AND @d2) AND ([Authinticated]=True) AND ([Printed]=False)", connSQL)
           da.SelectCommand.Parameters.AddWithValue("@d1", searchDate1)
           da.SelectCommand.Parameters.AddWithValue("@d2", searchDate2)

اشكرك اخي شكرا جزيلا 
ولكن اعطاني خطأ أخر
كما بالصوره

[attachment=22270]

(29-07-19, 11:39 PM)ابراهيم ايبو كتب : [ -> ]

السلام عليكم اخي الكريم 

تفضل عسى تحل مشكلتك بفضل الله

PHP كود :

'    انشئ هذا الصب وضع اسم حقل التاريخ الذي في الجدول عندك  
    Public Sub SearhBetween(ByVal DD1 As Date, ByVal DD2 As Date)
        Try
            Dim dt As New DataTable()
            Dim cmd As New SqlCommand()
            dt.Clear()
            cmd = New SqlCommand("select * from Analysis_Table Where [حقل التاريخ في الجدول]>= @DD1  And  [حقل التاريخ في الجدول]<= @DD2 AND ([Authinticated]=True) AND ([Printed]=False)", connSQL)
            cmd.Parameters.Add("@DD1", SqlDbType.Date).Value = DD1
            cmd.Parameters.Add("@DD2", SqlDbType.Date).Value = DD2
            If connSQL.State = ConnectionState.Open Then
                connSQL.Close()
            End If
            connSQL.Open()
            dt.Load(cmd.ExecuteReader())
            connSQL.Close()
            dgv_table.DataSource = dt
        Catch ex As Exception
        End Try
    End Sub

    ' ثم قم ياستدعاء هذا الصب في زر البحث بين تاريخين
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'DateTimePicker1 ,DateTimePicker2   يحتاج الى باراميترين هما  
        SearhBetween(DateTimePicker1.Value, DateTimePicker2.Value)
    End Sub 


اشكرك اخي ابراهيم ايبو علي مجهودك معي
تم الحل بفضل الله
فقد قمت ببعض التعديلات علي الكود الخاص بالاخ AAAAAAAAA
وهدا هو الكود للاستفاده

PHP كود :

Dt.Clear()
            Da = New SqlDataAdapter("SELECT * FROM [Analysis_Table] WHERE ([ResultDate]>= # " & searchDate1.Year & " / " & searchDate1.Month & " / " & searchDate1.Day & "#) and ([ResultDate] <= # " & searchDate2.Year & " / " & searchDate2.Month & " / " & searchDate2.Day & "#) AND ([Authinticated]=True) AND ([Printed]=False)", connSQL)
            Da.Fill(Dt)
            DataGridView1.DataSource = (Dt)