السلام عليكم_ عاوز اعمل زر بحث موش عارف ليه انتو موش بتتكلمو ع زر البحث

السلام عليكم أخي العزيز ورحمة الله وبركاته

موضوع البحث في VB.NET هو من أسهل المواضيع على الإطلاق، يكفي فقط التعرف على  المبدأ والباقي عليك أخي، وأقصد بالباقي الإبداع وهذا يتطلب منك فهم الكود وليس حفظ الكود، فالبحث يمكن أن نطلق عليه مثلا تسمية التشابه أو التطابق بين القيم، بحيث إذا كانت متطابقة أو متشابهة يقوم باستدعائها من خلال دمج قيم التطابق لتصبح قيمة واحدة ويعرضها للمستخدم النهائي بقوالب متعددة.

وشكرا

اخي السائل

لقد شرحنا موضوع البحث مراراً وتكرارا ق يالمنتدي بالامثلة في موضوعات كثيرة

طريقة عمل البحث داخل DataGridview

مثال للمبتدئين لعمليات ( الحفظ - الحذف - التعديل - البحث )

البحث ما بين تاريخين في DataGridview

انا مفهمتش حاجه 
انا لسه كى  جى ون فى الفيجول 
ياريت حضرتك تطبقلى على مثال الاكسس اللى فوق   
وانا من خلال التطبيق هفهم 
يعنى حضرتك انا بعد اما عملت اتصال فى النموزج وحطيته فى الفيجول وعملت الــ 3  مرباعت التكست بوكس وكله تمام باقى انى اعمل زر البوتن بتاع البحث (( ازاااااااااااااااااااااااااى ) 

:thinking:  :thinking:  :thinking:  :thinking:  :thinking:  :tbsweat:  :tbsweat:  :tbsweat:  :tbsweat:  :tbsweat:  :tbsweat:  :tbtired:  :tbtired:  :tbtired:  :tbtired:  :tbtired:  :tbtired:  :tbtired:  :tbtired:  :tbtired:

السلام عليكم أخي العزيز ورحمة الله وبركاته

لنفترض أننا قمنا بإنشاء جدول في قاعدة بيانات أكسس بعنوان Person  وهذا الجدول يحتوي على الحقول التالية:

- ID   نوع البيانات AutoNumber

- FirstName  نوع البيانات Text

- LastName نوع البيانات Text

- Address نوع البيانات Text

وهكذا قد انتهينا من المرحلة الأولى وهي إنشاء قاعدة بيانات من نوع أكسس تحتوي على جدول يضم الحقول التي ذكرناها أعلاه.

في المرحلة الثانية، نقوم بإنشاء مشروع جديد في VB.Net ثم نقوم باستدعاء قاعدة بيانات أكسس من خلال DataSource.

نقوم بسحب الجدول Person من نافذة DataSource إلى النموذج على شكل datagrid.

نقوم بإدراج مربع نص عدد 4 من مربع الأدوات ToolBox و Label عدد 4.

نقوم بإدراج زر أمر بعنوان Search

نقوم بإدراج زر أمر ثاني بعنوان Reset

نسمي مربعات النصوص :

- مربع النص الأول : txtID

- مربع النص الثاني : txtFname

- مربع النص الثالث : txtLname

- مربع النص الرابع : txtAddress

نسمي Labels :

التسمية الأولى : ID

التسمية الثانية : FirstName

التسمية الثالثة : LastName

التسمية الرابعة : Address

بعد أن قمنا بتأمين كافة إحتياجات المشروع ننتقل إلى المرحلة المهمة وهي إضافة الأكواد.

أولا سوف نضيف الأكواد على زر الأمر Search بحيث أن هذا الزر سوف يقوم بتنفيذ إجراء البحث من خلال القيم التي سوف نضعها في مربعات النص.

إضافة الكود لزر الأمر Search:

me.PersonBindingSource.Filter = "ID = " txtID.Text
Me.PersonBindingSource.Filter = "FirstName like '" txtFname & "%' and LastName like '" & txtLname & "%' and Address like '" & txtAddress & "%'"  .....Finished

ثم نضع الكود التالي في زر الأمر Reset:

Me.PersonBindingSource.Filter = String.Empty

أتمنى أن أكون قد أوصلت الفكرة

أمنى لك التوفيق والنجاح

مع تحيات الأخ خضر

تسلم يا كبير انا هنفذ الشرح الاكتر من رائع والوافى كمان 
وان شاء الله هارد على حضرتك  بالنتيجة 

ومبدئيا انا شاكر لك مساعدتى وربنا يكرمك الفردوس الاعلى يارب 

السلام عليكم ورحمة الله 
اخى الفاضل بارك الله فيك انا نفذت خطواتك كما  ذكرت حضرتك ولكنى صادفتى مشكله فى الاكواد التى كتبتها حضرتك 
واعترض على  (( txtID.Text ))
وايضا اعترض على (( txtFname & "%' and LastName like '" & txtLname & "%' and Address like '" & txtAddress & "%'"  .....Finished )) 

هل الخطاء فى الاكواد ام ماذا 
وهذه صورة الرسالة 
http://www.gulfup.com/?Z2BZMa

http://im80.gulfup.com/EGMRra.jpg

Me.PersonBindingsource.Filter = " ID like ' " & ID & " ' "

Me.PersonBindingSource.Filter = " FirstName like & ' " txtFname & " % ' and LastName like ' " & txtLname & " % ' and Address like ' " & txtAddress & " % ' "

Khodor1985 كتب:

 

Me.PersonBindingsource.Filter = " ID like ' " & ID & " ' "

Me.PersonBindingSource.Filter = " FirstName like & ' " txtFname & " % ' and LastName like ' " & txtLname & " % ' and Address like ' " & txtAddress & " % ' "

 

نفس المشكله بيدينى اعتراضه فى السطر الاول على ID 

واعتراضه على السطر التانى كله 

تفضل أخي العزيز المثال 

المرفق 

WindowsApplication12.rar

توضيح المثال بالفيديو

الرابط http://youtu.be/2-Kq54CARL8

السلام عليكم ورحمة الله وبركاته 
اخى واستاذى الفاضل الكريم 
بارك الله فيك على الشرح الوافى 
واحب انوه لحضرتك انى والله يشهد بانى لم ازعل من حضرتك نهائى بل بلعكس انى فى قمة احراجى منك حينما اقول لك فى المرات السابقة بان الاكواد لم تعمل معى 
ووالله انى احبك فى الله 
ويكفى اخى الفاضل العزيز بان حضرتك قد قمت بالرد على سؤالى حتى وان لم اكون وصلت لهدفى فا ردك على سؤال وسام على صدرى وتقيم لى 
وربنا يجزيك عنا كل الخير يارب ويكرمك الخير كله 
بخصوص المثال انا هجرب واشوف 
وسامحنى انتى يا اخى الفاضل الكريم على جهلى بالفجوال بيسك  ... فا انا لسه مبتدء 
وربنا يجزيك خير