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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [كود] طلب تعديل على كود البحث بأي حرف في حقلين (/showthread.php?tid=18528)



طلب تعديل على كود البحث بأي حرف في حقلين - الطايش - 22-12-16

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

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

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


                     
كود :
   rs.Open "SELECT * FROM tabel1", db2, adOpenStatic, adLockOptimistic

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

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


RE: طلب تعديل على كود البحث بأي حرف في حقلين - عبد العزيز البسكري - 22-12-16

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

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




RE: طلب تعديل على كود البحث بأي حرف في حقلين - الطايش - 22-12-16

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

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

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


RE: طلب تعديل على كود البحث بأي حرف في حقلين - sendbad100 - 23-12-16

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

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

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

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


RE: طلب تعديل على كود البحث بأي حرف في حقلين - Ahmed_Mansoor - 23-12-16

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

PHP كود :
RS.Open "SELECT * FROM tabel1"db2adOpenStaticadLockPessimistic
      
RS
.Filter "[name1] LIKE '%" Trim$(Text1.Text) & "%' And [name2] LIKE '%" Trim$(Text1.Text) & "%'" 

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

PHP كود :
RS.Filter adFilterNone 



RE: طلب تعديل على كود البحث بأي حرف في حقلين - الطايش - 23-12-16

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

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

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


RE: طلب تعديل على كود البحث بأي حرف في حقلين - sendbad100 - 23-12-16

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


كود :
   Rs.Filter = "[name]" & "Like '*" & Text1 & "*'or [mum]" & "Like '*" & Text2 & "*'"
او انظر المرفقات


RE: طلب تعديل على كود البحث بأي حرف في حقلين - الطايش - 24-12-16

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

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