منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مساعدة بسيطة لانهاء كود لي - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مساعدة بسيطة لانهاء كود لي (/showthread.php?tid=8036)

الصفحات: 1 2


مساعدة بسيطة لانهاء كود لي - shado1796 - 19-03-13

السلام عليكم ورحمة الله

اخواني اريد مساعدة بسيطططة ،، تعديل بسيط ،،لكن لم اعرف حله وهو هذا الكود يقوم بالبحث بقيمة 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
..

اتمنى حلها ،،
وشكرا لكم جميعا



مساعدة بسيطة لانهاء كود لي - سعود - 19-03-13

استخدم اقل من او يساوي بدل لايك


مساعدة بسيطة لانهاء كود لي - Abu Ehab - 19-03-13

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





مساعدة بسيطة لانهاء كود لي - shado1796 - 19-03-13

Abu Ehab كتب :السلام عليكم ورحمة الله وبركاته
للعــلم :
2_للأستعلام بالارقام لا يجب أستخدام علامات تنصيص


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


مساعدة بسيطة لانهاء كود لي - shado1796 - 19-03-13

سعود كتب :استخدم اقل من او يساوي بدل لايك

اخي هو نعم اقل او يساوي لكن كيف طريقة الكود اانا حاولت استخدم or تظهر لي اخطاء


مساعدة بسيطة لانهاء كود لي - Abu Ehab - 19-03-13

إقتباس :انا دائمه اذا اردت تحديد قيمة رقم اضعه مثل هذا "4"
بمعنى أوضح :
طالما تم حجزه داخل علامات تنصيص " " ,,,لن يتعامل معه على انه رقم ,, بل نص ... واضح ؟





مساعدة بسيطة لانهاء كود لي - shado1796 - 19-03-13

Abu Ehab كتب :بمعنى أوضح :
طالما تم حجزه داخل علامات تنصيص " " ,,,لن يتعامل معه على انه رقم ,, بل نص ... واضح ؟



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

كود :
Dim cmd5 As New SqlCommand("select * from Table2 where LengthM less or = '" & (4) & "%'", Conn)



مساعدة بسيطة لانهاء كود لي - shado1796 - 19-03-13

هذا موضوع ان الاقل او يساوي ،، لكنه لا اعتقده مناسب لكود الاضافة لقاعدة البيانات


http://bytes.com/topic/visual-basic-net/answers/352138-less-than-equal-signs



مساعدة بسيطة لانهاء كود لي - سعود - 19-03-13

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



مساعدة بسيطة لانهاء كود لي - Easy4ever - 19-03-13

مثل ما قال الأخ 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()