• 0
helmy_foad

أرجو المساعدة فى برنامج حجز مواعيد العيادات

سؤال

السلام عليكــم ورحمـة الله وبركاتــه ،،

قمت بعمل برنامج بسيط لحجز مواعيد العيادات

و وصلت إلى مرحلة جيدة

لكن ...

المطلوب أن كل طبيب لا يكون لة إلا عدد معين من المرضى الذين سيكشف عليهم يومياً

و هذا الرقم متغير

يعنى عيادة السكر مثلاً يكشف طبيبها على 20 مريض

اما عيادة العظام 15 فقط

فلم أستطيع ضبط هذة المسألة

أريد

1 - تنبية عندما نصل إلى العدد المطلوب من المرضى عن هذا اليوم

2 - و كلما سجلت مريض بتاريخ معين فى عيادة معينة يعطينى رقم مسلسل لهذا المريض حتى يعرف المستخدم أن البيان الذى يتم إدخالة هو رقم كذا ، بدلاً من إدخال البيان ثم يجد أنة تعدى العدد المطلوب

3 - إمكانية البحث عن الحجوزات بأسم مريض أو رقمة

4 - إمكانية البحث عن حجوزات الطبيب أو العيادة

و شكراً لكم

New_Microsoft_Office_Access_Application.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

8 إجابة على هذا السؤال .

  • 0

البرنامج جميل جدا هل لي سؤال كيف تم عمل القائمة المنسدلة وربطعها مع النماذج

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الأخ فجر الربيع

القائمة المنسدله غير مرتبطة ، و بها جملة إستعلام SQL فى مصدر الصف ، و هى جملة إستعلام عادية جداً لإختيار قيم القائمة المنسدلة من حقل محدد فى جدول معين

و بعد ذلك يتم وضع كود برمجى بسيط VBA

Private Sub clinic_name_combo_AfterUpdate()
Me!clinic_id.SetFocus

If Not IsNull(Me!clinic_name_combo) Then
DoCmd.FindRecord Me!clinic_name_combo
End If
End Sub

مع تغيير ما يلزم

______________

الاخوة المشرفين

أرجو المساعدة فى حل المشكلة

تم تعديل بواسطه helmy_foad
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

أخي الفاضل

تابع الرابط

http://www.arabteam2000-forum.com/index.ph...amed+nada\

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

شكراً أستاذ محمد فؤاد تركى

لكن

برنامجى مختلف

فهو يعمل مع عيادات كثيرة

و نظام حجز المرضى مختلف تماماً

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الموضوع قديم .. لكن بنعمل له تجديد :

والأستفسار واضح والطريقة سهلة ...

هل صاحب الموضوع معنا أو أنتهى ؟!؟!؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام عليكــم ورحمـة الله وبركاتــه ،،

شوف يا أستاذي العزيز حلمي فؤاد الحل سهل جدا وبسيط ولكن تابع الخطوات التالية:-

1- في جدول tbl_clinic قم بإضافة حقل رقمي تخصصه للحد الأقصى من المرضى

2- قم بوضع هذا الحقل في Form1 تمهيدا لأن تكتب فيه الحد الأقصى المسموح به على كيفك في كل عيادة

3- قم بعمل فورم منبثق مقاسه صغير جدا وبدون حدود ولونه لون Form1 وليكن إسمه مثلا Chek_number وهذا الفورم يكون مصدر السجل له هو إستعلام يحدد عدد الحالات الحالي داخل العيادة النشطة طبعا بوضع المعايير اللازمة داخل الاستعلام وناتج هذا الاستعلام يكون في تكست بوكس في هذا الفورم وقم بجعل هذا التكست غيير مرئي

4- كل ما عليك الآن هو وضع كود في حدث قبل التحديث في فورم tblAppointments subform مهمة هذا الكود هو فتح فورم Chek_number وإخفاؤه ومقارنة ناتج التكست بوكس فيه والمعبر عن العدد الحالي للحالات بالرقم المسموح به لعدد الحالاات في Form1 والتصرف على هذا الأساس فإن كان أقل من الرقم مثلا لا يفعل شيء سوى غلق نموذج Chek_number وإذا كان مساوي للرقم الموجود بالحد الأقصى يتم إظهار رسالة وإلغاء الحدث أو غلق النموذج أو الصعود مرة أخرى للكمبو بوكس الخاص بإسم العيادة أو أي شيء على كيفك ولا تنسى إغلاق نموذج Chek_number

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

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .