تقييم الموضوع :
  • 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
 Youtube   Facebook    Twitter   
الرد }}}}
تم الشكر بواسطة:
#4
Abu Ehab كتب :السلام عليكم ورحمة الله وبركاته
للعــلم :
2_للأستعلام بالارقام لا يجب أستخدام علامات تنصيص


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

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


Abu Ehab : Microsoft Partner  & Systems Developer
 Youtube   Facebook    Twitter   
الرد }}}}
تم الشكر بواسطة:
#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() 
Big Grin
<---------------------------------------------------------------->

الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة هامة جدا ashfgsm 9 116 أمس, 02:44 PM
آخر رد: Amir_alzubidy
  [VB.NET] مساعدة بخصوص mysql MOSTAFA.KAMEL 0 42 06-10-17, 07:30 AM
آخر رد: MOSTAFA.KAMEL
  مساعدة في حفظ ماهو مكتوب في textbox اوتوماتيكي trakktour 1 82 01-10-17, 10:30 PM
آخر رد: Amir_alzubidy
  مساعدة في الكود hikmat 0 37 27-09-17, 10:08 AM
آخر رد: hikmat
  [كود] مساعدة في عمل عضوية مميزة عبدالرحمن المكاوي 0 46 21-09-17, 05:51 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة safalo 3 82 19-09-17, 03:46 PM
آخر رد: أبو نوره
  [نقاش] مساعدة من حضراتكم salma.eg 1 61 15-09-17, 09:45 PM
آخر رد: أبو نوره
  [VB.NET] محتاج مساعدة من فضلكم asadtaif 2 96 15-09-17, 01:01 PM
آخر رد: asadtaif
  [VB.NET] مساعدة التكست بوكس محمد بوقزاحة 3 88 10-09-17, 03:31 AM
آخر رد: Rabeea Qbaha
  [VB.NET] مساعدة في Card Reader 0theghost0 2 112 09-09-17, 05:25 PM
آخر رد: ola

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


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