البحث فى قاعدة بيانات sql 2000 من خلال vb6

يا مشرفين المنتدى الا من مساعد الا من مغيث

السلام عليكم

لقد حاولت ان ارفق قاعدة في جهازي ولكن هناك مشكلة

المهم من خلال الكود المستخدم في البحث جرب اولا عمل لكل حقل بحث واقصد

where name like '%" & me.text1 & "%' and age like '%" & me.text2 & "%'

وذلك قبل دمج سلسلة

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

السلام عليكم

سهلة باذن الله

ارفق هنا كود البحث اي انسخة في هذا الموقع

السلام عليكم

لقد ارفقت قاعدة البيانات

بالنسبة للحقول هناك حقل code هو integer والحقول الاخرى مختلفة

الافضل برمجيا ان يكون هناك حقل واحد مثلا كود الشخص للبحث او تقوم بفصل

الشرط كما قلت لك سابقا

غير الشرط في جملة الاستعلام واجعله فقط بشرط الكود للتاكد من عمله

استاذى العزيز كود البحث استخدمه تحت زر بحث فى واجهة فيجوال بيسك فما الداعى إلى الكود السابق

هذا هو كود البحث الذى استخدمه والذى به الخطأ

If rs.State = adStateOpen Then rs.Close
         rs.Open "SELECT * FROM [gen] WHERE [code]& [num]& [kind]& [source]& [tex]&[notes] LIKE '%" & Trim(Text8) & "%'", db, adOpenStatic, adLockPessimistic
   Text1 = ""

ما فيش حد قادر يساعدنى يا جماعة

تفضل أخي الكريم

If rs.State = adStateOpen Then rs.Close
rs.Open "select * FROM [gen] WHERE LIKE '%" & Trim(Text8) & "%' or [num] LIKE '%" & Trim(Text8) & "%' Or [kind] LIKE '%" & Trim(Text8) & "%' Or [source] LIKE '%" & Trim(Text8) & "%' Or [tex] LIKE '%" & Trim(Text8) & "%' Or [notes] LIKE '%" & Trim(Text8) & "%'", db, adOpenStatic, adLockPessimistic

والله الموفق

ابو حمد