محمد صلاح1

السلام عليكم الأخوة المحترمين من الخبراء والمبرمجين في برنامج الاكسيس معلوم أن هناك أدوات خارجية لتمكين وإلغاء زر أو مفتاح الشفت وهذا بدوره يعمل علي تجاوز حمايات بدايات التشغيل للدخول علي بيئة التصميم وكأنه تبخرت في خبر كان وأعتقد أن ذلك إشكال يؤرق الكثيرين ويجعل العمل والجهد المبذول به في مهب الريح كما أعتقد أنه لا يوجد له حل جذري حتي الآن !!؟؟ وأنا أبحث عن حل لذلك قرأت تلميحاً للأخت زهرة "جزاها الله كل خير علي كل ما قدمت" بإمكانية عمل كلمة سر عند المطالبة بتمكين زر الشفت كحل أو عائق وحيد أمام هذه الأدوات لتمكين الشفت وللأسف بحثت كثيراً عن مرفق أو مثال لذلك فلم أجد فهل بالإمكان تنفيذ ذلك بحيث يتم عمل حماية برمجية من داخل بيئة الاكسيس حول كود قيمة تفعيل DisableShiftKeyBypass بحيث إذا ما تمت المحاولة لتمكين زر الشفت بأحد هذا الأدوات الخارجية ظهرت رسالة مطالبة بكلمة السر وشكرا لكم من فضلكم ليس هناك داعى لعمل اقتباس عند الرد فهذا يقوم بدوره بتشتيت المطلع والباحث عن نفس الموضوع مستقبلاً

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

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

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

شكراً جزيلاً أستاذ @ابو عارف علي الاهتمام سوف أطالع المرفق وأوافيك بالنتيجة وجزاك الله عني كل خير

الأخوة الأفاضل سلام الله عليكم ورحمته وبركاته كما يدل عنوان الموضوع أود أن أجد عناية من أحد الأخوة الذين حباهم الله فهم علم برمجة برنامج الاكسيس ليساعدني في إنهاء أخر نقطة متبقية في عملي والذي يهتم بطلبة العلم الشرعي ويحتاج لمبرمج محترف ليقوم بإنهاء أخر نقطة فيه وجزاه الله عن ذلك خير الجزاء وجعله في ميزان حسناته للتواصل عبر الميل التالي: wael12440@yahoo.com

نظراً لغياب الأستاذ @د.كاف يار هل يمكن لأحدا الأخوة مساعدتي في مطلوب أخر مشاركة وشكراً

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

أ @د.كاف يار السلام عليكم شكراً جزيلاً لحضرتك علي كرم المشاركة والإفادة الإيجابية وأسمح لي نظراً لقلة علمي بعالم الأكواد والبرمجة بطرح استفسار من داخل الكود الذي تفضلت به إكمالاً للفائدة وهو كيف أعرف الفرق إذا كانت الإضافة في هذه الحقول "أجبارية" أي أنه لن يتم اضافة بيانات في حقول الجدول إلا عندما إذا تم ادخال البيانات في كافة أسماء الحقول الواردة في الكود وبين إمكانية قبول اضافة إدخال البيانات في بعض الحقول الجدول دون البعض وأكرر خالص شكري وتقديري

للرفع

تعديل علي كود استعلامي اضافة وتحديث أريد أضافة بعض الحقول وقيم خصائصها علي الكود التالي وهذه الحقول الجديدة المضافة هي: ID_User رقم يزيد بمقدار 1 عند كل إضافة ID_Group رقم IAM نص مختصر BIRTHDATE تاريخ/وقت Email نص مختصر PHONE نص مختصر ImagePath نص مختصر الكود 'If IsNull(DLookup("Uname", "Users", "Uname='الدعم الفني'")) Then 'CurrentDb.Execute "INSERT INTO Usys_Users ([Uname],[Pw],[AddingDate]) Values ('" & "الدعم الفني" & "','" & "12345" & "', '" & Date & "')" 'Else 'CurrentDb.Execute "UPDATE Users SET [Uname] ='الدعم الفني',[Pw]='" & "12345" & "',[AddingDate]='" & Date & "' WHERE Uname='الدعم الفني'" 'End If

رجاء من الأخوة الذين لديهم دراية كافية من خلال التعامل مع نظام صلاحيات الأستاذ العبادي "بالتدخل الجراحي" لتعديل الوحدة النمطية حسب المطلوب وشكراً

هذا هو الكود المقصود بتنفيذ كود مماثل له للفكرة المطلوبة وهي عند رغبة عضو جديد لإضافة بياناته ليتعرف علي العمل وبعد اختيار مستوي الصلاحية "زائر" من كمبوبوكس مستوي الصلاحية أن يتم أستدعاء الكود المراد إنشاءه بمستوي زائر (بانتظار التفعيل) حسب اسم العضو وكلمة السر الخاصة به عند الإدخال علي ان تكون صلاحيته فتح النماذج فقط دون إضافة أو تعديل أو حذف If IsNull(DLookup("Username", "Login", "Username='الدعم الفني'")) Then CurrentDb.Execute "INSERT INTO Login ([Username],[Password],[Permissions_1],[Permissions_2],[Permissions_3],[AddingDate],[AddNewUser],[EditFlagsUser],[RemoveUser],[GeneralSettings]) Values ('" & "الدعم الفني" & "','" & "12345" & "',True,True,True,'" & Date & "',True,True,True,True)" Else CurrentDb.Execute "UPDATE Login SET [Username] ='الدعم الفني',[Password]='" & "12345" & "',[Permissions_1]=True,[Permissions_2]=True,[Permissions_3]=True,[AddingDate]='" & Date & "',[AddNewUser]=True,[EditFlagsUser]=True,[RemoveUser]=True,[GeneralSettings]=True WHERE Username='الدعم الفني'" End If

شكراً وعذرك مقبول

للرفع

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

للرفع

للرفع

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

@qathi سامحك الله علي تجاوزك بحقي وتهكمك بغير مبرر ولا سند

السلام عليكم بالمرفق وحدة نمطية باسم Cuser وهي أحد الكائنات الرئيسية المسئولة عن عمل نظام الصلاحيات المشهور للأستاذ العبادي والمطلوب هو ضبط الأكواد الأصلية بها بإضافة اسماء الحقول الجديدة في جدول المستخدمين Users بالإضافة لجدول مستوي الصلاحية Permission Level وشكراً ضبط وحدة نمطية علي حقول جدول.accdb

للرفع

أ @ابا جودى السلام عليكم ارجو أن تسمح لي أخي العزيز بالتوضيح بصدر رحب فيبدو أن الأمر قد أختلط علي حضرتك من جهتين: الأول: أني عندما توجهت إليك باعتبارك أدري الأخوة بتفاصيل وخبايا نظام صلاحيات أ العبادي نظراً لمحاولاتك المتعددة لتطويره وذلك لضبط ما لم استطع ضبطه في عملي وأتمني أن تعيد قراءة ما رفعته أنت من كلامي لتدرك (أني طلبت منك أن يتم التعديل حسب ما تم إضافته من حقول جديدة في جدول المستخدمين الخاص بي) وهذا ما لم يحدث في مثالك المرفوع رغم أني رفعت لك هذا الجزء من عملي لتعدل عليه. الثاني: أن رفعك لمثالك هنا في هذا الموضوع ظننا أنه إجابة لطلبي كان في غير محله لأن تفاصيل الموضوع هنا تختلف في أهدافها عن الذي طلبته منك بالتحديد كما أسلفت من ضبط صلاحيات أ العبادي علي ما أرفقته لك. أتمني أن الرؤية تكون قد أتضحت لك بما يكفي حتي لا تزعل بهذا الشكل فأنت أخ كريم في استجابتك قدر جهدك ووقتك والكل يعلم بذلك ونتمني لك الشفاء العاجل إن شاء الله

أ محمد عصام شكراً لمشاركتك لنا رغم حالتك الصحية ولكن مازال مثالك بعيد عما أريد

للرفع والمساعدة