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

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

قراءة رقم من ضمن سلسلة ارقام موجودة في الحقل - عبدالكريم برشدان - 05-11-21

اريد جملة استعلام تقوم بالاتي 

لدي حقل يحتوي علي الرقم 12345678910
وحقل يحتوي علي الاسم 
وحقل يحتوي علي العنوان 

اريد عند كتابة 456 يعرض لي باقي البيانات 

وعند كتابة 123 يقوم بعرض نفس البيانات ايضا 

وعند كتابة 78910 يقوم بعرض البيانات ايضا 


الذي اريده هو ان يقوم بقراءة من اي جزء اقوم بادخالة في text 

كود :
           Dim cmd As New SqlCommand("Select * From Tbl_all_store where Bar_code = " & BunifuTextBox3.Text & "  and Store_Name='" & Label13.Text & "'", conn)


RE: قراءة رقم من ضمن سلسلة ارقام موجودة في الحقل - Anas Mahmoud - 06-11-21

إذا كان ولا بد من استخدام هذه الطريقة فالحل الامثل هو عدم دمج الاكواد مباشرة بل الافضل ان تقوم بالفصل بينهم بحرف - مثلا 

كود :
621770111907-368046646870-621780111907-36805346870

هكذا وبالتالي لا تحدث مشكلة الخلط ان شاء الله

الان يمكننا استخدام Like في الاستعلام بدون اي مشكلة :

كود :
Select * From Tbl_all_store where '-' + Bar_code + '-' like '%-368046646870-%'


والكود المطلوب يصبح 

كود :
Dim cmd As New SqlCommand("Select * From Tbl_all_store where '-' +  Bar_code + '-' like '%-" & BunifuTextBox3.Text & "-%'  and Store_Name='" & Label13.Text & "'", conn)


مع اعتراضي على ال sql injection vulnerability وكذلك ان الموضوع في القسم غير المناسب

RE: قراءة رقم من ضمن سلسلة ارقام موجودة في الحقل - عبدالكريم برشدان - 06-11-21

(06-11-21, 03:16 AM)Anas Mahmoud كتب : إذا كان ولا بد من استخدام هذه الطريقة فالحل الامثل هو عدم دمج الاكواد مباشرة بل الافضل ان تقوم بالفصل بينهم بحرف - مثلا 

كود :
621770111907-368046646870-621780111907-36805346870

هكذا وبالتالي لا تحدث مشكلة الخلط ان شاء الله

الان يمكننا استخدام Like في الاستعلام بدون اي مشكلة :

كود :
Select * From Tbl_all_store where '-' + Bar_code + '-' like '%-368046646870-%'


والكود المطلوب يصبح 

كود :
Dim cmd As New SqlCommand("Select * From Tbl_all_store where '-' +  Bar_code + '-' like '%-" & BunifuTextBox3.Text & "-%'  and Store_Name='" & Label13.Text & "'", conn)


مع اعتراضي على ال sql injection vulnerability وكذلك ان الموضوع في القسم غير المناسب
شكر باش مهندس انس وبارك الله فيك