jo_2010

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

الفاضل د.كاف يار شكرا لاهتمام حضرتك بالرد على ولكن الكودين لايعملوا وبعد البحث توصلت للكود التالى Nz(DSum("[total]","New_Request","TCODE= 14 and doctor=[doctors] AND Ddate Between [Forms]![Q_All]![FROM] And [Forms]![Q_All]![TO]"),0) واعطى نتائج رائعة شكرا

الاخوة الافاضل الخبراء بعد التحية ارجو التعديل هذة الدالة dsum داخل مربع نص غير منضم Nz(DSum("[total]","New_Request","TCODE= 42 and doctor=[doctors] AND Ddate=Between [Forms]![Q_All]![FROM] And [Forms]![Q_All]![TO]"),0) كيف اكتب الدالة بطريقة صحيحة بحيث يقوم بالجمع بين تاريخين مصدرهم نموذج اسمة Q_all ارجو المسااعدة

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

السادة الخبراء الافاضل بعد التحية كيف اجمع حقل غير منضم فى نهاية التقرير ليكون الاجمالى مع العلم بان اسم الحقل ِAA ويحتوى على دالة Dcoun لكم الشكر

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

السادة الخبراء الافاضل بعد التحية هل استطيع عمل تقرير كما بالصورة او شى اقرب اليها من الاستعلام new_request اليكم القاعدة للتعديل عليها ملحوظة هذة الصورة للاستقبال فقط اريد تطبيقها على كل العيادات النسا- الرمد -الباطنة-......الخ خالص الشكر لحضرتكم ممكن اقتراحات للحصول على احصائيات كل عيادة بمشتقاتها OK.accdb

خالص الشكر لكم جميعا

الخبراء الافاضل بعد التحية عند برنامج وبة عدد كبير من النماذج والتقارير اعمل علية من حوالى 4 سنوات واليوم تفأجات بان النماذج الرئيسة والفرعية كانك تقف امام مراة النماذج الموجودة على اليمين اصبحت على اليسار حتى التقارير اتقلبت مثال sugar150 اصبح 150Sugar كل النماذج والتقارير تحولت بهذا الشكل رغم ان التنسيق كما هو من اليمين الى اليسار ممكن اهل الخبرة يفيدونى لماذا حدث هذا مع العلم بانى اعمل على اوفيس 2010 وغير الى 2013 واشتغل معى كويس وثانى يوم حدثت هذة المشكلة

استاذي الفاضل قمت بعمل نسخة اوفيس 19 علي نفس الويندوز الذي بة نسخة 10 هل من المفروض عمل نسخة ويندوز جديدة باوفيس جديد عشان تشتغل علي الإصدار الأعلي ولا انا فهمت كلامك غلط

استاذي الفاضل صممت برنامج علي 2010 ومعظم الازرار والاكواد لاتعمل علي اوفيس 2016 او 2019 وتعمل بكفاءة علي 2010

السادة الخبراء الاعزاء ارجو الإفادة بعد اذنكم كما تعودت منكم علي معونتي وحل المشاكل التي تقابلني لماذا لايعمل برنامج تم تصميمة علي 2010علي اوفيس 2016 او 2019 ثانيا أيهما أفضل اوفيس 2010 ام 2016 ام 2019 والنواة 32 ام 64 ارجو الرد بالتفصيل لكي استوعب الموضوع نظرا لقلة خبرتي وذلك لانى هاوى ولست محترف خالص الشكى

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

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

استاذى ومعلمى الجليل jjafferr قمت بمساوة الحقول بعد النسخ ويعطى نفس رسالة الخطا

استاذى ومعلمى الجليل jjafferr قمت بتنفيذ شرح حضرتك على حسب فهمى وفتح البرنامج اول مرة ولكن عند فتحة مرة اخرى طلب منى تفعيل البرنامج واليكم البرنامج بعد التعديل علية Me.KEY = "-3121277418" هذا الرقم متغير من جهاز لجهاز كيف اضعة فى الكود JO.accdb

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

الخبراء الافاضل بعد التحية مرفق نموذج للتعديل مع صورة للمطلوب JO.accdb

استاذى ومعلمى الجليل الخبير الفاضل jjafferr شكرا لحضرتك ياصاحب اجمل تورتة قدمتها لى ولجميع اعضاء المنتدى وهى التعامل مع الدالات بجميع انواعها شكر خاص لحل مشكلتى التى اتعبتنى اسابيع لقلة خبرتى جعل الله علمك الذى لا تبخل بة على احد فى ميزان حساناتك ياريت تخبرنا وين كانت المشكلة 🙂 المشكلة كما اشرت حضرتك المسافة الموجودة بالكود واسم الحقل كنت بكتبة kind_haraka كما بالجدول ولكنى فى النموذج احتصرت الاسم الى KH الشكل النهائى للكود الصحيح Dim myWhere As String myWhere = "fat_num = " & Forms!Fatora_be!Fat_num " myWhere = myWhere & " And "'" & myWhere = myWhere & "kind_haraka = '" & Forms!Fatora_be!KH Me.total_fatora = Nz(DSum("total", "Haraka", myWhere), 0)

الخبير الفاضل jjafferr خالص الشكر على التورتة الجميلة ولكن لى استفسار لقلة خبرتى بالاكسيس هل الكود يكتب بنفس الطريقة مع العلم بان fat_num رقمى kind_haraka نصى وهل اختيارى لشكل الدالة بهذا الشكل صيحيح ام خاطى وما هو التعديل الصحيح قمت بوضعها فى حدث عند النقر على مفتاح بهذا الشكل واعطى رسالة خطا ماذا افعل يامعلمى واستاذى الفاضل Dim myWhere As String myWhere = "fat_num = " & Forms!Fatora_be!Fat_num " myWhere = myWhere & " And "' " & myWhere = myWhere & "kind_haraka = '" & Forms!Fatora_be!Kind_haraka Me.total_fatora = Nz(DSum("total", "Haraka", myWhere), 0)

استاذنا الفاضل SEMO.Pa3x الكود لايعمل شكرا لاهتمامك

استاذى الفاضل محمد أبوعبدالله الكود لايعمل مع الاسف وقمت باستبدال ; ب , لان الكود vba

الخبراء الافاضل بعد التحية حاولت بكل الطرق لكني فشلت فقررت استعين بخبراتكم عندى مربع نص اسمة total_fatora اريد عند الضغط علي زر يتم تجميع حقل total من جدول Haraka بشرطين الاول رقم الفاتورة fat_num = forms! Fatora_be! Fat_num والشرط الثاني kind_haraka=forms!Fatora_be! Kind_haraka مع العلم بان fat_num حقل رقمى و Kind_harakaحقل نصي بتلخبط في وضع '' ' & علشان كدة قررت استعين بأهل الخبرة خالص الشكر

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

خالص الشكر استاذنا ومعلمنا الجليل جعفر