ابو جودي

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

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

شكر الله لكم حسن صنيعكم وقضاء حوائج اخوانكم واجزل لكم العطاء ان شاء الله على ما تقدمونه من جهد وعطاء

اضم صوتى لاخى الحبيب شيفان فضلا قم بارفاق المرفق الذى يحتوى على هذه المشكله تسهيلا على الاخوة والاساتذة ممن يريد تقديم المساعدة لحضرتك

ممكن استسمح حضرتك فى مرفق من القاعدة التى بها هذه المشكله ان شاء الله رب العالمين قد يكون عندى لهذه المشكلة حل بامر الله

طيب استاذى الحبيب انا وجدت هذا المثال الان على احد المواقع الاجنبية ولكن لم اتحقق بعد من الاكواد والية العمل وهذا ما كنت افكر فيه بنفس الطريقة لا اكثر ولا اقل ففكرت فى وضع المثال كما هو ReportExample112007.zip

استاذنا الحبيب ومعلمنا القدير انا فى الانتظار لان بصراحة انا بحست مطولا فى هذا الموضوع ولم اصل لشئ

نعم اقصد تلك الطربقة ان شاء الله

اللهم ارزقنا حسن الخاتمة اللهم نجنا من عذاب القبر اللهم اجعل قبورنا روضة من رياض الجنة يارب العالمين اللهم امين امين امين

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

استاذى الحبيب اولا كلنا نريد الفائدة لذلك ننتظرها بلهفة مشتاق ثانيا انا قرات فى مشاركة حضرتك حجات اول مره اسمع عنها ثالثا اتمنى بدون اثقال على حضرتك مثال بالطريقة الفضلى اللى حضرتك ذكرتها لان عاوز اشوف شكل الكود

ههههههههههههههه ربنا ما يحرمنا من لمساتك الرمهانية جزاكم الله خيرا دائما وابدا هناك لمسات رمهانية وادى المرفق الرمهانى Test_2.rar

اعتذر نسيت تعديل بسيط فى العنوان الهيدر والفوتر اثناء التحكم فى اظهارهم واخفائهم من خلال نموذج التحكم واعتذر هن هذا الخطأ ولم استطع تعديل المرفق السابق فقمت برفع المرفق بعد التعديل مرة اخرى rep.rar

جزاكم الله خيرا طيب ممكن طلب انا بصراحة كنت باحاول البحث عنه من تلقاء نفسى دون الرجوع اليكم والاثقال عليكم حياء منكم وبخاصة فى هذا الموضوع ولكن انت البادئ ههههههههه هل هناك طريقة لوضع ذلك التعبير =IIf(IsNull([txtSearch2]),[E_mail],IIf(IsNull([e_mail]),"",Replace([E_mail],[txtSearch2],"<font color=red>" & [txtSearch2] & "</font>"))) فى كود ليصلح لكل الحقول ام يجب عمل تعبير لكل حقل على حدة

السلام عليكم ورحمة الله تعالى وبركاته اساتذتى الافاضل اولا اعتذر لعدم توفير مرفق السؤال بخصوص الشريط التقدمة التفاعلى الــــ "ProgressBar" لو قاعدة البيانات على سيرفر عند تنفيذ استعلام ما يأخر من الوقت حوالى من 15 ثانية الى 30 ثانية حسب كم البيانات التى يتم الفلترة عليها وحسب امكانيات المعالج وبعد المسافة احيانا عن السويتش.... هل يمكن عمل ProgressBar يعمل فى نفس فترة تحضير الركويرى اى يكون مرن بمرونه البدء فى الكويرى وينتهى حسب الانتهاء من الكويري دون التقييد بوقت محدد فى الكود غير ان ال ProgressBar اما يبدا قبل الكويرى او بعد الكويرى هههههه حد فهم حاجة

اخى الحبيب فعلا كلام حضرتك صح بس لو محتاج لون الحرف يتحول للون للاحمر مش راح اقدر استغنى عن السطر التالى من الكود Form_SearchList.txtSearch2.Value = Me.txtSearch2 اعتقد لابد وان يكون لو اردنا الاختزال فى الاكواد Me.txtSearch2.Value = Me.txtSearch.Text Form_SearchList.txtSearch2.Value = Me.txtSearch2 Me.SearchList.Requery

انت انسان رائع

اتفضل ده الاصدار الاول ويخص التحكم فى تقرير محدد مطروح للتجربة وللنقااااااااااااااش جارى العمل على التعديل فى كل التقارير................نسألكم الدعاء.................. rep.rar

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

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

من منا لا يفتقر الا الا الله كلنا فقراء الله

تمام يا استاذه فعلا الموديول مش راح نضيف او نغير او نحذف منه شئ ولا حتى تفكرى تفتحيه تانى كل ما عليكى تغيرى القيم اللى فى الكود على زر الامر بما يتناسب مع الاتى 1- اسم الفورم الهدف والمراد نسخ البيانات اليه نرمز له مثلا ( T ) ثم الدالة IF والتى نستدعى بها الكود من الموديول كما سبق شرحه DoCmd.OpenForm "T" If when_Open_form("frm2") Then 2- اسم النموذج المصدر والذى نريد نسخ البيانات منه نرمز له مثلا بالمرز ( S ) 3- اسماء مربعات النص فى النموذج المصدر نرمز لها مثلا بالمرز ( TXT_S1 , TXT_S2 ) والتى نريد نسخ البيانات منها 4- اسماء مربعات النص فى النموذج الهدف نرمز لها مثلا بالمرز ( TXT_T1 , TXT_T2 ) والتى نريد لصق البيانات المنسوخة فيها [Forms]![T]![TXT_T1] = [Forms]![S]![TXT_S1] [Forms]![T]![TXT_T2] = [Forms]![S]![TXT_S2] وبذلك يصبح الكود DoCmd.OpenForm "T" If when_Open_form("T") Then [Forms]![T]![TXT_T1] = [Forms]![S]![TXT_S1] [Forms]![T]![TXT_T2] = [Forms]![S]![TXT_S2] else endif اعتذر للاطالة

اهاااااااااااا هذا ما اردت التوصل اليه نفس المسار نفس الاسم نفس الامتداد تلك هى المعضلة وهى محور حديثى وفكرتى وزيادة عليها وماذا لو كانت القاعدة على شبكة فى هذه الحالة كيف ستظهر الصورة