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

[ تمت الإجابة ]فتح نموذج داخلي بكلمة مرور

بدأه malik2010 في 20 مايو 2010 · 7 رد · 882 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخواني الاعزاء

مشرفين هذا المنتدى الكبير

لدي سؤال ...

هل يمكن عمل كلمة مرور لفتح نموذج معين من داخل نموذج رئيسي

بمعنى عند الضغط على زر فتح نموذج معين يخرج رسالة او نموذج اخر يطلب فيه ادخال كلمة مرور لفتحه

وبارك الله فيكم

سيد الاستغفار

{ اللهم أنت ربي لا إله إلا أنت خلقتني وأنا عبدك وأنا على عهدك ووعدك ما استطعت أعوذ بك من شر ما صنعت أبوء لك بنعمتك علي وأبوء لك بذنبي فاغفر لي فإنه لا يغفر الذنوب إلا أنت}

من قالها من النهار موقنا بها فمات من يومه قبل أن يمسي فهو من أهل الجنة ومن قالها من الليل وهو موقن بها فمات قبل أن يصبح فهو من أهل الجنة .رواه البخاري

#2
malik2010 كتب:

اخواني الاعزاء

مشرفين هذا المنتدى الكبير

لدي سؤال ...

هل يمكن عمل كلمة مرور لفتح نموذج معين من داخل نموذج رئيسي

بمعنى عند الضغط على زر فتح نموذج معين يخرج رسالة او نموذج اخر يطلب فيه ادخال كلمة مرور لفتحه

وبارك الله فيكم

هلا أخي مالك ..أرجو منك رجاء أخي مالك أن لا توجه السؤال لمجموعة معينة أو شخص معين وذلك لكي يتفاعل معك الجميع . وكلنا أخوة بإذن الله . :)

هذه وصفة من الدكتورة أم عهود حفظها الله من كل شر واسكنها الفردوس الأعلى من الجنة هي ومن تحب ... اللهم آمين ..

تقبل تحياتي ..

zaMasterPassword-UP.rar

27169617.gif
#3

حياك الله يا اخي ابو عدنان

انت تأمر

اشكرك واشكر ام عهود على المثال الجميل

قمت بعمل الخطوات لكن خرجت لي خطأ كما في الصورة المرفق وهل يجب وضع ملفي الموديل في البرنامج لبرنامجي

وهناك ملاحظة على نفس برنامج الاخت زهرة عند حذف الجميع يطلب كلمة سر ، هل يمكن ايضاً عند حذف ملف واحد ان يطلب كملة سر .

وبارك الله فيك

post-227663-12743563447878_thumb.jpg

سيد الاستغفار

{ اللهم أنت ربي لا إله إلا أنت خلقتني وأنا عبدك وأنا على عهدك ووعدك ما استطعت أعوذ بك من شر ما صنعت أبوء لك بنعمتك علي وأبوء لك بذنبي فاغفر لي فإنه لا يغفر الذنوب إلا أنت}

من قالها من النهار موقنا بها فمات من يومه قبل أن يمسي فهو من أهل الجنة ومن قالها من الليل وهو موقن بها فمات قبل أن يصبح فهو من أهل الجنة .رواه البخاري

#4
malik2010 كتب:

قمت بعمل الخطوات لكن خرجت لي خطأ كما في الصورة المرفق وهل يجب وضع ملفي الموديل في البرنامج لبرنامجي

وهناك ملاحظة على نفس برنامج الاخت زهرة عند حذف الجميع يطلب كلمة سر ، هل يمكن ايضاً عند حذف ملف واحد ان يطلب كملة سر .

وبارك الله فيك

نعم اخي الكريم

يجب استيراد الوحدتين النمطيتين الى برنامجك حتى لا تظهر لك اي رسالة خطأ

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

الرقم السري العام هو zahrah2006

zaMasterPassword-UP2.rar

بالتوفيق

#5

الاخت زهرة

الف الف شكر وبارك الله فيكي

وانا سعيد جداً لردك لي لاول مرة على سؤلاتي

تحياتي......

سيد الاستغفار

{ اللهم أنت ربي لا إله إلا أنت خلقتني وأنا عبدك وأنا على عهدك ووعدك ما استطعت أعوذ بك من شر ما صنعت أبوء لك بنعمتك علي وأبوء لك بذنبي فاغفر لي فإنه لا يغفر الذنوب إلا أنت}

من قالها من النهار موقنا بها فمات من يومه قبل أن يمسي فهو من أهل الجنة ومن قالها من الليل وهو موقن بها فمات قبل أن يصبح فهو من أهل الجنة .رواه البخاري

#6

الاخت ام عهود

لقد قمت بتجربة البرنامج فخرج لي الخطأ التالي :

ارجو الافادة

post-227663-12745181036085_thumb.jpg

سيد الاستغفار

{ اللهم أنت ربي لا إله إلا أنت خلقتني وأنا عبدك وأنا على عهدك ووعدك ما استطعت أعوذ بك من شر ما صنعت أبوء لك بنعمتك علي وأبوء لك بذنبي فاغفر لي فإنه لا يغفر الذنوب إلا أنت}

من قالها من النهار موقنا بها فمات من يومه قبل أن يمسي فهو من أهل الجنة ومن قالها من الليل وهو موقن بها فمات قبل أن يصبح فهو من أهل الجنة .رواه البخاري

#7

اخي الفاضل

ما هي اصدارة الأكسيس التي لديك هل هي 2000 او 2003 ؟

عموما اذا كان ظهر لديك مثل هذا الخطا في الكود فقم بالتصريح للعبارتين

str_Title و str_Prompt على انهما عبارات نصيه

وسيكون الكود بهذه الطريقه

Private Sub MASTER_Click()
Dim str_Title As String
Dim str_Prompt As String
TimerId = SetTimer(0, 0, 1, AddressOf TimerProc)
str_Title = "الرقم السري مطلوب"
str_Prompt = "أدخل الرقم السري"
If InputBox(str_Prompt, str_Title) = "zahrah2006" Then
    	MsgBox "تفضل بالدخول", , "الرقم السري صحيح"
    	DoCmd.Close
    	DoCmd.OpenForm "P", acNormal
   Else
    	MsgBox "لا يمكنك الدخول", , "الرقم السري خاطئ"
    	Exit Sub
    	End If
End Sub
#8

اختي ام عهود

الاوفس لدي 2003

انا كنت شاك في هذا الامر باضافة تعريف لهذه الاسماء:

str_Title =

str_Prompt =

على كلاً الف الف شكر

اشتغل الامر 100% بعد التعديل

والسلام عليكم ..........

سيد الاستغفار

{ اللهم أنت ربي لا إله إلا أنت خلقتني وأنا عبدك وأنا على عهدك ووعدك ما استطعت أعوذ بك من شر ما صنعت أبوء لك بنعمتك علي وأبوء لك بذنبي فاغفر لي فإنه لا يغفر الذنوب إلا أنت}

من قالها من النهار موقنا بها فمات من يومه قبل أن يمسي فهو من أهل الجنة ومن قالها من الليل وهو موقن بها فمات قبل أن يصبح فهو من أهل الجنة .رواه البخاري

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