kaser906

هل أنت متأكد بأنك قمت بتفعيل خيار الماكرو

تم التعديل شكرا لك

أخي الكريم سأجيبك على سؤالك الخاص بموضوع المشاركة فقط باقي الأسئله ممكن تفتح موضوع لكل سؤال بخصوص صيغة الملف accdb هذه الصيغة يكون فيها البرنامج او قاعدة البيانات مفتوحة المصدر أي أنك تستطيع التعديل على جميع الكائنات نماذج تقارير اكواد vba أما صيغة ملف accde هذه الصيغة يكون فيها البرنامج او قاعدة البيانات مغلقة ولا يمكنك التعديل على النماذج التقارير اكواد vba ويمكنك في كلا الصيغتين التعديل والاطلاع على الجداول الاستعلامات وحدات ماكرو الجداول يمكنك اخفائها ( لا أنصح به ) يسبب مشاكل وبالخصوص الجداول المرتبطه ويمكنك تشفيرها ( لا أنصح به ) خوفا من تلف البيانات وفي أفضل الحالات سيكون عمل البرنامج بطيئ عندما تكثر السجلات بسبب معالجة تشفير وفك تشفير البيانات لذا تم عمل هذه الطريقة طريقتي في حماية قاعدة البيانات من تفعيل الشفت وحماية الاستعلامات و وحدات المايكرو وكلمة السر للقاعدة الخلفية ::بالتوفيق:: إذا كنت ترى هذه المشاركة مفيدة فلاتنسى التقييم

نعم وهو الملف الوسيط سيتكفل بهذه المهمة تم التعديل المطلوب ولتسهيل الأمر على مسؤول القاعدة اذا اراد مثلا اظهار الكائنات للتعديل أو الإطلاع تمت اضافة زر أمر لاظهار الكا ئنات وشريط الادوات بدل ما يقوم بألغاء كلمة السر ثم اعادة تفعيل الشفت وفتح القاعدة من جديد فقط نقرة زر كل شي يكون أمامه طبعا زر الأمر لازم يكون مخفي عن المستخدم ونقوم بإيجاد طريقة لاظهاره للمسؤول بالنسبةلي بما اني استخدم نظام صلاحيات مستخدمين أضع هذا الكود عند فتح النموذج لاظهار زر الأمر وتفعيله If MyUser.username() = "Kaser906" Then Me![cmd47].Enabled = True Me![cmd47].Visible = True End If الملف بالمرفقات ::بالتوفيق:: إذا كنت ترى هذه المشاركة مفيدة فلا تنسى التقييم FreeKaser906.rar

وعليكم السلام ورحمة الله وبركاتة أخي هذا الأمر لايمكن تحقيقه ع الجداول ::بالتوفيق:: إذا كنت ترى هذه المشاركة مفيدة لا تنسى التقييم

أساتذتي @jjafferr SEMO.Pa3x محمد سلامة شرفني مروركم ورضاكم عن الطريقة شكرا لكم

وعليكم السلام شوفي المرفق ::بالتوفيق:: 122.accdb

ضع حقل أخر بالنموذج واجعل مصدر باناته حقل التاريخ :: بالتوفيق::

أمل من الادارة وضع الملفين بالمشاركة الأولى بسبب عدم اتاحة خيار التحرير إليكم الملفين مفتوحي المصدر ولا أعتقد أن الطريقة محتاجه شرح فقط قم بتعديل أسم المايكرو في الملفين بإزالة رقم 1 او قم بتعين نموذج بدأ التشغيل من قائمةالخيارات ::بالتوفيق:: Free.rar

يعطيك العافية استاذ @SEMO.Pa3x وهذه الطريقة تؤدي نفس الغرض مع أمكانية التراجع

::بالتوفيق::

طلبك تغير عن مشاركتك الأولى كان طلبك جلب البانات الى ملف أكسل

لا داعي للاعتذار نعم الهدف الاساس هو حماية الملف الاساس إن شاء الله

مرفقك توجد به مشكله وقد قام Ali Sadiq باجابتك جرب مرفقه بالموضوع السابق ::بالتوفيق::

وعليكم السلام لديك موضوع بنفس الطلب وتمت اجابتك ولم ترد او تتابع ::بالتوفيق::

وعليكم السلام بما انك وضعت كود عند التحمل للحصول ع المجموع If Nationality = "Saudi" Then Gosi = (Val(BasicSalary) + Val(Housing)) * 0.11 Else Gosi = (Val(BasicSalary) + Val(Housing)) * 0 End If TotalSalary = Val(BasicSalary) + Val(Housing) + Val(Transportation) + Val(OtherBenefits) AccruedSalary = (Val(TotalSalary) / Val(DayMonth)) * (DayAttendees) NetSalary = (Val(AccruedSalary) + Val(Reward) + Val(Addition)) - (Val(Discount) + Val(Deduction) + Val(Gosi)) كان لازم تزيل مصدر تحكم الحقول الملونة بالاخضر لتصبح حقول غر منظمه ::بالتوفيق::

وعليكم السلام ورحمة الله وبركاتة أخي الكريم كان لك نفس الطلب في موضوع سابق لكن الفرق كنت تريده في التقرير وقد قمت بالرد عليك وتحقيق طلبك عن طريق كود vba وشاركني استاذي @jjafferr بوضع نفس الحل ولكن عن طريق الاستعلام الان لتحقيق طلبك الجديد ارجع للموضوع السابق وبالتحديد مشاركة الاستاذ جعفر قم بفتح ملف اكسل ثم اذهب على مصدر البيانات ثم اختر قاعدة البيانات حسب الصورة ستظهر لك نافذة اختر منها الاستعلام نتائج الاستعلام اصبحت بملف الاكسل قم بتغير مسميات رؤوس الاعمدة حسب ما تراه مناسب لك وحفظ الاستعلام وإذا لم ترد تغيير مسمسيات رؤوس الاعمدة بالاكسل قم بتغيرها من الاستعلام وستظهر بالاكسل نفس المسميات ::بالتوفيق::

اخي الكريم انظر الموضوع التالي تجد به نفس طلبك حاول الاستفادة من الطريقة بالنموذج ::بالتوفيق::

بإذن لله أخي احمد سأضع المرفقين مفتوحي المصدر وأشرح ولكن دعنا ننتظر قليلا للنظر هل الطريقه فعالة وصامدة حتى الان تبدو فاعلة ولم يتمكن احد من الوصول الى الكائنات الشرط من البداية كان واضح حول صيغة الملف فصيغة ملف ٢٠٠٣ يمكن كسر كلمة السر من خلالها ولك بالمثل شكرا لمرورك ::: اعتذر لاعادة الرد لعدم ظهور الاقتباس بالمشاركة السابقه من الرد::::

وعليكم السلام بإذن لله أخي احمد سأضع المرفقين مفتوحي المصدر وأشرح ولكن دعنا ننتظر قليلا للنظر هل الطريقه فعالة وصامدة حتى الان تبدو فاعلة ولم يتمكن احد من الوصول الى الكائنات استاذي الكريم الشرط من البداية كان واضح حول صيغة الملف فصيغة ملف ٢٠٠٣ يمكن كسر كلمة السر من خلالها ولك بالمثل شكرا لمرورك

شكرا لمرورك نتمنى ان تكون طريقة مفيدة وفعالة

السلام عليكم ورحمة الله وبركاتة في مووضوع سابق طرحته بالمنتدى حذرت من موضوع اخفاء الجداول المرتبطه لما يسببه من مشاكل وأخطاء تحذير من إستخدام كود إخفاء الجداول المرتبطة فأخذت افكرفي ايجاد طريقة لحماية كائنات قاعدة البيانات كافة من وصول المستخدم ومن ضمنها عدم وصول المستخدم لكلمة سر قاعدة البيانات الخلفية والتي تكون مخزنة بالجدول MsysObjects فلم أجد افضل من طريقة وضع كلمة سر لقاعدة البيانات بشرط أن تكون بصيغة accdb أو accde هنا لن يتمكن المستخدم من تفعيل الشفت ببرنامج خارجي ولن يتمكن من الوصول الى الكائنات وهذا كان سبب طرحي لموضوع هل لديك تجربه لكسر كلمة سر قاعدة بيانات ؟ وقد اكد استاذنا @jjafferr صعوبة الحصول على الرقم السري لمثل هذا النوع من قواعد البيانات فقررت وضع كلمة السر لقواعد البيانات !!!!!!! لكن ماهو الحل مع المستخدم ؟ هل سنقوم بتسليمه كلمة السر ليستخدم قاعدة البيانات اذا كأننا لمن نصنع شئ ففكرت بإيجاد وسيط نقوم بتسليمه كلمة السر ويكون هو الوسيط بين المستخدم والبرنامج ( الواجهة ) اذا الوسيط سنضعه جنب البرنامج ونأمره بفتح البرنامج للمستخدم اذا اراد استخدامه بدون أن يفصح له عن كلمة السر بالمرفق يوجد ملفين ملف قاعدة البيانات الاساس Start محمي بكلمة سر والاخر الوسيط الذي سنقوم بمن خلاله فتح البرنامج StartDatabes. بعد تمرير كلمة السر اليه والملفين تم تحويلهما الى صيغة accde بعد تنزيل المرفق اجعل الملفيين في مجلد واحد وشغل الملف StartDatabes ملاحظة من المحتمل ان تظهر لديك رسالة في بدأ التشغيل لا يمكن قراءة مشروع Vba هنا اعتقد يجب أن يكون الوندوز لديك محدث بأخر تحديث ويجب أن تكون حزمة Microsoft .NET Framework محدثة بأخر اصدار حسب لغة الوندوز ونوعه عندك او كما يوجد لدي انا عندي الحزمة Microsoft .NET Framework 4.5.1 windos 10 office10 أخر تحديث ارجو التجربه ونتمنى الاستفاده للجميع Free.rar -------------------------------------- ملاحظات جعفر 14-7-2021 : بعد ان تم حذف الملف الاصل ، اصبح من الصعب على بعض الاعضاء متابعة الموضوع ، لذا ، وبعد إذن الاخ @kaser906 فعملت ملفاته مرة اخرى وارفقتها هنا: 1. الملف Locked.zip ، وهو الملف النهائي والذي سيتم تسليمه للزبون ، وهو الملف الذي يجب ان يجربه الاعضاء ، وفيه ملفين بصيغة accde ، 2. الملف Locked_Open_Source.zip ، يحتوي على ملفات مفتوحة المصدر ، بصيغة accdb ، والتي حولناها الى ملفي رقم 1 علاه ، 3. الملف Open_Source.zip ،يحتوي على نفس ملفي رقم 2 اعلاه بصيغة accdb ، ولكن بدون تجهيزهم لتحويلهم لصيغة accde . Locked.zip Locked_Open_Source.zip Open_Source.zip

ممتاز استاذي الان اعطيتني اجابه أكيده و واضحه ويمكنني طرح موضوعي التالي شكرا لك

لا تتعب نفسك اخوي ابو زاهر ما عندي برنامج اريد اعرف الرقم السر له انا فقط اريد التأكد هل هناك برامج فعلا تكشف كلمة سر لملف من نوع Accdb و Accde