+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] عند البحث عن سجل بين تاريخين (/showthread.php?tid=29662)
عند البحث عن سجل بين تاريخين - اسامه الهرماوي - 22-05-19
السلام عليكم...
عند البحث عن سجل بين تاريخين يظهر لي هذه الرسالة.
Incorrect syntax near '#'.
وهذا هو الكود مع العلم ان القاعدة sqlserver.
كود :
If con.State = ConnectionState.Closed Then
con.Open()
End If
Dim Query As String = "Select * From cu Where 1=1"
If date1.Text <> "" Then
Query = Query & " AND التاريخ >= #" & date1.Text & "#"
End If
If date2.Text <> "" Then
Query = Query & " AND التاريخ <= #" & date2.Text & "#"
End If
If TextBox1.Text <> "" Then
Query = Query & " AND اسم_العميل = '" & TextBox1.Text & "'"
End If
Dim cmd As New SqlCommand(Query, con)
da = New SqlDataAdapter(cmd)
dt.Clear()
da.Fill(dt)
Me.DataGridView1.DataSource = dtوهذا الكود أيضا يظهر نفس النتيجة مع العلم أن حقل التاريخ من نوع(نص/nvarche) وهذا الكود يعمل مع الاكسس فلما لم يعمل مع sql؟؟؟؟
كود :
Dim da As New SqlDataAdapter("Select * From cu Where التاريخ between (#" & date1.Value.ToString("dd/MM/yyyy") & "#) and (#" & date2.Value.ToString("dd/MM/yyyy") & "#) and اسم_العميل='" & TextBox1.Text & "'", con)
Dim dt As New DataTable
da.Fill(dt)
DataGridView1.DataSource = dtRE: عند البحث عن سجل بين تاريخين - عبد العزيز البسكري - 22-05-19
جرّب إستبدال # بالعلامة '
RE: عند البحث عن سجل بين تاريخين - اسامه الهرماوي - 22-05-19
صراحة مبدع بمعني الكلمة أستاذي عبدالعزيز شكرا.