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

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


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