فراس رؤوف قام بنشر يونيو 11, 2017 مشاركة قام بنشر يونيو 11, 2017 مرحبا اريد من مربع النص اظهار نتائج البحث مع تجاهل الفراغات الي ال space مثلا( مكتب مدير البلدية ) او( مكتبمدير البلدية ) فانه لا يظهر كلا الحالتين اي لا يقوم بالتفريق بين الفراغات في مكتب مدير او مكتبمدير المثال المرفق b.rar رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر يونيو 11, 2017 مشاركة قام بنشر يونيو 11, 2017 اتفضل اليك هذا الحل اولا في الاستعلام انا اضفت لكل حقل حقل اخر بهذه الصيغة b1: Replace(Nz([b];"");" ";"") لكي يحذف جميع الفراغات للحقل وبعدين اضفت مربع نصي في النموذج باسم text44 وعطيت هذا الكود لمربع البحث text0 بعد تحديث Private Sub TEXT0_AfterUpdate() Me.Text44 = Replace(Nz(Me.TEXT0, ""), " ", "") End Sub وحذفت الشرط في الاستعلام من الحقول الاصلية وعطيت الشرط للحقول اللي انا عملته بدو مسافات وهذا هو الشرط Like "*" & [Forms]![FORM1]![Text44] & "*" وايضا اضفت لزر تصفير البحث هذا الكود Private Sub Command13_Click() Me![TEXT0] = Null Me![Text44] = Null Me.Requery End Sub والكود زر البحث خليت كما هو Private Sub COMMAND2_Click() Me.Requery End Sub والان اكتب النص بمسافة او بدون مسافة سيتم حذف المسافات ويبحثه اليك قاعدة بياناتك بعد تعديل b.rar 3 1 رابط هذا التعليق شارك More sharing options...
فراس رؤوف قام بنشر يونيو 22, 2017 الكاتب مشاركة قام بنشر يونيو 22, 2017 شكرا جزيلا مع التحية رابط هذا التعليق شارك More sharing options...
فراس رؤوف قام بنشر أغسطس 27, 2017 الكاتب مشاركة قام بنشر أغسطس 27, 2017 ممكن ايضا التعديلعند البحث ان يتم تجاهل التغيرات فى حرف الالف ( ا-أ-إ-آ ) وكذلك الياء ( ى - ي ) وكذلك الهاء ( ه - ةفي حقل الاسم والعنوان والاختصاص فقط بحيث تظهر كافة النتائج للحروف الثلاث وشكراجزيلا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان