تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة بسيطة لانهاء كود لي
#1
السلام عليكم ورحمة الله

اخواني اريد مساعدة بسيطططة ،، تعديل بسيط ،،لكن لم اعرف حله وهو هذا الكود يقوم بالبحث بقيمة 4 في اداة Listview اذا وجدها يظهر ما في Listview للذين يمتلكون الرقم 4

كود :
ListView5.Items.Clear()
        Conn.Open()
        Dim cmd5 As New SqlCommand("select * from Table2 where LengthM like '" & ("[b][SIZE=4][color=#FF0000]4[/color][/SIZE][/b]") & "%'", Conn)
        Dim myReader5 As SqlDataReader = cmd5.ExecuteReader(CommandBehavior.CloseConnection)
        While (myReader5.Read() = True)
            Dim item5 As New ListViewItem()
            item5.Text = myReader5.Item("ID").ToString()
            item5.SubItems.Add(myReader5.Item("NameCloth").ToString())
    
            ListView5.Items.Add(item5)
        End While
        Conn.Close()


ما اريده هو نفس كودي لكن ليس فقط اربعه بل ما هو اربعة واقل يعني مثل
4
3.5
3
2.5
2
..

اتمنى حلها ،،
وشكرا لكم جميعا
الرد }}}}
تم الشكر بواسطة:
#2
استخدم اقل من او يساوي بدل لايك
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته
للعــلم :
1_علامات التنصيص تستخدم لحجز الرموز أو بمعنى اخر : القيم النصية المحدده فقط ...
2_للأستعلام بالارقام لا يجب أستخدام علامات تنصيص
3_للبحث الشامل نستخدم متغير يحمل قيمة حقل من الجدول
4_ Like تأتي بالبيانات المتشابهه



Abu Ehab : Microsoft Partner  & Systems Developer
الرد }}}}
تم الشكر بواسطة:
#4
Abu Ehab كتب :السلام عليكم ورحمة الله وبركاته
للعــلم :
2_للأستعلام بالارقام لا يجب أستخدام علامات تنصيص


اخي كل الذي قلته اعرفه ،، الا ماهو مقتبس ،، كيف تقصد ان الارقام لا تستخدم بالتنصيص ،، انا دائمه اذا اردت تحديد قيمة رقم اضعه مثل هذا "4"
الرد }}}}
تم الشكر بواسطة:
#5
سعود كتب :استخدم اقل من او يساوي بدل لايك

اخي هو نعم اقل او يساوي لكن كيف طريقة الكود اانا حاولت استخدم or تظهر لي اخطاء
الرد }}}}
تم الشكر بواسطة:
#6
إقتباس :انا دائمه اذا اردت تحديد قيمة رقم اضعه مثل هذا "4"
بمعنى أوضح :
طالما تم حجزه داخل علامات تنصيص " " ,,,لن يتعامل معه على انه رقم ,, بل نص ... واضح ؟



Abu Ehab : Microsoft Partner  & Systems Developer
الرد }}}}
تم الشكر بواسطة:
#7
Abu Ehab كتب :بمعنى أوضح :
طالما تم حجزه داخل علامات تنصيص " " ,,,لن يتعامل معه على انه رقم ,, بل نص ... واضح ؟



جربت مثل ما قلت في التنصيص ومثل ما قال الاخ سعود في الاقل او يساوي ما ظهر لي خطأ في المشروع بل ظهر عند الاستخدام ف البرنامج ،، هذا تعديلي

كود :
Dim cmd5 As New SqlCommand("select * from Table2 where LengthM less or = '" & (4) & "%'", Conn)
الرد }}}}
تم الشكر بواسطة:
#8
هذا موضوع ان الاقل او يساوي ،، لكنه لا اعتقده مناسب لكود الاضافة لقاعدة البيانات


http://bytes.com/topic/visual-basic-net/...qual-signs
الرد }}}}
تم الشكر بواسطة:
#9
استخدم
كود :
where id <= 100
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#10
مثل ما قال الأخ Abu Ehab

Abu Ehab كتب :السلام عليكم ورحمة الله وبركاته
للعــلم :
1_علامات التنصيص تستخدم لحجز الرموز أو بمعنى اخر : القيم النصية المحدده فقط ...
2_للأستعلام بالارقام لا يجب أستخدام علامات تنصيص
3_للبحث الشامل نستخدم متغير يحمل قيمة حقل من الجدول
4_ Like تأتي بالبيانات المتشابهه


و الأخ سعود

سعود كتب :استخدم
كود :
where id <= 100


كودك بعد التعديل قم بتعديل في قاعدة البيانات نوع الحقل LengthM إلى رقمي

PHP كود :
ListView5.Items.Clear()

Conn.Open()
Dim cmd5 As New SqlCommand("select * from Table2 where LengthM<=" ""Conn)
Dim myReader5 As SqlDataReader cmd5.ExecuteReader(CommandBehavior.CloseConnection)
While (
myReader5.Read() = True
)Dim item5 As New ListViewItem()
item5.Text myReader5.Item("ID").ToString()
item5.SubItems.Add(myReader5.Item("NameCloth").ToString())

ListView5.Items.Add(item5)
End While
Conn.Close() 

أو إذا كنت لا تريد تغيير نوع الحقل LengthM إلى رقمي أستخدم هذا الكود بدلا من السابق
ولاكن لو غيرتها إلى رقمي بيكون أفضل لأنك تتعامل مع أرقام في هذا الحقل وتقارن قيمها

PHP كود :
ListView5.Items.Clear()

Conn.Open()
Dim cmd5 As New SqlCommand("select * from Table2 where LengthM<='" "'"Conn)
Dim myReader5 As SqlDataReader cmd5.ExecuteReader(CommandBehavior.CloseConnection)
While (
myReader5.Read() = True
)Dim item5 As New ListViewItem()
item5.Text myReader5.Item("ID").ToString()
item5.SubItems.Add(myReader5.Item("NameCloth").ToString())

ListView5.Items.Add(item5)
End While
Conn.Close() 
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Star [VB.NET] السلام عليكم اخوتي ف المنتدى احتاج الي مساعدة انا اصمم منظومة لشؤون العاملين بعد اض fatma anari 0 15 منذ 1 ساعه مضت
آخر رد: fatma anari
  ممكن مساعدة توفي العراقي 1 35 منذ 5 ساعة مضت
آخر رد: ali.alfoly
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 43 01-12-16, 03:09 AM
آخر رد: khalaroy
  [سؤال] مساعدة في الفيجوال بيسك عبدالرحمن المكاوي 1 59 28-11-16, 02:11 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة في عمل برنامج rabeh.ram 4 169 27-11-16, 12:29 AM
آخر رد: rabeh.ram
  مساعدة في انشاء ثيم عبدالرحمن المكاوي 11 280 25-11-16, 11:57 AM
آخر رد: العزابي
  مساعدة في عرض البيانات في التقرير haiderkh 1 70 21-11-16, 11:24 PM
آخر رد: السرور
  مساعدة بخصوص Listbox CLARO 3 78 16-11-16, 06:15 PM
آخر رد: silverlight
  [VB.NET] مساعدة بسيطة في الكمبوبكس . أبووسم 3 83 16-11-16, 11:58 AM
آخر رد: أبووسم
  مساعدة فى برنامج ارسال رسائل sms للموبايل nabil.1710 2 74 13-11-16, 12:00 PM
آخر رد: أبوبكر سويدان

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم