النجاشي

وافي ما قصرت الحمدلله نلت المطلوب كثر الله خيرك أستاذنا الغالي السموحة تعبتك معي تحياتي

استاذي الغالي اسال الله ان يرفع قدرك المثال الاخير مرضي لي غصبا عني ههههه لانه ما شاء الله جميل جدا فاسال الله أن ينور دربك ويزيدك علما وينفع بك الاسلام والمسلمين كان لى هذا الطلب كابوس لي منذو فتره طويله لانه الاكسس تعرف اذا في تلوين السجلات يكون في اهتزاز أما بالويب شي لايوصف فكيف نجزيك إلا أن تدعي لك دعوه في ظهر الغيب فانت فخرا لنا وتاج رووسنا دوما وانت تبذل جاهدا ترضي تلاميذك وتحقق لهم ما يتمنون فهذا من طيب اصلك ا فألف تحيه اليك يالغالي مشكورررررررر

استاذي الغالي قمت بايقاف الاتي Option Explicit في الوحده النمطيه MWebData فهل هي ضروري تشغليها تو ممكن توضح لي عملهOption Explicit بارك الله فيك

استاذي الفاضل عندما اريد البحث لما ادخل حرف يفتح لي صفحه الاكواد ويوشر علي خرف I بهذا السطر For I = 0 To Rs.Fields.Count - 1

معذرتا استاذي تقصد هل النت له دور الغيت الحدث وصار النموذج يفتح مايه في الميه رفع الله قدرك يابو ابراهيم ولكن بقي عندالبحث المشكله اعذرني يالغالي والسموحه منك لكن انا قلت قد ربما يحل مشكله التاخير في البحث والتعليق اعذرني طالب يحاول يتعلم وانتم فخرنا ونتعلم بكم حفظك الله ورعاك استاذي الغالي

استاذي الفاضل الله يعطيك العافيه لي ملاحظه عندما يكون في عدد كبير من السجلات مثلا جربت 500 سجل وجدت عند فتح النموذج بطي في الاقلاع وعند البحث يعلق هل ممكن نخفي السجلات الذي ليس لها لون عند البحث مثلا لانه كانه الحظ اهتزاز نوعا ماء السموحه يالغالي لو غلبتك حفظك الله ورعاك استاذنا ابو ابراهيم تحياتي اليك

بارك الله فيك يالغالي مشكوررر علي التوضيح

بالنسبه توظيف ابو ابراهيم للغه البرمجة مبدع قد سبق قام بأعمال لاتوصف خلنا احب مستعرض الويب بارك الله فيه ممكن نقول إذا لم أكن مخطئ هو الوحيد معانا بالمنتدى خبره بالويب بارك الله فيكم

استاذي الفاضل رفع الله قدرك انه عمل رائع زاداك الله علما يالغالي جميل جدا وكما قلت اشكاليه التنقل باسهم الكيبورد لكن باذن الله نجد لها حلها اما بالنسبه لعناوين البيانات تختفي عند رفع الصفوف لاعلي فما رايك اذا نخفي العناوين ونحط لها مسميات براس النموذج ثابته والله لي فتره احلم بهذا لانه النماذج المستمرة بالاكسس اذا نعطيها لون تبقي تهتز اما بالويب جميل جدا افرحتنا الله يفرحك ينور دربك باذن الله تتمل الفرحه قريبا بحاول انا من جهتي والزملاء ما بيقصرون ان شاء الله تتم الامور واستاذنك اذا لديك الفرصه يالغالي شرح مختصر لكودك كي احاول واغوص هنا وهناك لعلا تنحل مشكله اسهم الكيبورد بس اريد افهم الكود Dim TR As HTMLTableRow If Not WD.activeElement.tagName = "body" And _ Not WD.activeElement.tagName = "div" Then For Each TR In WD.getElementsByTagName("tr") TR.Style.background = "" Next With WD.activeElement.parentElement .Style.background = "lightgreen" End With End If تحياتي يالغالي

استاذي الفاضل الله يعطيك العافيه وصلت الفكره كوني اجهل الفرق بين التصفيه والبحث اعذرني يالغالي وصلت المعلومه الان طيب المطلوب البحث في البيانات والسجل الذي فيه البيانات يعطيه لون ازرق مثلا كما في المرفق التالي وجدته في مكتبتي لاستاذنا الغالي ابو ابراهيم كونه اسهل لي من السابق وهو قريب من المطلوب جدا يكون البحث بالمربع الخصص للبحث ويكون بحدث عند التغير الكود وليس عن طريق زر امر ببكل الحقول اذا امكن اي الاسم والرقم والتحرك باسهم الكيبورد اعلا و اسفل يظلل السجل الحالي تحياتي اليك اليك المرفق مثال ابو ابراهيم.accdb

السلام عليكم ورحمة الله احبتي الكرام وجدت هذا المثال لاستاذنا الفاضل@ أبو إبراهيم الغامدي مثال رائع اريد عند البحث بحقل البحث يظلل لي كامل السجل تحياتي احبتي DB2.rar

حفظك الله يالغالي في مثال لي لأستاذنا الغالي ابو إبراهيم راح ادور عليه ارفقه قريب من مثالك باذن الله ارفق في اقرب فرصه تحياتي

غلبتك استاذي الغالي السموحه الفكره قربت تتحقق الان صار يتنقل بالاسهم لكن المطلوب عندما يكون موشر التركيز بحقل البحث وقمت بضغط الاسهم الاعلى أو الاسفل يتنقل بين السجلات من دون ما يخرج موشر الموس من مربع البحث واللون يكون على السجل الحالي أن شاء الله تكون وصلت الفكره تحياتي يالغالي

بارك الله فيك استاذي الغالي صار البحث تمام مبدع طلب صغير اذا لديك الفرصة استاذي الغالي كي تكمل الفرحة تلوين السجل الحالي عند البحث وعند التنقل باسهم الكيبورد لاعلا واسفل

بارك الله فيك ما قصرت يالغالي اتوقع من الاعدادات تبع الامان بالاكسس