السلام عليكم ورحمة الله وبركاته
لدي شريط قوائم كما هو موضح في المثال المرفق ادناه معمول عن طريق
الماكرو والصلاحيات معمولة عن طريق معالج نظام المستخدمين ارغب اذا لم يكن
لدى المستخدم صلاحيات بالدخول ان يكون العنوان مثلا : تسجيل بيانات موظف
جديد غير ممكن
بدلا من الرسالة التي تظهر ( عفوا ليس لديك صلاحيات لفتح هذا النموذج )
يعني
enabled = false
شاكرا ومقدرا لكم ذلك
ولكم اطيب تحياتي وتقديري
للرفع
اخى ما اسم القائمة التى تستخدمها
حاولت ان اجدها و لكنى لم افلح
اخي العزيز mrnooo2000
طريقة عملها في الفيجوال بيسك سهلة جدا ولكن لم استطيع عملها على الاكسس 00 ياعزيزي اريد العنوان الذي في شريط القوائم اعلاه والذي يحتوي على العناوين :
تسجيل بيانات موظف جديد
تسجيل انهاء خدمة
تسجيل العقود
اذا لم يكن لدى المستخدم الصلاحيات بفتح النموذج ان يستبدل الرسالة التي تفيد بعدم الصلاحيات بفتح النموذج بان يتم تظليل العنوان 00 انا وضحت ذلك على النموذج نفسه 00
شكرا جزيلا واسف على الازعاج
انا اعدت تنزيل المثال
اخى اعلم ما تريد
و لكن انا سألت سؤال و لم تجبنى
ما اسم القائمة menubar
الذى تم اضافته الى القاعدة حتى يتم التطبيق عليه
عموما هذا هو الكود الذى يمكنك من خلاله الوصول الى ما تريد
Application.CommandBars("menubar-name").Controls("controlname").Controls("subcontrolname").Enabled = falseتم تعديل هذه المشاركة بواسطة mrnooo2000 في 20 سبتمبر 2010 في 22:44
اخي الكريم mrnooo2000
اعتذر قبل كل شي على ازعاجك ولكن بدات معي من البداية الله يجزاك خير واطلعت على ما اريده على اي حال كرما منك هل ممكن تعمل لي مثال بسيط وتطبق عليه الكود 00 اللي اعطيتني 0
اكون لك من الشاكرين وفقك الله
انا في انتظارك
وشكرا
الله يجزيك خير مثال ممتاز ومفهوم وحل عندي اشكال كبير مستقبلا وهذا هو المطلوب بالفعل
ولكن المشكلة انني لم اعمل القائمة menu bar كما عملتها انت من تخصيص واشرطة الادوا ت 0000 والخ
انما عملتها انا من الماكرو عن طريق الاجراء AddMenu ثم اسم القائمة ثم اسم الماكرو لاحظ ذلك في وحدات الماكرو ولذلك تبقى الاشكالية
فهل بالامكان ان يطبق الكود على الماكرو AddMenu
كما تم تطبيقه في مثالك على القائمة menu bar
مع اطيب تحياتي
نعم اخى ممكن
استخدم هذا الكود
DoCmd.SetMenuItem 0, 0, , acMenuGray
و لاعادة التفعيل استخدم
DoCmd.SetMenuItem 0, 0
تم تعديل هذه المشاركة بواسطة mrnooo2000 في 20 سبتمبر 2010 في 02:50
جزاك الله الف خير وبارك الله فيك وكتب ذلك في موازين حسناتك 00 شكرا لك ولكل القائمين والمشاركين في هذا المنتدى
واسف على الاطالة وكثرة الاستفسارا ت
والله يوفقكم لما يحبه ويرضاه
مع اطيب تحياتي وتقديري