تقييم الموضوع :
  • 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 172 11-02-17, 11:09 AM
آخر رد: Amir_alzubidy
  هل يجب دائما تصطيب برنامج sql server managmentعند العميل ؟ djelloul 0 177 19-01-17, 01:11 PM
آخر رد: djelloul
Exclamation [SQL] مطلوب برنامج sql server 2008 CoderMM 2 204 07-01-17, 05:45 PM
آخر رد: CoderMM
  [سؤال] اريد البدء في عمل برنامج متابعه مديونيات ولا اعرف كيف ابداء مروة الشرقاوي 4 292 07-11-16, 04:07 AM
آخر رد: مروة الشرقاوي
Sad [Acces2007] عاجل ارجو المساعدة لدي مشكلة مع برمجة زر البحث في الاكسس saimon 4 343 24-10-16, 07:54 PM
آخر رد: saimon
  اريد اعمل برنامج يخزن اكواد كيف ابراهيم كركوكي 15 721 03-06-16, 11:18 PM
آخر رد: سعود
  مشكله في عملية البحث علي كعبي 12 461 01-06-16, 01:21 AM
آخر رد: علي كعبي
  اريد استبدال الكود المرفق بكود ابسط على ان يعطي نفس النتيجة ledoledo 1 279 02-02-16, 07:07 PM
آخر رد: ledoledo
Question [سؤال] كود البحث طول جدا و بطى alims 6 545 23-01-16, 06:11 PM
آخر رد: alims
  مثال على البحث في جدولين بالداتا قريد sql rookan 6 1,109 12-01-16, 01:17 PM
آخر رد: abdhassan

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


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