بســم الله الـرحمــن الرحيــم
السلام عليكــم ورحمـة الله وبركاتــة
يااخوان
في المثال المرفق نموذج بحث
واريد بعد البحث في الاستعلام في النموذج معاينة نتيجة البحث على تقرير
انا وضعت هذا الكود التالي
Dim stLinkCriteria As String Dim CurrRec CurrRec = Me.CurrentRecord Me.Recordset.MoveFirst stLinkCriteria = " [Number] Between " & Me![Number] Me.Recordset.MoveLast stLinkCriteria = stLinkCriteria + " AND " & Me![Number] Me.Recordset.MoveFirst Me.Recordset.Move CurrRec - 1 DoCmd.OpenReport "AAA", acViewPreview, , stLinkCriteria
لكن ماضبط معي مايظهر نفس السجلات التي ظهرت بعد البحث في التقرير احيانا تكون زائد
اما اذا ظهرت نتيجه البحث عن سجل واحد فهي تظهر في التقرير
اما اذا كانت نتيجه البحث اكثر من سجل ثلاثه او خمسه تظهر زائده
ماادري وين الخطاء
ارجو المساعده يااخوان
بارك الله فيكم وجزاكم الله خير
احترامي وتقديري
