أبو عبدالله الحلوانى

السلام عليكم اسمحو لى بتوضيح بسيط: من المعروف أن الأكسس يحتوى على جداول يحتفظ بها لنفسه تسمى جداول النظام وهذه الجداول لا يمكن للمستخدم التحكم بها بل يتحكم بها الأكسس بشكل آلى تماما وهذه الجداول أى خلل بها يؤدى لتلف قاعدة البيانات - وهذه الجداول يبدأ أسم كل جدول بها بالبادئة "MSys" والآن أرجو أن يكون اتضح كلام استاذ رمهان بأنك تحاول حذف علاقة نظام. هذه واحدة والأخرى: وضع هذه العبارة on error resume next بالكود لن يستثنى أو يثبت شىء وانما هذه الجملة لتجاوز الخطأ عند حدوثه وعدم اظهار مثل رسائل الخطأ السابقة وفى النهاية جرب كود أخينا شيفان بهذا التعديل Option Compare Database Option Explicit Public Function DeleteAllRelationships() On error goto erDletRl Dim db As Database Dim rex As Relations Dim rel As Relation Dim iKt As Integer Set db = CurrentDb() Set rex = db.Relations iKt = rex.Count Do While rex.Count > 0 rex.Delete rex(0).Name Loop Exit Function erDletRl: if Err.Number = 0 then MsgBox " تم حذف العلاقات بين الجداول بنجاح ", vbInformation, "العلاقات" elseif Err.Number = 3033 then Resume Next else msgbox Err.Number & VbCr & Err.Descrption End if End Function وفي زر حذف العلاقات اكتب Call DeleteAllRelationships تمنياتى بالتوفيق

حبيبى وأخى الغالى - اللى مش هنسى نصيحته بتغير نظام التشغيل لدى للأحدث وأعتقد أن الترقية أنت أهل لها دونى ودايما مصر عامرة - وتحية لك من أهل الصعيد الجوانى ومبارك على مروركم الكريم وأرجو تدير بالك على حرف الهاء من اسم الجلالة بالهاء وليس بالتاء

الحمد لله وأنا بخدمتكم متى شئتم على قدر المستطاع وكنت أتمنى مشاركتم ببرنامجين تتوق نفسى لانجازهم ووقفهم لوجه الله برنامج لتيسير أحكام التجويد - والآخر للمواريث والتقسيم الشرعى أن تعاونونا بالبحث العلمى والأدلة الشرعية وأنا بالجانب الفنى على حسب الوسع . والطاقة حسبة لوجه الله تعالى وهى دعوة للأحبة أيضا لمن أراد المساهمة بفكرة أو بدعوة بظهر الغيب بالتوفيق لهذا العمل مبارك علىّ التعرف بكم وأسأل الله أن يجمعنا بكم مع النبى محمد (صلى الله عليه وسلم) على فكرة ما كنت أظن أن أخوتنا بـ كوردستان يجيدون العربية حتى سمعت صوتك خلنا من سيرة الذهب تلك - فقد ضاع وسام يجى 1.5 جرام وعموما شكرا على الورد وشكرا على الزيارة العطرة

آمين ولك بالمثل أرجو أن نستطيع تقديم هذا العلم النافع وجزاك الله خيرا

السلام عليكم جرب هذا لعله يوافق مطلبك ajazat.rar

ملاحظة على كود الأخ أبو ابراهيم - والذى كما قال أ/ رمهان يستحق خبير من الآن - بل هو خبير فعلا عند تغير الصفحة الفارغة "ABOUT:BLANK" بأى شىء آخر يظل الزر الأيمن يعمل وبدون مشاكل

والله ما يسعدنى حقا هو هذا الاجتماع الكبير بين من أحب اناس يتبادلون المودة والاحسان قبل الخبرات والتجارب أهنىء نفسى بوجودى بينكم أحبكم جميعا فى الله وأسأل الله أن يوفقنا لما يحب ويرضا وأن يجمعنا فى الآخرة فى الفردوس الأعلى مع الحبيب المصطفى صلى الله عليه وسلم جزاك الله خيرا لثقتك الغالية ولكنى أرى أنه لقب مبالغ به - ولكن عزائى أنه مجرد لقب - كلام فى سرك أنا عارف نفسى كويس -

فينك يا رجال غبت عنا - ولا الاكسل أخذك منا - شفت متابع أخبارك ازاى جزاك الله خيرا وأرجو أن يكون تم برنامجك الخير على خير أيها الرجل الطيب . أستاذى الغالى جزاك الله خيرا - هذا وسام آخر تهنئتكم أعتز به

هذا بالتأكيد على حد علمى. اليك هذا المثال العملاق كصاحبه وبه شرح ومثال https://www.google.com/url?q=https://www.officena.net/ib/topic/60235-%D9%87%D8%AF%D9%8A%D8%A9-%D8%B1%D8%A8%D8%B7-%D8%A7%D9%84%D8%B5%D9%88%D8%B1-%D9%88%D9%85%D9%84%D9%81%D8%A7%D8%AA-pdf-%D8%A8%D8%A7%D9%84%D9%86%D9%85%D9%88%D8%B0%D8%AC%D8%8C-%D9%88%D8%AA%D8%B4%D8%BA%D9%8A%D9%84-%D8%A7%D9%84%D9%85%D8%A7%D8%B3%D8%AD-%D8%A7%D9%84%D8%B6%D9%88%D8%A6%D9%8A/&sa=U&ved=0ahUKEwj53_if94jSAhXhd5oKHfOFAA4QFggFMAA&client=internal-uds-cse&usg=AFQjCNHbxJA4PZBUuJBUSOx6yYossFq4QA أقصد تاريخ البدأ بالجدول لا تاريخ البدأ بالنموذج لاحظى الصورة جيدا الجدول بالخلف بالصف الذى به رقم الموظف 222 به تاريخ انتهاء 11/11/2016 وليس به تاريخ ابتداء تمنياتى بالتوفيق

أعتقد أنه طالما سندخل البيانات من نموذج بشروط معينة للحفظ فمن الأفضل أن لا يكون الفورم مرتبط هذه واحدة والثانية وجود المرفقات داخل قاعدة البيانات - مما يقصر العمر , عمر القاعدة يعنى - وسوف يؤدى لتضخمها بشكل كبير جدا جدا فى وقت قصير جدا جدا لذا نصيحتى أن تكون المرفقات بفولدر مستقل ويتم حفظ الرابط الخاص بها بالجدول بدلا منها هل وضعت كود فحص الأجازات خلف مربع النص الخاص بالأجازة الزمنية كما هو الحال بالأجازة الاعتيادية - أعتقد أن الجواب لا - جربى التغير وموافتنا بالنتائج. مع ملاحظة تغير مسميات عناصر التحكم داخل الكود لأ الاعتراض لم يكن من أجل تعارض التاريخ لموظف آخر وانما ولا دققنا قليلا بالصورة للاحظنا أن تاريخ البدأ فارغ وهذا مما جعل الكود يبحث فى الفترة ما بين 1/1/1900 وحتى تاريخ الانتهاء المحدد لهذا الموظف. جربى ادخال تاريخ بدأ والمحاولة مجددا.

جزاك الله خيرا - هذا كلام كبير على قزم مثلى ما أنا الا تلميذ صغير بمدرستكم الموقرة أدام الله عليكم نعمه وحفظكم

جزاك الله خيرا أخى - ومكلف نفسك وجيب ورد مكنش له لزوم خالص - يلا نردهالك فى الأفراح

هذا شرف كبير أستاذى العزيز - تهنئتكم أحب الى من الترقية ولكنى كنت أعتقد أن بعد الفضية الذهب وكنت أنتظر الذهبية (طبعا أسعار الذهب مرتفعة فى مصر هذه الأيام - ووسام ذهب كان هيعمل مبلغ كبير - يلا كل شىء نصيب )

السلام عليكم انظر النتيجة بالاستعلام هل هى موافقة لمرادك ان كانت نعم حولنا الاستعلام الى تحديث أو الحاق كما تريد ووافنا بالنتائج New تطبيق Microsoft Office Access.rar

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

يبقى المؤشر على text تاريخ بدء الاجازة ولا يمكن تغيير مكانه حتى لو قمنا بتغيير التاريخ آسف - خطأ غير مقصود وتم التعديل تاريخ طلب مستخدم سابقاً لأجازة اعتيادية او مرضية لايعترض البرنامج الكود يبحث فقط عن تاريخ بدأ وانتهاء الأجازة فقط ولم نلتفت الى تاريخ طلب الأجازة وعلى كل تم تدارك هذا أرجو التجربة وموفاتى بالنتائج الاجازات.rar

جرب هذا ووافنا بالنتائج عدد الأسر وعدد الأفراد.rar

السلام عليكم جربى هذا المرفق ووافنا بالنتائج الاجازات.rar

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

السلام عليكم جرب هذا التعديل ووافنا بالنتائج backup.rar

السلام عليكم للتواصل aboabdallahhlawany@gmailcom

وعليكم السلام ورحمة الله جرب هذا ووافنا بالنتائج - أرجو أن يكون هو ما تريد 123.rar

السلام عليكم جرب هذا التعديل ووافنا بالنتائج backup.rar

السلام عليكم اقرأ هذه الموضوعات لعلك تجد فيها مأربك. https://www.google.com/url?q=https://www.officena.net/ib/topic/70613-microsoft-office-communication-control-6/&sa=U&ved=0ahUKEwiXxtv75vnRAhVpJcAKHWDrCcAQFggFMAA&client=internal-uds-cse&usg=AFQjCNFIqpSKtmD49DUpnWXaPZfNRpob-w https://www.google.com/url?q=https://www.officena.net/ib/topic/70551-%D8%B1%D8%A8%D8%B7-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D8%AC-%D8%A7%D9%84%D8%A7%D9%83%D8%B3%D8%B3-%D8%A8%D8%AC%D9%87%D8%A7%D8%B2%D9%85%D9%8A%D8%B2%D8%A7%D9%86-%D8%AC%D8%B3%D8%B1%D9%8A-%D9%84%D9%88%D8%B2%D9%86-%D8%A7%D9%84%D8%B4%D8%A7%D8%AD%D9%86%D8%A7%D8%AA-weight-bridge/&sa=U&ved=0ahUKEwiD8rjp5_nRAhUZM8AKHeY6DB0QFggLMAI&client=internal-uds-cse&usg=AFQjCNGKvx3NCOjZvT-CE565aAekk1oMMA https://www.google.com/url?q=https://www.officena.net/ib/topic/42101-%D8%B4%D8%B1%D8%AD-%D9%88%D8%A7%D9%81%D9%8A-%D9%84%D8%B1%D8%A8%D8%B7-%D8%A7%D9%84%D8%A7%D9%83%D8%B3%D8%B3-%D8%A8%D9%85%D9%86%D9%81%D8%B0-%D8%A7%D9%84%D9%83%D9%88%D9%85-%D8%A8%D9%88%D8%B1%D8%AA/&sa=U&ved=0ahUKEwjCgeem6PnRAhXhA8AKHXr3AokQFggOMAM&client=internal-uds-cse&usg=AFQjCNFSaOzuTv-0NCYgV0urNv7N35jKNA تمنياتى بالتوفيق

هدية متميزة من معلم متميز - طبعا معلم بكلا معنييها العربى (بضم الميم وفتح العين) والعامى باللهجة المصرية (بكسر الميم وفتح العين ) حصة انشاء