تقييم الموضوع :
  • 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 & "%'"

تحياتي

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

نا من الله المساعده والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة من اخوتي برنامج مبيعات سوبرماركت التعامل مع اكثر من زبون في نفس الوقت Mokhtar-mako 1 1,309 16-01-21, 08:43 PM
آخر رد: moosa_alabri
  [VB.NET] البحث عن مسار مجلد ضمن قاعدة البيانات اكسس وفتحه من الفورم EMADSSS 1 2,270 21-02-19, 04:38 PM
آخر رد: elgokr
  مساعدة في برمجة برنامج samira20 1 1,664 21-02-19, 02:56 PM
آخر رد: elgokr
  [سؤال] طلب برنامج لضبط الديون الفارس الشجاع 4 2,923 01-04-18, 04:40 PM
آخر رد: أبوبكر سويدان
  مساعدة في عمل برنامج على سيرفر aftfm 0 1,591 01-02-18, 12:51 PM
آخر رد: aftfm
  مشكلة في كود البحث Search khaled12345 5 3,131 16-07-17, 08:22 PM
آخر رد: سعود
  [سؤال] استفسار عن كود البحث المتعدد Marwan9990 22 8,589 15-07-17, 11:51 AM
آخر رد: أبوبكر سويدان
  البحث في قاعدة البيانات مع تجاهل التشكيل waelalmsry75 16 8,463 03-07-17, 05:04 AM
آخر رد: K39
  هل يجب دائما تصطيب برنامج sql server managmentعند العميل ؟ djelloul 0 1,810 19-01-17, 01:11 PM
آخر رد: djelloul
Exclamation [SQL] مطلوب برنامج sql server 2008 CoderMM 2 2,208 07-01-17, 05:45 PM
آخر رد: CoderMM

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


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