الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

خطأ في كود تعبئة الداتا جريد فيو بنتيجة البحث

مغلقمُجاب
بدأه أبو عبدالله العربي في 18 مارس 2013 · 13 رد · 2,082 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

أخوتي الكرام...
تحية طيبة
ظهرت لدي رسالة الخطأ المرفقة (Data type mismatch in criteria expression)عند تنفيذ الكود الخاص بتعبئة الداتا جريد وأرجو توضيح سببها :

 


Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim sql As String = " select id,emp,pro_name,date_from,date_to from pro_list where date_from = '" & DateTimePicker3.Value & "' "

Dim ds As New DataSet

Dim adapter As New OleDbDataAdapter(sql, db)

adapter.Fill(ds, "pro_list")

emp_data.DataGridView1.DataSource = ds

emp_data.DataGridView1.DataMember = "pro_list"

emp_data.DataGridView1.Refresh()

Me.Close()

End Sub

 

 

ملاحظة : نوع الحقل في قاعدة البيانات (تاريخ) والنتسيق short  وتنسيق datetimepicker ضبطت على short

أرجو الإفادة

post-273872-0-13019800-1363622704_thumb.

#2

السلام عليكم

تاكد من نوع البيانات في قاعدة البيانات حيث يتم الاستعلام من خلال نفس نوع البيانات

#3

والله يا أخي تأكدت ويظل السبب مجهول

#4

السلام عليكم استخدم هذه الطريق

sql2 = "select * from itemlpo where date > '" & Format(DateTimePicker1.Value, "dd/MM/yyyy") & "'"

تم تعديل هذه المشاركة بواسطة AHMAD KALIL في 23 مارس 2013 في 14:24

#5

شاكر لكما..جزيل الشكر..

لم أغير في الكود شيء ولكن أعدت تصميم الفورم من جديد وتم حل المشكلة..أين تكمن المشكلة? ..لا أعلم ولكن المهم أنها زالت..

دمتم بوافر الصحة

#6

الأخوة الكرام ...

هذا الكود ما رضي يشتغل معي ..بإنتظار توجيهاتكم

 Dim sql As String = "select [id],[emp],[pro_name],[date_from],[date_to],[hours] from [pro_list] where [emp] like '" & ComboBox3.Text & "'"

Dim ds As New DataSet

Dim adapter As New OleDbDataAdapter(sql, db)

adapter.Fill(ds, "pro_list")

DataGridView1.DataSource = ds

DataGridView1.DataMember = "pro_list"
#7

السلام عليكم

استخدام like في جمل الاستعلام يعني البحث عن نص او جزء من نص مع استخدام % ويستخدم مع TextBox

في مثالك لماذا لاتستخدم (=) بدل like لانك استخدمت combo وهذا يعني ان المستخدم

سيختار اسم محدد من داخل القائمة

تم تعديل هذه المشاركة بواسطة AHMAD KALIL في 3 أبريل 2013 في 08:04

#8

شاكر لك أخي الكريم...

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

#9

اخي ابو عبدالله

في اي حدث تضع الكود مثلا في حدث clik او change

#10

أخي العزيز..

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

#11

الغريبة لما غيرت الشرط إلى:

 Dim sql As String = "select [id],[emp],[pro_name],[date_from],[date_to],[hours] from [pro_list] where [id] = '" & ComboBox3.Text & "'"

أعطى النتيجة الصحيحة

مع أن الحقل [id] هو ترقيم تلقائي في الجدول و[emp] هو نص.

هل من مسعف يا أخوان.. 

#12

ممكن ترفق المشروع

سبحانه الله وبحمده سبحانه الله العظيم

 
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");
 
Make it run, make it right, make it fast, make it small

normalize your data and don't make it look like excel sheet
 
الأبداع في الرأس والعلم في الكراس
روابط مفيدة
[دروس] تجاهل الwhere
طريقة الاضافة للجدولين مرتبطين مرة واحدة
قراءة صوره من مسار
حل مشكلة الارقام العربي في الكريستال ريبورت
حل مشكلة تصدير OLE Object الي Physical File مرة أخري
كود عمل نسخة يومية من قاعدة البيانات بتاريخ مع حذف النسخة السابقة من 30 يوم مضي
معظم دوال التعامل مع string
Change Data Capture
SQL Course
string-format-datetime
LINQ to SQL in C#
Sum-of-previous-row-values-in-SqlServer
alarm-for-stop-agent-service
SQL Server CTE
#13

شاكر اهتمامك أخي العزيز...
المشروع بالمرفقات وعسى على ايديك الحل إن شاء الله
TRAINIG_PRO.rar

#14 أفضل إجابة

try this

  Dim sql As String = "select * from pro_list where DateValue(date_from) = #" & DateTimePicker3.Value.ToString("MM/dd/yyyy") & "#;"

        Dim ds As New DataSet

        Dim adapter As New OleDbDataAdapter(sql, db)

        adapter.Fill(ds, "pro_list")

        DataGridView1.DataSource = ds

        DataGridView1.DataMember = "pro_list"

        DataGridView1.Refresh()
1

سبحانه الله وبحمده سبحانه الله العظيم

 
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");
 
Make it run, make it right, make it fast, make it small

normalize your data and don't make it look like excel sheet
 
الأبداع في الرأس والعلم في الكراس
روابط مفيدة
[دروس] تجاهل الwhere
طريقة الاضافة للجدولين مرتبطين مرة واحدة
قراءة صوره من مسار
حل مشكلة الارقام العربي في الكريستال ريبورت
حل مشكلة تصدير OLE Object الي Physical File مرة أخري
كود عمل نسخة يومية من قاعدة البيانات بتاريخ مع حذف النسخة السابقة من 30 يوم مضي
معظم دوال التعامل مع string
Change Data Capture
SQL Course
string-format-datetime
LINQ to SQL in C#
Sum-of-previous-row-values-in-SqlServer
alarm-for-stop-agent-service
SQL Server CTE

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…