jo_2010

السادة الخبراء الافاضل هل يمكن ربط 5 نماذج معا فلى نموذج واحد بحيت ان هناك نموذج رقم واحد هو الاساسى ومرتبط بنموذج 2 ونموذج 3 مرتبط بنموذج2 ونموذج 4 مرتبط بنموذج 3 ويموذج 5 مريبط بنموذج 4 كيف يتم الربط مع العلم اريد هذة النماذج فى النموذج الرئيسى لسهولة ادخال البيانات لكم الشكر

ابوخليل ملعمى الفاضل خالص الشكر على علمك الذى لاتبخل بى على احد شكرا

قمت بتنفيذ الخطوات ولم يحدث اى تغيير

شكرا معلمى الفاضل ابو خليل لكن حاولت كثيرا تغيير الايقونة لا تتغير والبرنامج يطلب عمل ريستارت كيف يتم التغيير

معلمى الفاضل ابوخليل خاص الشكر للقاعدة الرائعة

الخبراء الافاضل بعد التحية كيف اضيف الشكل التجميلى للشجرة كما بالصورة الى القاعدة الخاصة بى مرفق الصورة والقاعدة الخاصة بالصورة Master.accdb

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

اخترتة ولم يظهر معى

قمت بعمل المطلوب ولم يظهر كما بالصورة الاولى Node او Nodes

استاذى الفاضل عمر ضاحى للعلم عندى اوفيس 2016 لابوجد office بداية حرف الO ou

صباح الخير عندى برنامج قمت بتحميلة من هذا الصرح العظيم وبة تظهر كما بالصورة Untitled2 وعند برنامج قمت بعملة عندما اريد اضافة الكود كما بالصورة لا يظهر معى Node Nodes كما بالصورة Untitled كيف اظهرهم فى المكتبة البرمجية

الخبير الفاضل Eng.Qassim بالفعل قمت بتثبيت اوفيس 2016 والبرنامج يعمل بكفاءة شكرا لك

هذا ما اريدة شكرا علي سرعة الاستجابة سو اجرب اوافيك بالنتيجة

اتفضل AAA.accdb

السادة الخبراء الافاضل هل يمكن الجمع فى استعلام تجميعى كما بالصورة

استاذى ابو خليل ويندوز ٧ لايحتوى علي هذة الخاصية اية الحل من وجة نظرك

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

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

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

الخبير الفاضل صاحب الافضال عليا ابوخليل حاولت تطبيق كود فتح النماذج على البرنامج الاصلى لكنة لم يعمل ممكن تصحيح الكود من فضلك خالص الشكر شجرة TREE.accdb

الفاضل ابوخليل اسف لازعاجك

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

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

نموذج رئيسى اسمة cash 3 نماذج فرعية Request subCash Patient_Cash REQ مربع نص غير منضم فى النموذج الرئيسى CASH اريد اختصار لهذا الكود او كتابة بشكل افضل On Error Resume Next If Me.REQ = "*" Then Request.SetFocus DoCmd.GoToRecord , , acNewRec DoCmd.OpenQuery "Add_Cash Request" Me.Request.Requery If DCount("[pcode]", "request", "[pcode]=" & [Forms]![CASH]![Pateint Code] & " and [out_price]>0") Then Me.Request.Form!Yes_LAB = ChrW(10003) Else Me.Request.Form!Yes_LAB = "" End If Me.subCash.Requery Me.Patient_Cash.Requery Me.Request.Form!Yes_LAB = ChrW(10003) DoCmd.GoToRecord , , acLast '------------------------------------------------------------------------------------------------ ElseIf Me.REQ = 0 Then Request.SetFocus DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 0 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate Me.Request.Form!T_Code.SetFocus Me.Request.Form!T_Code.SetFocus DoCmd.GoToRecord , , acNewRec Me.subCash.Requery Me.Patient_Cash.Requery '------------------------------------------------------------------------------------------------ ElseIf Me.REQ = 1 Then Request.SetFocus DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 1 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate Me.Request.Form!T_Code.SetFocus DoCmd.GoToRecord , , acNewRec Me.subCash.Requery Me.Patient_Cash.Requery '------------------------------------------------------------------------------------------------ ElseIf Me.REQ = 2 Then Request.SetFocus DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 3 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 4 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate Me.Request.Form!T_Code.SetFocus Me.Request.Form!T_Code.SetFocus DoCmd.GoToRecord , , acNewRec Me.subCash.Requery Me.Patient_Cash.Requery '------------------------------------------------------------------------------------------------ ElseIf Me.REQ = 3 Then Request.SetFocus DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 3 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate Me.Request.Form!T_Code.SetFocus DoCmd.GoToRecord , , acNewRec Me.subCash.Requery Me.Patient_Cash.Requery '------------------------------------------------------------------------------------------------ ElseIf Me.REQ = 4 Then Request.SetFocus DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 4 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate Me.Request.Form!T_Code.SetFocus DoCmd.GoToRecord , , acNewRec Me.subCash.Requery Me.Patient_Cash.Requery '------------------------------------------------------------------------------------------------ ElseIf Me.REQ = 5 Then Request.SetFocus DoCmd.GoToRecord , , acNewRec Request.Form!T_Code = 5 Me.Request.Form!IN_price = Me.Request.Form!IN_Lab Me.Request.Form!Out_price = Me.Request.Form!Out_lab Me.Request.Form!TName_R = Me.Request.Form!TName Me.Request.Form!Date_R = Me.Request.Form!DDate Me.Request.Form!T_Code.SetFocus DoCmd.GoToRecord , , acNewRec Me.subCash.Requery Me.Patient_Cash.Requery END IF كيف اوقف اهتزاز عناصر النموذج نموذج CASH ية صورة عند تحديت REQ تختفى الصورة للحظات وتعطى خلفية بيضاء ثم تعود الصورة مرة اخرى هل يوجد حل لهذة المشكلة

خالص الشكر للمساعدة