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

تحياتي

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

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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] اريد البدء في عمل برنامج متابعه مديونيات ولا اعرف كيف ابداء مروة الشرقاوي 4 107 07-11-16, 04:07 AM
آخر رد: مروة الشرقاوي
Sad [Acces2007] عاجل ارجو المساعدة لدي مشكلة مع برمجة زر البحث في الاكسس saimon 4 124 24-10-16, 07:54 PM
آخر رد: saimon
  اريد اعمل برنامج يخزن اكواد كيف ابراهيم كركوكي 15 446 03-06-16, 11:18 PM
آخر رد: سعود
  مشكله في عملية البحث علي كعبي 12 245 01-06-16, 01:21 AM
آخر رد: علي كعبي
  اريد استبدال الكود المرفق بكود ابسط على ان يعطي نفس النتيجة ledoledo 1 181 02-02-16, 07:07 PM
آخر رد: ledoledo
Question [سؤال] كود البحث طول جدا و بطى alims 6 407 23-01-16, 06:11 PM
آخر رد: alims
  مثال على البحث في جدولين بالداتا قريد sql rookan 6 789 12-01-16, 01:17 PM
آخر رد: abdhassan
  [سؤال] برنامج لحجز المواعيد VB.NET 3 486 27-12-15, 06:04 PM
آخر رد: VB.NET
  [VB.NET] افضل لغة برمجة قاعدة البيانات علي انور 3 465 02-09-15, 02:47 AM
آخر رد: مبرمج بلا حدود
Question [سؤال] كيف اربط قاعدة البيانات اكسس مع برنامجي المرفق برمجياً ؟ Microformt 6 708 26-08-15, 07:41 PM
آخر رد: Microformt

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


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