Rawannnna قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 السلام عليكم مشكلتي في نموذج (مواعيدك ) نموذج يحتوي على خمسة ازرار الفكرة هي : عند الضغط على اول زر وهو ( عيادة غدد صماء وسكري ) أريد ان يفتح نموذج اسمه ( عيادة السكري والغدد الصماء ) وتظهر البيانات الخاصه بنفس المستخدم وبنفس التخصص وهذا النموذج ( عيادة السكري والغدد الصماء ) من جدول المواعيد عملت استعلام مبني ع جدول المواعيد وفي حقل التخصص كتبت اسم التخصص( طبيب سكري وغدد صماء ) ولما اشغل الاستعلام تطلع رسالة نوع البيانات غير مطابقة لمعايير التعبير ؟ يعني عند الضغط على أي عيادة من العيادات الموجودة بالنموذج اريد ان يفتح النموذج بنفس التخصص الموجود على الزر وبنفس اسم المستخدم ارفقت القاعدة ولتسهيل الدخول 12341234 الرقم السري : 45454545 نظام متابعة مواعيد مرضى السكر11111111.rar
محمدنجار قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 00:48, Rawannnna said: مشكلتي في نموذج (مواعيدك ) نموذج يحتوي على خمسة ازرار الفكرة هي : عند الضغط على اول زر وهو ( عيادة غدد صماء وسكري ) أريد ان يفتح نموذج اسمه ( عيادة السكري والغدد الصماء ) وتظهر البيانات الخاصه بنفس المستخدم وبنفس التخصص وهذا النموذج ( عيادة السكري والغدد الصماء ) من جدول المواعيد عملت استعلام مبني ع جدول المواعيد وفي حقل التخصص كتبت اسم التخصص( طبيب سكري وغدد صماء ) ولما اشغل الاستعلام تطلع رسالة نوع البيانات غير مطابقة لمعايير التعبير ؟يعني عند الضغط على أي عيادة من العيادات الموجودة بالنموذج اريد ان يفتح النموذج بنفس التخصص الموجود على الزر وبنفس اسم المستخدم Expand ::: عليكم السلام :::لو تم تغير اسماء الحقول واسماء الجداول الى اللغة الانجليزية بيكون افضل ::: في حدث الضغط على زر فتح الفورم ضع الكود التالي مع تغير اسماء الحقول . Dim a a = Me.Patientname DoCmd.OpenForm "DiabeticForm", , , "[Patientname]='" & a & "'" ::: حيث Patientname هو اسم حقل المريض. ::: و Diabeticform هو اسم الفورم المطلوب فتحه على نفس البيانات .... بالتوفيق.
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 00:48, Rawannnna said: السلام عليكم مشكلتي في نموذج (مواعيدك ) نموذج يحتوي على خمسة ازرار الفكرة هي : عند الضغط على اول زر وهو ( عيادة غدد صماء وسكري ) أريد ان يفتح نموذج اسمه ( عيادة السكري والغدد الصماء ) وتظهر البيانات الخاصه بنفس المستخدم وبنفس التخصص وهذا النموذج ( عيادة السكري والغدد الصماء ) من جدول المواعيد عملت استعلام مبني ع جدول المواعيد وفي حقل التخصص كتبت اسم التخصص( طبيب سكري وغدد صماء ) ولما اشغل الاستعلام تطلع رسالة نوع البيانات غير مطابقة لمعايير التعبير ؟ يعني عند الضغط على أي عيادة من العيادات الموجودة بالنموذج اريد ان يفتح النموذج بنفس التخصص الموجود على الزر وبنفس اسم المستخدم ارفقت القاعدة ولتسهيل الدخول 12341234 الرقم السري : 45454545 نظام متابعة مواعيد مرضى السكر11111111.rarFetching info... Expand السلام عليكم ورحمة الله تعاالى وبركاته اختنا الكريمه جربى بدلا من وضع المعيار "طبيب العيون" ادخلى الرقم 2 سيعمل بنجاح لان نوع حقل اسم التخصص رقمى وحضرتك اتعاملتى معاه لنه نصى ان شاء الله ده المطلب الاول وبالنسبة للمطلب الثانى لى عودة
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 وهذا المرفق يحتوى على التعديلات نظام متابعة مواعيد مرضى السكر2.rar
Rawannnna قام بنشر أبريل 29, 2017 الكاتب قام بنشر أبريل 29, 2017 في 29/4/2017 at 09:35, ابا جودى said: وهذا المرفق يحتوى على التعديلات نظام متابعة مواعيد مرضى السكر2.rarFetching info... Expand شكرا أبو جودي على الحل اسم التخصص رقمي لانه معالج بحث من جدول الان عملت استعلام خاص لكل عيادة بالمواعيد المسجلة بها عند دخول المستخدم لعيادة السكر مثلا اريده ان يرى موعده فقط ولا يرى جميع المواعيد المسجلة في العيادة واذا كان المستخدم ليس لديه موعد فالعيادة اريد ان تظهر رسالة بانه لا يوجد لديه موعد في عيادة السكر نظام متابعة مواعيد مرضى السكر 88.rar
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 10:55, Rawannnna said: شكرا أبو جودي على الحل اسم التخصص رقمي لانه معالج بحث من جدول الان عملت استعلام خاص لكل عيادة بالمواعيد المسجلة بها عند دخول المستخدم لعيادة السكر مثلا اريده ان يرى موعده فقط ولا يرى جميع المواعيد المسجلة في العيادة واذا كان المستخدم ليس لديه موعد فالعيادة اريد ان تظهر رسالة بانه لا يوجد لديه موعد في عيادة السكر نظام متابعة مواعيد مرضى السكر 88.rarFetching info... Expand اختنا الكريمة ان شاء يكون المطلوب فى هذا المرفق نظام متابعة مواعيد مرضى السكر 99.rar
Rawannnna قام بنشر أبريل 29, 2017 الكاتب قام بنشر أبريل 29, 2017 في 29/4/2017 at 13:26, ابا جودى said: اختنا الكريمة ان شاء يكون المطلوب فى هذا المرفق نظام متابعة مواعيد مرضى السكر 99.rarFetching info... Expand كل الشكر أبو جودي بس ممكن اعرف كيف ظهرت الرسالة ( لا يوجد لديك موعد مسجل ) وأين مكان الكود حق الرسالة
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 (معدل) في 29/4/2017 at 13:42, Rawannnna said: كل الشكر أبو جودي بس ممكن اعرف كيف ظهرت الرسالة ( لا يوجد لديك موعد مسجل ) وأين مكان الكود حق الرسالة Expand اها طبعا طبعا الكود موجود فى كل نموذج من النماذج اللى تخص تخصصات العيادات -مواعيد الجلدية -مواعيد السكرى والغدد الصماء -مواعيد العيون -مواعيد الكلى الكود تم وضعه فى الحدث عند فتح النموذج الكود If Me.RecordsetClone.RecordCount = 0 Then MsgBox "نص الرسالة ", vbInformation, " عنوان الرسالة " DoCmd.Close Else End If وهنا استخدمت قاعدة IF لعدد السجلات فإن كان العدد = صفر اى لا يوجد اى سجل تظهر الرسالة التة نريد ظهورها ونغلق النموذج فلا حاجة لنا بفتح النموذج طالما لن يحتوى على اى سجلات والا لا يحدث اى شئ اى لو عدد السجلات اكبر من صفر لا تظهر اى رسائل ولا يتم اغلاق النموذج اى لا يحدث اى شئ وكاننا لم نستخدم اى اكواد تم تعديل أبريل 29, 2017 بواسطه ابا جودى
sandanet قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 13:26, ابا جودى said: اختنا الكريمة ان شاء يكون المطلوب فى هذا المرفق نظام متابعة مواعيد مرضى السكر 99.rarFetching info... Expand استاذي العزيز ممكن تعطينا نسخة تفتح على 2007 ؟
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 13:59, sandanet said: استاذي العزيز ممكن تعطينا نسخة تفتح على 2007 ؟ Expand اهلا اهلا اخى الحبيب استاذ @sandanet ان المرفق بتنسيق accdb يعنى مفترض انه يفتح على اكسس 2007 على كل حال سأحاول عمل قاعدة جديدة واستورد اليها الكائنات مرة اخرى واعيد ارفاقها في 29/4/2017 at 13:59, sandanet said: استاذي العزيز ممكن تعطينا نسخة تفتح على 2007 ؟ Expand جرب كده المرفق ده يا استاذ @sandanet نظام متابعة مواعيد مرضى السكر mdb .rar
sandanet قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 (معدل) تمام يالغالي الله يبارك فيك .. فتحت لكن فيها مشكلة يقولي تعذر فتح الماكرو تسجيل الدخول كما في المرفق صيغة الملف accdb الاولى التي لم تفتح معي !! هل النسخة كانت معمولة على اوفيس 2010 ام 2007؟ تم تعديل أبريل 29, 2017 بواسطه sandanet
Rawannnna قام بنشر أبريل 29, 2017 الكاتب قام بنشر أبريل 29, 2017 في 29/4/2017 at 13:53, ابا جودى said: اها طبعا طبعا الكود موجود فى كل نموذج من النماذج اللى تخص تخصصات العيادات -مواعيد الجلدية -مواعيد السكرى والغدد الصماء -مواعيد العيون -مواعيد الكلى الكود تم وضعه فى الحدث عند فتح النموذج الكود If Me.RecordsetClone.RecordCount = 0 Then MsgBox "نص الرسالة ", vbInformation, " عنوان الرسالة " DoCmd.Close Else End If وهنا استخدمت قاعدة IF لعدد السجلات فإن كان العدد = صفر اى لا يوجد اى سجل تظهر الرسالة التة نريد ظهورها ونغلق النموذج فلا حاجة لنا بفتح النموذج طالما لن يحتوى على اى سجلات والا لا يحدث اى شئ اى لو عدد السجلات اكبر من صفر لا تظهر اى رسائل ولا يتم اغلاق النموذج اى لا يحدث اى شئ وكاننا لم نستخدم اى اكواد Expand فهمت جزاك الله خير لكن بعد ماتظهر رسالة التنبيه لا يوجد لديك موعد واقفل الرسالة يقفل الفورم كله , كيف اعدل الكود بحيث يقفل الرسالة بس مايقفل النموذج الأساسي مسحت من الكود هذا السطر ( DoCmd.Close ) صار يظهر رسالة التنبيه بدون مايقفل النموذج لكن بعدها يدخله على العيادة اللي مو مسجل فيها ارفقت القاعدة بعد التعديلات الأخيرة نظام متابعة مواعيد مرضى السكر.rar
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 طيب ثوانى اشوف وارجع لحضرتك تانى النموذج الأساسي حضرتك تقصدى بيه نموذج مواعيدك ؟
sandanet قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 14:33, Rawannnna said: فهمت جزاك الله خير لكن بعد ماتظهر رسالة التنبيه لا يوجد لديك موعد واقفل الرسالة يقفل الفورم كله , كيف اعدل الكود بحيث يقفل الرسالة بس مايقفل النموذج الأساسي مسحت من الكود هذا السطر ( DoCmd.Close ) صار يظهر رسالة التنبيه بدون مايقفل النموذج لكن بعدها يدخله على العيادة اللي مو مسجل فيها ارفقت القاعدة بعد التعديلات الأخيرة نظام متابعة مواعيد مرضى السكر.rarFetching info... Expand ضع مكان الامر docmd.close ضع docmd.cancelevent اخي @ابا جودى هنالك ماكروات مضمنة ارجو الانتباه لها عند التحويل .. انظر الصورة
jjafferr قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 السلام عليكم أخي ابا جودي ، الكود التالي سيعطيك النتيجه الصحيحه ، اذا عدد السجلات صفر : في 29/4/2017 at 13:53, ابا جودى said: If Me.RecordsetClone.RecordCount = 0 Then Expand ولكن اذا اردت حساب عدد السجلات ، فلن يعطيك النتيجة الصحيحة ، وذلك ان نتيجة حساب عدد السجلات RecordCount يكون قبل ان يكتمل جلب جميع السجلات ، لذلك يجب عليك ان تأمر البرنامج للذهاب لآخر سجل ، وعليه سيعرف البرنامج عدد السجلات ، هكذا: Me.RecordsetClone.movelast Me.RecordsetClone.movefirst For i = 1 to Me.RecordsetClone.RecordCount جعفر 1
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 15:03, jjafferr said: السلام عليكم أخي ابا جودي ، الكود التالي سيعطيك النتيجه الصحيحه ، اذا عدد السجلات صفر : ولكن اذا اردت حساب عدد السجلات ، فلن يعطيك النتيجة الصحيحة ، وذلك ان نتيجة حساب عدد السجلات RecordCount يكون قبل ان يكتمل جلب جميع السجلات ، لذلك يجب عليك ان تأمر البرنامج للذهاب لآخر سجل ، وعليه سيعرف البرنامج عدد السجلات ، هكذا: Me.RecordsetClone.movelast Me.RecordsetClone.movefirst For i = 1 to Me.RecordsetClone.RecordCount جعفر Expand جزاكم الله خيرا استاذى القدير ومعلمى الجليل ووالدى الحبيب استاذ @jjafferr تم التعديل على الكود كما تفضلتم اتمنى ان اكون طبقت بالطريقة الصحيحة في 29/4/2017 at 14:33, Rawannnna said: فهمت جزاك الله خير لكن بعد ماتظهر رسالة التنبيه لا يوجد لديك موعد واقفل الرسالة يقفل الفورم كله , كيف اعدل الكود بحيث يقفل الرسالة بس مايقفل النموذج الأساسي مسحت من الكود هذا السطر ( DoCmd.Close ) صار يظهر رسالة التنبيه بدون مايقفل النموذج لكن بعدها يدخله على العيادة اللي مو مسجل فيها ارفقت القاعدة بعد التعديلات الأخيرة نظام متابعة مواعيد مرضى السكر.rarFetching info... Expand اختنا الكريمة @Rawannnna السبب ان حضرتك اضفتى على الازرار فى نموذج مواعيدك هذا السطر بعد كود فتح النموذج DoCmd.Close acForm, "مواعيدك" ولذلك يتم اغلاق هذا النموذج فمن المنطقى بعد ان تظهر الرسالة يغلق النموذج هناك حلان الاول ازالة هذا السطر من كل ازرار ااوامر فى نموذج المواعيد فيظل مفتوحا دائما والحل الاخر فى هذا المرفق لو اردتى اغلاق النموذج مواعيدك يتم فتح النموذج مرة اخرى بعد الرسالة | لك مطلق الحرية فى اختيار ما يناسبك طبعا وتم اضافة الكود الخاص بعد سجلات النماذج كما تفضل واشار استاذى الجليل ومعلمى القدير ووالدى الحبيب الاستاذ @jjafferr نظام متابعة مواعيد مرضى السكر .rar في 29/4/2017 at 14:45, sandanet said: ضع مكان الامر docmd.close ضع docmd.cancelevent اخي @ابا جودى هنالك ماكروات مضمنة ارجو الانتباه لها عند التحويل .. انظر الصورة Expand انا مش عارف ايه المشكله عند حضرتك بصراحة انا شغال عندى تمام قبل التحويل وبعد التحويل 1
sandanet قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 (معدل) في 29/4/2017 at 15:18, ابا جودى said: جزاكم الله خيرا استاذى القدير ومعلمى الجليل ووالدى الحبيب استاذ @jjafferr تم التعديل على الكود كما تفضلتم اتمنى ان اكون طبقت بالطريقة الصحيحة اختنا الكريمة @Rawannnna السبب ان حضرتك اضفتى على الازرار فى نموذج مواعيدك هذا السطر بعد كود فتح النموذج DoCmd.Close acForm, "مواعيدك" ولذلك يتم اغلاق هذا النموذج فمن المنطقى بعد ان تظهر الرسالة يغلق النموذج هناك حلان الاول ازالة هذا السطر من كل ازرار ااوامر فى نموذج المواعيد فيظل مفتوحا دائما والحل الاخر فى هذا المرفق لو اردتى اغلاق النموذج مواعيدك يتم فتح النموذج مرة اخرى بعد الرسالة | لك مطلق الحرية فى اختيار ما يناسبك طبعا وتم اضافة الكود الخاص بعد سجلات النماذج كما تفضل واشار استاذى الجليل ومعلمى القدير ووالدى الحبيب الاستاذ @jjafferr نظام متابعة مواعيد مرضى السكر .rarFetching info... Expand هاذي اجابة 2 × 1 مرفقك الاخير اشتغل تمام تم تعديل أبريل 29, 2017 بواسطه sandanet 1
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 15:39, sandanet said: هاذي اجابة 2 × 1 Expand مش فاهم قصد حضرتك ؟
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 15:45, sandanet said: اقصد حليت مشكلتين في ردك الاخير .. تحياتي Expand انا والله ما اقصد ادخل الموضوعات فى بعض لكن المنتدى هو بيدمج المشاركات الاخيرة من تلقاء نفسه انا كنت اتمنى اساعد حضرتك لكن فعلا والله انا مش عارف افهم النشكله ايه عند حضرتك انا شغال باوفيس 2010 وكل شئ تمام مش عارف هل اختلاف النسخ السبب ام لا جرب تفتح محرر الاكواد وارجع المكتبات لعل هناك اختلاف فى المكتبات بسبب رقم اصدار الاوفيس
sandanet قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 اعتقد انه بالرغم من تشابه الصيغ aacdb في اوفس 2007 فما فوق لكن لايمكن فتح قاعدة محفوظة على اكسس 2010 من اكسس 2007 وهذا ماحصل معي في القاعدة الاولى تحياتي
Rawannnna قام بنشر أبريل 29, 2017 الكاتب قام بنشر أبريل 29, 2017 @ابا جودى @sandanet @jjafferr اشكركم ع التجاوب السريع مع الاعضاء الله يعطيكم الف عافية على جهودكم جاري تجربة الملف في 29/4/2017 at 14:36, ابا جودى said: طيب ثوانى اشوف وارجع لحضرتك تانى النموذج الأساسي حضرتك تقصدى بيه نموذج مواعيدك ؟ Expand ايوا
ابو جودي قام بنشر أبريل 29, 2017 قام بنشر أبريل 29, 2017 في 29/4/2017 at 16:56, Rawannnna said: @ابا جودى @sandanet @jjafferr اشكركم ع التجاوب السريع مع الاعضاء الله يعطيكم الف عافية على جهودكم جاري تجربة الملف ايوا Expand اختنا الكريمة @Rawannnna السبب ان حضرتك اضفتى على الازرار فى نموذج مواعيدك هذا السطر بعد كود فتح النموذج DoCmd.Close acForm, "مواعيدك" ولذلك يتم اغلاق هذا النموذج فمن المنطقى بعد ان تظهر الرسالة يغلق النموذج هناك حلان الاول ازالة هذا السطر من كل ازرار ااوامر فى نموذج المواعيد فيظل مفتوحا دائما والحل الاخر فى هذا المرفق لو اردتى اغلاق النموذج مواعيدك يتم فتح النموذج مرة اخرى بعد الرسالة | لك مطلق الحرية فى اختيار ما يناسبك طبعا وتم اضافة الكود الخاص بعد سجلات النماذج كما تفضل واشار استاذى الجليل ومعلمى القدير ووالدى الحبيب الاستاذ @jjafferr من فضلك جربى المرفق هذا ووافينا بالنتيجه نظام متابعة مواعيد مرضى السكر .rarFetching info...
Rawannnna قام بنشر أبريل 29, 2017 الكاتب قام بنشر أبريل 29, 2017 في 29/4/2017 at 17:03, ابا جودى said: اختنا الكريمة @Rawannnna السبب ان حضرتك اضفتى على الازرار فى نموذج مواعيدك هذا السطر بعد كود فتح النموذج DoCmd.Close acForm, "مواعيدك" ولذلك يتم اغلاق هذا النموذج فمن المنطقى بعد ان تظهر الرسالة يغلق النموذج هناك حلان الاول ازالة هذا السطر من كل ازرار ااوامر فى نموذج المواعيد فيظل مفتوحا دائما والحل الاخر فى هذا المرفق لو اردتى اغلاق النموذج مواعيدك يتم فتح النموذج مرة اخرى بعد الرسالة | لك مطلق الحرية فى اختيار ما يناسبك طبعا وتم اضافة الكود الخاص بعد سجلات النماذج كما تفضل واشار استاذى الجليل ومعلمى القدير ووالدى الحبيب الاستاذ @jjafferr من فضلك جربى المرفق هذا ووافينا بالنتيجه نظام متابعة مواعيد مرضى السكر .rarFetching info... Expand صار تمام بعد حذف كود اغلاق النموذج شكككككككككرا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.