الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اضافه مستخدمين واعطاء صلاحيات

بدأه vetch في 25 أغسطس 2012 · 2 رد · 727 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

قمت بعمل مشروع وتم الانتهاء منه بفضل الله تعالى ثم بمساعده من اعضاء هذا المنتدى الكريم

الان المشروع اكتمل ولكن ملىء بالاقسام

كيف اجعل لمدير المؤسسه ان يضيف مستخدمين على البرنامج ب user و password

وان يجعل لهم صلاحيات دخول شاشات وشاشات اخرى لا يمكن دخولها

شكرا

#3

بارك الله فيك ياخى

لكن انا المثال لم يفتح عندى

انا اسال عن

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

الاداره - شئون العاملين - الحسابات - المهندسين

عند فتح الموظف البرنامج بيقوم البرنامج بطلب اسم الدخول والرقم السرى ويقوم بادخاله تفتح شاشه اخرى وفيها بيانات الموظف وصلاحياته

البرنامج قائم على هذه الاركان الاربعه ولكل ركن عدد من الشاشات داخل البرنامج

انا عاوز الى ياخد صلاحيات مثلا العاملين يدخل على شاشات 1.2.3. فقط لا غير وباقى الشاشات غير متاحه

 If l3.Text = "العاملين" Then


            ' المتـــاح للعاملين 
            ' العاملين
            'cli.Enabled = True 'اضافه عميل جديد
            cli_r.Enabled = True 'تقارير العملاء


  ' الغير متاح  

            'الحسابات
            acc_r.Enabled = False   ' تقارير الحسابات
            account.Enabled = False  ' اضافه حساب جديد

  ElseIf l3.Text = "الحسابات" Then


            'الحسابات
            acc_r.Enabled = True  ' تقارير الحسابات
            account.Enabled = True  ' اضافه حساب جديد

وهكذا

لكن هذه الطريقه لم تفلح فعند دخول موظف شئون العاملين الى شاشاه الحسابات بالفعل تكون غير متاحه له لكن ستم الخروج منها ثم الدخول اليها يجدها متاحه

الرجاء الحل

تم تعديل هذه المشاركة بواسطة vetch في 8 سبتمبر 2012 في 13:35

مواضيع مشابهة