عبدالله كاظم

بخصوص عملية البحث فهي ممكنة بكل الأحوال يمكن مشاهدة المثال في المرفقات اسم نموذج البحث هو frmSearch قسم الامن - 4.zip

وعليكم السلام تفضل جدول الحصص_20.zip

العفو أخوي خالد بالنسبة لنموذج اجهزة الانذار فقط يحتاج إلى تعديل الاستعلام المرتبط بالنموذج وإضافة عمود [مكان الجهاز] و عمود [حالة الجهاز]، كما في الصورة المرفقة هذا من جانب، ومن جانب آخر أهم مرحلة في تصوري هي بناء الجداول لاحظت أن لكل جهاز انذار حالة وتسجل الحالة في جدول [حالة جهاز الانذار] فيمكن اختصار عدد الجداول وجعل تسجيل بيانات الحالة في نفس جدول [بيان بأجهزة الانذار بالفرع] وان كُنت ترى أنه من الضروري أن يبقى جدول الحالة مستقلاً فيجب تعديل العلاقة بين الجدولين [البيانات] و [الحالة] علاقة طرف لطرف وهذا ما اعتمدته في التعديل التالي ويمكنك الاطلاع على العلاقات بين الجداول والاستعلامات قسم الامن - 3.zip

اتفضل جرب النموذج Form1 جدول الحصص.accdb

جرب المرفق التالي عملت بعض التعديلات على جداول الموظفين والطفايات قسم الامن - 2.zip

إذا كان المقصود كما في الصورة، لأن بصراحة ما فهمت الجداول 😅 استبدل السطر السابق بـ ct.Fields(L) = tc.Fields(1) & " " & tc.Fields(L)

بعد أذن الأخوة الأعزاء بالنسبة لمنوذج ادخال بيانات الموظفين فهو يقبل بقط ادخال بيانات ولا يقبل عرض ولتعديل النموذج يحتاج تلغي تفعيل الـ Data Entry من خصائص النموذج أما نموذج ادخال بيانات الطفيات فالمشكلة في الاستعلام اللي هو مصدر السجلات للنموذج شوف المرفق وان شاء الله يكون شغال تمام قسم الامن.zip

وعليكم السلام ورحمة الله وبركاته عدل خصائص التكست بوكس كما في الصورة المرفقة

وعليكم السلام ورحمة الله وبركاته وانت بخير .. إذا كان المطلوب كما في الصورة المرفقة استبدل الكود ct.Fields(L) = tc.Fields(0) بـ ct.Fields(L) = tc.Fields(1) بالاضافة يحتاج تعدل على جدول Class-teacher عدل خصائص lookup حق السبت1 إلى Text Box

الحمدلله

تفضل test01.accdb

وعليكم السلام ورحمة الله وبركاته جرب DoCmd.OpenForm "اسم نموذج التفاصيل", , , , acFormAdd

وعليكم السلام ممكن هذه الطريقة تنفع Option Compare Database Private iCkeck As Integer ''تعيين المتغير في أعلى صفحة الكود Private Sub Form_Timer() ''اعطاء القيمة للمتغير عبر اختبار الشرط if ...... then iCkeck = 1 else iCkeck = 0 end if ''تغيير لون الزر عبر اختبار الشرط التالي If iCkeck = 0 Then Me.Command0.BackColor = RGB(214, 0, 3) ElseIf iCkeck = 1 Then Me.Command0.BackColor = RGB(78, 147, 217) End If End Sub

تفضل .. ان شاء الله يكون هذا المطلوب إدارة التدريب_2.zip

السلام عليكم ورحمة الله وبركاته الطريقة بعمل جدول يحتوي على عمودين 1- رقم الدورة. 2- رقم المتدرب وبعدها عمل علاقة بين الجداول الثلاثة (الدورات و المتدربين وجدول الربط) ولاستخراج المعلومات عمل استعلام شاهد المرفق إدارة التدريب_1.zip

تفضل = DSum("[NEW_K4]", "Trans_K4_06_2017", "[K4_Type] = 'New K4'")

وعليكم السلام ورحمة الله وبركاته جرب =DSum("[NEW_K4]","Trans_K4_06_2017")-DSum("[NEW_K6]","Trans_K4_06_2017")

السلام عليكم ورحمة الله وبركاته جرب هذا الكود DoCmd.OutputTo acOutputReport, "اسم التقرير", acFormatPDF

السلام عليكم ورحمة اله وبركاته اقترح ان تكون الجداول بهذا الشكل بدون ما نستخدم جدول خاص للي خرجوا من المستشفى 1- جدول لـ معلومات المرضى الأساسية 2- جدول لـ تسجيل التنويم والخروج مرتبط بجدول المرضى وخاصة أن المريض ممكن يتنوم أكثر مرة 3 جدول لـ نقل الدم مرتبط بجدول تسجيل التنويم لأن في تصوري ممكن المريض أثناء فترة التنويم ينقل له الدم أكثر من مرة وهذه صورة لجداول والعلاقات اللي بينهم طبعا ما تطرقت لجدول توزيع الممرضين، لأن ما أعرف الآلية حق التوزيع والمناوبات وهذي هي القاعدة المقترحة بس جداول واستعلامات مع فائق التحيات admission.zip

تفضل أخي .. والمعذرة على التأخير UsersAndPermissions_2007.zip

وعليكم السلام أخوي الحمدلله انك استفدت منه

مو جاي افهم وين المشكلة نزلت الملف وفتحته وشغال عندي اوكي او فتحت الملف على جهاز ثاني وشغال بس هذا رابط ثاني من access 2013 جرب، وان شاء الله يفتح http://www.mediafire.com/file/9gsuab16d680dvm/UsersAndPermissions2.accdb

http://www.mediafire.com/file/wrhv4or8h27vxoy/UsersAndPermissions.accdb admin 123

وعليكم السلام اخوي اللي فهمته من استفسارك تبي تستخرج السجلات من الجدول tistimara وليست موجودة في جدول istimaradawarin_out فإذا كان الأمر كذلك نحدد العمود المشترك بين الجدولين وأفترض أنه istimaracode فالطريقة هي انشاء استعلام وفي وضع SQL نضع الكود بالشكل التالي SELECT tistimara.istimaracode FROM tistimara WHERE (((Exists (SELECT 1 FROM istimaradawarin_out where istimaradawarin_out.istimaracode = tistimara.istimaracode))=False)); اتمنى ان يكون هذا هو المراد