co2002co قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 اريد ان اعمل قائمة مفضله لك طبيب تكون اختياريه بالنسبه له يعني مثلا اطباء الاسنان ادويتهم محدوده جدا ف مش فاضي يجلس يبحث عن جميع الادويه فيختار و قائمه مخصصه له باسم المستخدم تبعه Medication.rar
jjafferr قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 وعليكم السلام اذا كان عندك جدول اسماء المستخدمين ، فأضف حقل في الجدول بالتخصص ، مثل اسنان و باطنية وووو ، ثم تذهب الى جدول الادوية ، وتضيف حقل التخصص ، وتكتب امام كل دواء تخصصه ، واذا كان للدواء اكثر من تخصص ، اعمل فاصلة بين التخصصات ، وعند دخول المستخدم وفتحه نموذج الادوية ، فيجب ان تضيف معيار على نموذج الادوية (طبعا الاستعلام اللي هو مصدر هذا النموذج) واستخدم الامر Like ، بتخصص المستخدم ، عليه ستكون الادوية لتخصصه فقط جعفر 1
co2002co قام بنشر أبريل 7, 2016 الكاتب قام بنشر أبريل 7, 2016 السلام عليكم ورحمة الله وبركاته مساء الخير كلام حلو لكن ما ابي بس يكون الشي مني انا ابي الطبيب هو الي يختار ادويته بنفسه مو ضروري يكون طبيب متخصص قدر يكون طبيب طوارئ ويستخدم فرضا 20 دواء بشكل مستمر وايضا بامكانه استخدام باقي الادويه الطرريقه الي انت تفضلت فيها مهمه جدا للادوية ذات التخصص بحيث لا يراحها ولا يصرفها الا الطبيب المختص
jjafferr قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 وعليكم السلام في هذه الحالة ، في جدول الادوية ، اضف خانتين ، اسم الدكتور ، والمفضلة (نعم/لا) ، والدكتور يستطيع ان يختار ادويته المفضلة من نموذج الادوية ، ويكون في اعلى النموذج خانه غير مضمنه (علامة صح مثلا) ، باسم "الادوية المفضلة" مثلا ، فعندما يختارها الدكتور (صح) ، تعطيه اسماء الادوية المفضلة ، واذا كانت (غير مؤشر عليها) تعطيه كل الادوية جعفر 1
co2002co قام بنشر أبريل 7, 2016 الكاتب قام بنشر أبريل 7, 2016 انا افضل اعمل نموذج باسم مفضله نفس نموذج Medication حاولت انسخ نفس الاكواد مع بعض التغيير تحصل معي مشكله طيب وش رايك ارفق القاعده ونشتغل عليها سوى admin admin 1 1 2 2 ER12345678.rar
jjafferr قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 انا عادة احب ان اشتغل واشوف كل شئ امامي مرة واحدة ، مب انتقل من نموذج الى آخر خلينا على طريقتي ، بس ارفق قاعدة بياناتك اللي فيها المستخدمين كذلك. جعفر
co2002co قام بنشر أبريل 7, 2016 الكاتب قام بنشر أبريل 7, 2016 الي حبيت اعمله هو انه يكون عند الطبيب خيار عمل قائمه مفضله خاصه فيه مأخوذه من النموذج الاساسي medication وبنفس الوقت بامكانه استخدام كلا النموذجين في شي ثاني لما اعمل تحديث للصفحه او النماذج ( اقفال الكل ) فان اسم الطبيب يعمل خروج نهائي هل في كود عند التحديث يبقي الطبيب كمستخدم ( يخلي اسمه طالع في الطباعه وفي الجداول )
jjafferr قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 نفس الفكرة اللي انا طرحتها من البداية ، لكنك تريدها بنموذجين ، وانا اريدها بنموذج واحد جعفر
jjafferr قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 انا ابديت رأيي ، وبما ان البرنامج لك ، فاختر ما شئت
co2002co قام بنشر أبريل 7, 2016 الكاتب قام بنشر أبريل 7, 2016 ما خاب من استشار انا جاتني فكره ان في نفس نموذج medication اعمل نموذج جنبه واقدر انقل الادويه له عن طريق الاختيار والاثنين اقدر انقل منهم الادويه الى النموذج الفرعي بس هل بالامكان الاحتفاظ بالنموذج لكل طبيب على حده اما عن طريق السحب او عن طريق السهم DragDrop.rar
co2002co قام بنشر أبريل 7, 2016 الكاتب قام بنشر أبريل 7, 2016 السلام عليكم ورحمة الله وبركاته اسعد الله مسائكم بكل خير حاولت اعملها بنفس الطريقه الي قلت لك عليها بس ممكن تعلمني انا فين اخطات Medication1.rar
jjafferr قام بنشر أبريل 7, 2016 قام بنشر أبريل 7, 2016 7 ساعات مضت, jjafferr said: خلينا على طريقتي ، بس ارفق قاعدة بياناتك اللي فيها المستخدمين كذلك. قاعدة بياناتك مافيها جدول المستخدمين!! 5 ساعات مضت, co2002co said: اعمل نموذج جنبه واقدر انقل الادويه له عن طريق الاختيار فكرتي تحتاج الى حقل للمستخدم ، وحقل للمفضلة ، بينما فكرتك تعمل نسخة من كل سجل لمفضلة كل دكتور !! 7 ساعات مضت, co2002co said: هل في كود عند التحديث يبقي الطبيب كمستخدم ( يخلي اسمه طالع في الطباعه وفي الجداول ) طبعا يبقى في الجدول ، وإلا كيف ادخلت اسماء الاطباء ؟ جعفر
co2002co قام بنشر أبريل 7, 2016 الكاتب قام بنشر أبريل 7, 2016 السلام عليكم ورحمة الله وبركاته سيد جعفر القاعده موجوده ER12345678 راح ارفقها من جديد ER12345678.rar انا الي قصدته يعد عمل التصفيه وامر الطباعه عملت رز اغلاق لجميع النماذج المفتوحه وفتح النموذج الأساسي ل بداية وصفه جديده بس عند الطباعه لا يضهر لي اسم المستخدم الا اذا عملت خروج ودخلت مرة اخرى الي عنيته هل في كود لاغلاق النماذج من دون اخراج المستخدم بحيث تجدد الوصفه بنفس المستخدم واضح ان الكود الي استخدمه يعمل خروج نهائي عشان كذا سالت
jjafferr قام بنشر أبريل 15, 2016 قام بنشر أبريل 15, 2016 سيدي الفاضل من الخطأ ان تبدا اسم الكائنات برقم ، او اسم حقل ، واتذكر في احد المنتديات الاجنبية ، كنت وسط أفضل المبرمجين ، وجاءنا سؤال في المنتدى ، وكان احد جداوله يبدا برقم ، ولم نفلح في الوصول الى حل (مع ان السؤال ما كان بذاك التعقيد) ، ولما تم تغيير اسم الجدول ، تم الحل بسهولة !! . نموذج frm_Favorite: زر Add / Remove هو الذي يضيف المواد الى المفضلة ، وتعرف ان المادة اُضيفت الى المفضلة عندما يصبح لون الخلفية اخضر ، نموذج frm_Medication: عند تشغيل النموذج ، ستظهر لك جميع الادوية ، حيث All سيكون مختار ، وعندما تختار Favorite ، ستظهر لك الادوية المفضلة فقط عندما تريد ان تبدأ من البداية ، يجب ان تستخدم الاستعلام qry_User_All_to_Zero ، حتى يُزيل جميع الادوية المفضلة (طبعا استعمل هذا الاستعلام مرة واحدة وفي البداية فقط) ، عند بدأ البرنامج ، يقوم البرنامج بحفظ رقم المستخدم في وحدة نمطية ، وهذا الرقم متوفر للبرنامج الى اغلاقه ، وستلاحظ في الاستعلام الطريقة التي استعمل هذا الرقم ، وهي: . او في الكود: Me.Add_This_ID = Pass_ID() . وللعلم ، تم إضافة رقم الدكتور الى جميع الوصفات اللي يعملها ، فيعني تستطيع ان تعمل استعلام بإسم الدكتور ، بالاضافة/بدل عن Print_This جعفر 357.ER12345678.accdb.zip 2
co2002co قام بنشر أبريل 16, 2016 الكاتب قام بنشر أبريل 16, 2016 السلام عليكم ورحمة الله وبركاته اسعد الله صباحك بكل خير تعجز الكلمات عن الشكر والامتنان لك تبهرني بساطتك لك مني كل التقدير والاحترام اخوك بدر محمد
co2002co قام بنشر أبريل 16, 2016 الكاتب قام بنشر أبريل 16, 2016 السلام عليكم ورحمة الله وبركاته اسعد الله مسائكم بكل خير كنت وضعت كود ل اخفاء قاعدة البيانات واضهار النماذج فقط لكن بعد التعديل الكود لا يعمل بالشكل الصحيح Global Const SW_HIDE = 0 Global Const SW_SHOWNORMAL = 1 Global Const SW_SHOWMINIMIZED = 2 Global Const SW_SHOWMAXIMIZED = 3 Private Declare Function apiShowWindow Lib "user32" Alias "ShowWindow" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long Function DoAccessWindow(nCmdShow As Long) ' This function can minimize Access behind the scenes. 'Usage Examples 'Maximize window: ' ?DoAccessWindow(SW_SHOWMAXIMIZED) 'Minimize window: ' ?DoAccessWindow(SW_SHOWMINIMIZED) 'Hide window: ' ?DoAccessWindow(SW_HIDE) 'Normal window: ' ?DoAccessWindow(SW_SHOWNORMAL) ' Dim loX As Long Dim loform As Form On Error Resume Next Set loform = Screen.ActiveForm If Err <> 0 Then 'no Activeform If nCmdShow = SW_HIDE Then MsgBox "Cannot hide Access unless a form is on screen" Else loX = apiShowWindow(hWndAccessApp, nCmdShow) Err.Clear End If Else If nCmdShow = SW_SHOWMINIMIZED And loform.Modal = True Then MsgBox "Cannot minimize Access with " & (loform.Caption + " ") & "form on screen" ElseIf nCmdShow = SW_HIDE And loform.PopUp <> True Then MsgBox "Cannot hide Access with " & (loform.Caption + " ") & "form on screen" Else loX = apiShowWindow(hWndAccessApp, nCmdShow) End If End If DoAccessWindow = (loX <> 0) End Function هل هناك اي تعديل عليه
jjafferr قام بنشر أبريل 16, 2016 قام بنشر أبريل 16, 2016 بسبب تجاربي ، انا اوقفته من النموذج Form1 ، فتستطيع تشغيله الآن جعفر
co2002co قام بنشر يناير 12, 2017 الكاتب قام بنشر يناير 12, 2017 السلام عليكم ورحمة الله وبركاته اسعد الله مساءكم بكل خير اريد ان اعمل مفضله ب اسم المريض مرضى الامراض المزمنه ( الله يشافيهم وعافيهم ) لكل مريض قائمه مخصصه له تصرف كل شهر او كل فتره على حسب يعني بدل ما تكون المفضله مخصصه للطبيب فقط تكون في مفضله ثانيه ب اسم المريض او رقم الملف المهم انها تكون تخص المريض مجرد الطبيب يفتح اسم المريض اول مره يخصص له الادويه المخصصه له وفي الزياره التاليه مجرد انه يدخل على اسم المريض زيختار مفضلة المريض راح تطلع عنده الادويه المخصصه له ملاحظه اريد اضافه خيار ايقاف الدواء او السماح باستخدامه مره اخرى مع اجبار الطبيب بكتابة ملاحظه عن سبب الايقاف او السماح بالاستخدام مره اخرى بنفس المفضله المخصصه للمريض حاولت اقلد الطريقه الي عملها لي السيد جعفر ب نموذج frm_Favorite بس واضح ان الموضوع اكبر مني بكثير ف فشلت 357.ER12345678.rar
jjafferr قام بنشر يناير 15, 2017 قام بنشر يناير 15, 2017 في 1/13/2017 at 00:27, co2002co said: ريد ان اعمل مفضله ب اسم المريض مرضى الامراض المزمنه ( الله يشافيهم وعافيهم ) لكل مريض قائمه مخصصه له تصرف كل شهر او كل فتره على حسب يعني بدل ما تكون المفضله مخصصه للطبيب فقط تكون في مفضله ثانيه ب اسم المريض او رقم الملف المهم انها تكون تخص المريض السلام عليكم اخي بدر اعمل جدول المفضلة ، جدول واحد للجميع ، وبه جميع الحقول التي تريدها ، احد الحقول يكون اسم او رقم الشخص ، المريض و الطبيب و... ، وفي النموذج ، عن طريق الاستعلام تفتح بيانات من احببت جعفر
co2002co قام بنشر يناير 15, 2017 الكاتب قام بنشر يناير 15, 2017 السلام عليكم ورحمة الله وبركاته اسعد الله مسائك بكل خير يعني اعمل حقل بالجدول مخصص للمرضى طيب والزحده النمطيه ايش اغير فيها
jjafferr قام بنشر يناير 15, 2017 قام بنشر يناير 15, 2017 15 دقائق مضت, jjafferr said: السلام عليكم اخي بدر اعمل جدول المفضلة ، جدول واحد للجميع ، وبه جميع الحقول التي تريدها ، احد الحقول يكون اسم او رقم الشخص ، المريض و الطبيب و... ، وفي النموذج ، عن طريق الاستعلام تفتح بيانات من احببت جعفر عفوا اخوي بدر انا اجبت بدون الرجوع الى المشاركات السابقة ، وهذا كان خطأ مني لازم ارجع لها وللبرنامج علشان استذكر اللي عملته سابقا ، ويكون الجواب متكامل. محتاج بعض الوقت ، لأن عندي شئ اشتغل عليه ، ولما انتهي ان شاء الله خلال كم يوم ، ان شاء الله ارجع لك ، وإلا فرجاء تذكيري جعفر
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.