اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تعديل المرفق ليتم البحث في جميع حقول النموذج الفرعي


إذهب إلى أفضل إجابة Solved by husamwahab,

الردود الموصى بها

السلام عليكم

اساتذتي الافاضل ارجو منكم التعديل على كود البحث في النموذج الرئيسي frmSearch في حقل txtSearchText

ليبحث في جميع الحقول في النموذج الفرعي frmSearch_Sub

ولم جزيل الشكر 

Search&Sort.rar

رابط هذا التعليق
شارك

ظهر هذا الخطأ الذي باللون الاحمر

         strFilter = strFilter & " or " & FieldName & " Like '" & SearchText & "'"
       Next i
         Set Cntl = Me.Controls(Me.CmbSubforms).Form.Controls(Me.CmbFields.ItemData(1))
          FieldName = "[" & Cntl.ControlSource & "]"
          Rst.Filter = FieldName & " Like '" & SearchText & "'" & strFilter
          Set Rst = Rst.OpenRecordset
 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information