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

مساعدة في الصلاحيات

بدأه ابوعليArm في 28 أغسطس 2014 · 10 رد · 468 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته ،،،

إخواني الأعزاء تحية طيبة وبعد ،،،

 

لدي برنامج لإدخال فواتير ولدي مستحدم بإسم   " المالك " ومستخدم بإسم " مسؤول مبيعات " ووضعت نموذج لبدء التشغيل في أدوات بدء التشغيل ولكن ما أريد تعلمه منكم هو كيف يمكن عند دخول المستخدم " مسؤول مبيعات " أن يبدأ البرنامج بنموذج آخر ليس فيه أزرار أمر للحذف وقد قمت بإعداد نموذج آخر ليس فيه أزرار أوامر للحذف فكيف يمكن أن يبدأ البرنامج عند دخول " مسؤول مبيعات " إلى النموذج الذي بدون أزرار الحذف . 

شاكرا لكم تعاونكم .

أرجو ممن لديه الفكرة لمساعدتي أن يزودني بها وشكرا جزيلا .

#2

وعليكم السلام اخي ابوعلي :)

 

اعمل نموذج اولي ، وليكن اول نموذج تفتحه قاعدة البيانات بعد إدخال اسم المستخدم ،

واجعله مخفي ،

وفي الحدث عند تحميل ضع كود يفحص currentuser او اسم المستخدم ،

وعليه تفتح النموذج المطلوب لكل مستخدم ، او لكل مجموعة من المستخدمين :)

 

جعفر

#3

أخي الكريم  / جعفر 

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

فهل هناك شيء لم أفهمه منك بصورة صحيحة ام أني لم أعرف كيف أجعله مخفي .

ومرة أخرى أشكرك على اهتمامك .

#4

لوسمحت ترفق نسخة مصغرة من برنامجك ، فيه الصلاحيات ، وسأحاول ان انفذ ما قلته لك :)

 

جعفر

#5

السلام عليكم أخي / حعفر 

تحية طيبة وبعد ،،،

كيف لي أن أرسل نسخة مصغرة ، فأنا لا أخفيك سرا فإني جديد في التواصل عن طريق المنتدى وليس لدي الخبرة الكافية في هذه الأمور .

شاكرا لك تعبك وتفهمك . 

#6

السلام عليكم 

لم أستلم اي رد منك جزاك الله الخير .

وشكراً

#7

تفضل :)

 

>اعمل نموذج اولي ، وليكن اول نموذج تفتحه قاعدة البيانات بعد إدخال اسم المستخدم ، فيه هذا الكود:

Private Sub Form_Load()
	
	This_Form_Name = me
	
' Show certain Forms based on CurrentUser()

    If CurrentUser() = "مسؤول مبيعات" Or CurrentUser() = "مسؤول مبيعات2" Or CurrentUser() = "مسؤول مبيعات3" Then
		docmd.openform "Forms_With_No_Buttons"
        'Forms![Main_Page]![Command108].Visible = -1
    Else
		docmd.openform "Forms_With_Buttons"
        'Forms![Main_Page]![Command108].Visible = 0
    End If

	docmd.close acForm, This_Form_Name
	
End Sub

جعفر

#8

أخي / جعفر الغالي 

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

ولكن طمعي في كرمك وصبرك علينا ألجألني إلى أن أطلب منك خدمة أخرى و هي :

أني لدي نموذج يأخذ بياناته من جدول وبه نموذج فرعي يأخذ من إستعلام وبالتالي فإن ما أريده هو عند فتح النموذج يعطيني رسالة لإدخال رقم الفاتورة للبحث عنها برقم الفاتورة .

وجزاك الله الخير . 

أخوك أبو علي . 

#9

حياك الله ابوعلي :)

 

ما فهمت سؤالك :(

رجاء تعطيني تفاصيل اكثر ، وبمثال لو سمحت ،

وما هو الحقل الذي يربط النموذج الرئيسي بالفرعي؟

 

جعفر

#10

أخي جعفر  الغالي / 

أنا لدي نموذج للإستعلام عن فاتورة البيع trans_in وهو يأخذ بياناته من جدول add_doc  وداخله نموذج فرعي يأخذ بيانات العمليات من جدول العمليات transaction .

فعندما أريد أن أبحث عن فاتورة معينة فإني أريد أن أدخل رقم الفاتورة ثم يفتح لي النموذج به بيانات الفاتورة كاملة .

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

فلزم أن يأخذ النموذج بياناته من جدول add_doc وايضا به نموذج فرعي لعمليات الفاتورة التي تمت بها وهو transaction .

والحقول المرتبطة بهاذين النموذجين هما  :  من جدول add_doc     حقل   add_doc وهو رقم الفاتورة وهو ترقيم تلقائي 

                                                    و أيضا حقل supplier_doc_no  وهو رقم فاتورة المورد . 

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

عسى أن أكون فصلت لك كل شيء 

شاكرا لك مجهودك . 

#11

ياريت يا ابوعلي ترفق لي برنامجك اللي فيه هذه الجزئية فقط ، فالموضوع سيكون واجد اسهل لي افهمه واشوفه واتابعه معاك ، وان شاء الله نتوصل لحل له :)

 

جعفر

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