منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - طلب تعديل على كود البحث بأي حرف في حقلين

السلام عليكم ،،،

طلب بسيط ان شاء الله تعديل ع كود البحث Smile

أرغب بتعديل الكود الحالي لكي يقوم بالبحث في حقلين بأي حرف في الحقل

كود :

   rs.Open "SELECT * FROM tabel1", db2, adOpenStatic, adLockOptimistic

   rs.Filter = "[name]" & "Like '*" & Text1 & "*'"]

شاكر ومقدر لكم Smile

السّلام عليكم و رحمة الله و بركاته
أتمنّى يكون هذا المطلوب .. وهذا من خيرات أخي و أستاذي الغالي " أحمد منصور "
جزاه الله خير الجزاء حاضرًا و غائبًا
تحياتي

كود :

Set RS = DB.OpenRecordset("Select * From Tabel1 Where ID=" & Val(Trim$(Text1.Text)) & " Or Name Like '" & Trim$(Text2.Text) & "*'")

يعطيك العافية عبد العزيز البسكري

للأسف ما ضبط معاي الكود

يوجد خطأ تعارض بالكود Sad

(22-12-16, 10:37 PM)الطايش كتب : [ -> ]يعطيك العافية عبد العزيز البسكري

للأسف ما ضبط معاي الكود

يوجد خطأ تعارض بالكود

ضع مثال واضح وانشاء الله نضبطه

أهلا أخي الكريم , جرب هذا التعديل :

PHP كود :

RS.Open "SELECT * FROM tabel1", db2, adOpenStatic, adLockPessimistic
      
RS.Filter = "[name1] LIKE '%" & Trim$(Text1.Text) & "%' And [name2] LIKE '%" & Trim$(Text1.Text) & "%'" 

ولإلغاء الفلتر ضع قيمة الفلتر تساوي لاشئ هكذا :

PHP كود :

RS.Filter = adFilterNone 

للأسف ما ضبط معاي Sad

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

واعتذر ع الاطاله Blush

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

كود :

   Rs.Filter = "[name]" & "Like '*" & Text1 & "*'or [mum]" & "Like '*" & Text2 & "*'"

او انظر المرفقات

يسعدك ربي التعديل حسب المطلوب Smile

الله يعطيك العافية

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

الطايش

عبد العزيز البسكري

الطايش

sendbad100

Ahmed_Mansoor

الطايش

sendbad100

الطايش