تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كيف يتم برمجة البحث في برنامج المرفق ؟؟
#1
Question 
الساده الكرام
السلام عليكم ورحمة وبركاته
كيف يتم برمجة البحث في برنامج المرفق ؟؟
علماً انني استخدم برمجة بيسك 2008

نامل من الله المساعده

الرد }}}}
تم الشكر بواسطة:
#2
هل باي طريقة للبحث ام محددة بطريقة الربط؟؟
لانك مستخدم Bindingsource
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
أظن أني فقدت من يسمع صوتي ويلبي طلبي ويسمع شكواي في المنتدى
رحمك الله أبا الليث
الرد }}}}
تم الشكر بواسطة:
#3
طبعاً للبحث .. فيه طرق شي بفلتر وشي لا

أنا بأعطيك بدون فلتر سريع . أضغط دبل كليك على بوتون البحث وانقل الكود كما هو

كود :
BindingSource1.Position = BindingSource1.Find("iD", TextBox4.Text)

إذا كان بودك إعطاء رسالة للمستخدم عند الضغط على زر البحث ولاتوجد قيمة أضف الكود التالي في البوتون

كود :
If TextBox4.Text.Trim = "" Then
                MsgBox("الرجاء ادخال قيمة للبحث عنها", 16 + 524288, "البحث عن قيمة")
                TextBox4.Text = ""
                TextBox4.Focus()
                Exit Sub
            End If

BindingSource1.Position = BindingSource1.Find("iD", TextBox4.Text)

إذا كان تريد البحث بالنص وليس رقم

كود :
BindingSource1.Filter = "Name like '%" & TextBox4.Text & "%'"

تحياتي
الرد }}}}
تم الشكر بواسطة: Microformt
#4
(25-10-13, 09:37 PM)العزابي كتب : طبعاً للبحث .. فيه طرق شي بفلتر وشي لا

أنا بأعطيك بدون فلتر سريع . أضغط دبل كليك على بوتون البحث وانقل الكود كما هو

كود :
BindingSource1.Position = BindingSource1.Find("iD", TextBox4.Text)

إذا كان بودك إعطاء رسالة للمستخدم عند الضغط على زر البحث ولاتوجد قيمة أضف الكود التالي في البوتون

كود :
If TextBox4.Text.Trim = "" Then
                MsgBox("الرجاء ادخال قيمة للبحث عنها", 16 + 524288, "البحث عن قيمة")
                TextBox4.Text = ""
                TextBox4.Focus()
                Exit Sub
            End If

BindingSource1.Position = BindingSource1.Find("iD", TextBox4.Text)

إذا كان تريد البحث بالنص وليس رقم

كود :
BindingSource1.Filter = "Name like '%" & TextBox4.Text & "%'"

تحياتي
---------------
اخي العزيز
لكم مني الف شكر وتقدير والله يحفظكم ويرعاكم

الرد }}}}
تم الشكر بواسطة:
#5
(25-10-13, 09:37 PM)العزابي كتب : طبعاً للبحث .. فيه طرق شي بفلتر وشي لا

أنا بأعطيك بدون فلتر سريع . أضغط دبل كليك على بوتون البحث وانقل الكود كما هو

كود :
BindingSource1.Position = BindingSource1.Find("iD", TextBox4.Text)

إذا كان بودك إعطاء رسالة للمستخدم عند الضغط على زر البحث ولاتوجد قيمة أضف الكود التالي في البوتون

كود :
If TextBox4.Text.Trim = "" Then
                MsgBox("الرجاء ادخال قيمة للبحث عنها", 16 + 524288, "البحث عن قيمة")
                TextBox4.Text = ""
                TextBox4.Focus()
                Exit Sub
            End If

BindingSource1.Position = BindingSource1.Find("iD", TextBox4.Text)

إذا كان تريد البحث بالنص وليس رقم

كود :
BindingSource1.Filter = "Name like '%" & TextBox4.Text & "%'"

تحياتي

--------------------------------------------------------------------------------
اخي العزيز
السلام عليكم ورحمة وبركاته
هناك مشكله انه عند إدخال اي رقم يظهر نتيجة البحث اي سجل يوجد به رقم واحد
السوال هنا
كيف اجعل البحث يكون دقيق في البحث ؟؟
وكيف اجعل البحث عندما يكون السجل غير موجود يظهر رسالة ان السجل غير موجد بقاعدة البيانات؟؟

نا من الله المساعده والله يحفظكم ويرعاكم

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] طلب برنامج لضبط الديون الفارس الشجاع 3 160 11-02-17, 11:09 AM
آخر رد: Amir_alzubidy
  هل يجب دائما تصطيب برنامج sql server managmentعند العميل ؟ djelloul 0 159 19-01-17, 01:11 PM
آخر رد: djelloul
Exclamation [SQL] مطلوب برنامج sql server 2008 CoderMM 2 179 07-01-17, 05:45 PM
آخر رد: CoderMM
  [سؤال] اريد البدء في عمل برنامج متابعه مديونيات ولا اعرف كيف ابداء مروة الشرقاوي 4 270 07-11-16, 04:07 AM
آخر رد: مروة الشرقاوي
Sad [Acces2007] عاجل ارجو المساعدة لدي مشكلة مع برمجة زر البحث في الاكسس saimon 4 323 24-10-16, 07:54 PM
آخر رد: saimon
  اريد اعمل برنامج يخزن اكواد كيف ابراهيم كركوكي 15 639 03-06-16, 11:18 PM
آخر رد: سعود
  مشكله في عملية البحث علي كعبي 12 422 01-06-16, 01:21 AM
آخر رد: علي كعبي
  اريد استبدال الكود المرفق بكود ابسط على ان يعطي نفس النتيجة ledoledo 1 269 02-02-16, 07:07 PM
آخر رد: ledoledo
Question [سؤال] كود البحث طول جدا و بطى alims 6 537 23-01-16, 06:11 PM
آخر رد: alims
  مثال على البحث في جدولين بالداتا قريد sql rookan 6 1,089 12-01-16, 01:17 PM
آخر رد: abdhassan

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


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