عبد اللطيف سلوم قام بنشر April 30 قام بنشر April 30 (معدل) بناءا على طلب احد الاخوة مرفق قاعدة البيانات الرقم السري 12345 اتمنى من الاحبة الخبراء اثراء الموضوع بطرق اخرى اكثر احترافية رقم سري.accdb تم تعديل April 30 بواسطه عبد اللطيف سلوم اضافة معلومة 1 1
kkhalifa1960 قام بنشر مايو 1 قام بنشر مايو 1 (معدل) استاذ @عبد اللطيف سلوم اضافة لمسة بسيطة جعل ماسج ادخال الباسوورد نجوم (*****) .واخفاء الرقم السري بجداول النظام المخفية تفضل المرفق . رقم سري.rar تم تعديل مايو 1 بواسطه kkhalifa1960 اخفاء الرقم السري بجداول النظام المخفية 1
عبد اللطيف سلوم قام بنشر مايو 1 الكاتب قام بنشر مايو 1 12 ساعات مضت, kkhalifa1960 said: استاذ @عبد اللطيف سلوم اضافة لمسة بسيطة جعل ماسج ادخال الباسوورد نجوم (*****) .واخفاء الرقم السري بجداول النظام المخفية تفضل المرفق . رقم سري.rar 41.21 kB · 5 downloads السلام عليكم هناك مشكلة
kkhalifa1960 قام بنشر مايو 2 قام بنشر مايو 2 استاذ @عبد اللطيف سلوم المرفق يعمل بكفاءة كما بالشرح . ووضحت لك مكان جدول النظام الذي به الباسوورد . 1
عبد اللطيف سلوم قام بنشر مايو 2 الكاتب قام بنشر مايو 2 53 دقائق مضت, kkhalifa1960 said: استاذ @عبد اللطيف سلوم المرفق يعمل بكفاءة كما بالشرح . ووضحت لك مكان جدول النظام الذي به الباسوورد . يمكن السبب انا عندي اوفيس 64 بت وحضرتك عندك نظام 32 بت المديول ضفت له ptrsafe
kkhalifa1960 قام بنشر مايو 2 قام بنشر مايو 2 تابع شرح استاذنا @jjafferr من هنا لتبديل المكتبات لتعمل على النواتين . 1
Foksh قام بنشر مايو 2 قام بنشر مايو 2 (معدل) 11 ساعات مضت, عبد اللطيف سلوم said: السلام عليكم هناك مشكلة فعلا الكود يعمل على نظام 32 بكفاءة ، لكن على نظام 64 فلا يعمل عند إضافة الجزء Ptrsafe كما حاول الأستاذ @عبد اللطيف سلوم 😉 . لربما موضوع أستاذنا جعفر واسع النطاق وأساس الإجابة كما تفضل استاذ خليفة . تم تعديل مايو 2 بواسطه Foksh عدم ظهور الردود الأخيرة إلا بعد الرد ، لذا وجب التعديل 1
أفضل إجابة Ahmos قام بنشر مايو 2 أفضل إجابة قام بنشر مايو 2 السلام عليكم ورحمة الله وبركاته تفضل أخي الكريم الملف المعدل يعمل علي النواتين 32x and 64x بالتوفيق A_رقم سري.zip 1
عبد اللطيف سلوم قام بنشر مايو 2 الكاتب قام بنشر مايو 2 57 دقائق مضت, Ahmos said: السلام عليكم ورحمة الله وبركاته تفضل أخي الكريم الملف المعدل يعمل علي النواتين 32x and 64x بالتوفيق A_رقم سري.zip 71.59 kB · 1 download
شايب قام بنشر مايو 2 قام بنشر مايو 2 23 ساعات مضت, عبد اللطيف سلوم said: هناك مشكلة 11 ساعات مضت, Foksh said: فعلا الكود يعمل على نظام 32 بكفاءة ، لكن على نظام 64 فلا يعمل عند إضافة الجزء Ptrsafe 11 ساعات مضت, Ahmos said: تفضل أخي الكريم الملف المعدل يعمل علي النواتين 32x and 64x بالتوفيق السلام عليكم اخونا الكبير شايب يعتقد ان طريقة جعفر للعمل على النواتين طريقة شاملة ولكن في مثل هذه الحالة التي واجهت الاستاذ سلوم بعد اضافة Ptrsafe فقط يكفي ان نقوم بتغير اي متغير رقمي من long الى LongLong او الى LongPtr وسوف يعمل البرنامج ويختصر عدة اسطر من الكود اخير LongPtr ليس نوع بيانات حقيقي وانما يتوافق مع الاصدرين 32 و 64 بحيث يتحول الى long مع 32 و longlong مع 64 ايضاح اخير يمكن تقيد فتح النموذج الاخير بحيث لا يمكن فتحه الا من خلال زر الامر بعد كتابة الرمز الصحيح ولكن نكتفي بهذه المشاركة اخونا الشايب رقم سري.accdb 2
شايب قام بنشر مايو 2 قام بنشر مايو 2 1 ساعه مضت, شايب said: بعد اضافة Ptrsafe علما بان اخينا الفاضل شايب سبق ان اشار الى موضوع مشابه في هذة المشاركة ⬇️ اقتباس الشايب
ابو جودي قام بنشر مايو 3 قام بنشر مايو 3 السلام عليكم ورحمة الله تعالى وبركاته وانا فايت لاقيت استاذنا الجليل اخوانا @شايب قلت فى نفسى لا لابد من المرور والقاء السلام ومشاركة مع احبائى فى الله اليكم فكرة بدون دوال وهى الاحب الى قلبى الشرح 1- انشاء وحدة نمطية عامة وظيفتها الاعلان عن متغيرات عامة وهى كالاتى Public strPasswordPrompt As String Public boolPasswordPrompt As Boolean 2- ننشئ نموذج لكلمة السر على ان يكون اسمه frmPasswordPrompt وبه مربع النص لكتابة كلمة السر على ان يكون اسمه txtPassword زر امر التأكيد على ان يكون اسمه btnConfirmation ونضع الكود الاتى لزر الامر boolPasswordPrompt = True strPasswordPrompt = Nz(Me.txtPassword.Value) DoCmd.Close acForm, Me.Name وهنا نطلب منه انه يلحق القيمة True الى المتغير العام boolPasswordPrompt وان يلحق القيمة التى سوف يتم كتابتها فى مربع النص txtPassword الى المتغير العام strPasswordPrompt ثم يغلق النموذج زر امر الالغاء على ان يكون اسمه btnCancel ونضع الكود الاتى لزر الامر boolPasswordPrompt = False DoCmd.Close acForm, Me.Name وهنا نطلب منه انه يلحق القيمة False الى المتغير العام boolPasswordPrompt ثم يغلق النموذج الان يمكن استخدام كلمة سر فى اى مكان فى النموذج اما للحذف او للطباعة او لفتح نموذج حسب رغبة المصمم والان الية استدعاء هذا النموذج للعمل على زر الامر المراد قتح النموذج السرى من خلاله نضع الاكواد الاتية Const CORRECT_PASSWORD As String = "123" Const MSG_ENTER_PASSWORD As String = "Please enter a password to proceed." Const MSG_INCORRECT_PASSWORD As String = "Incorrect password. Operation canceled." Const MSG_PROCEED_SUCCESSFULLY As String = "proceed successfully!" Const MSG_OPERATION_CANCELED As String = "Operation canceled" Do DoCmd.OpenForm "frmPasswordPrompt", , , , , acDialog Select Case True Case boolPasswordPrompt Select Case True Case Nz(strPasswordPrompt, "") = "" MsgBox MSG_ENTER_PASSWORD, vbExclamation Case strPasswordPrompt <> CORRECT_PASSWORD MsgBox MSG_INCORRECT_PASSWORD, vbExclamation Case Else MsgBox MSG_PROCEED_SUCCESSFULLY DoCmd.OpenForm ChrW("1587") & ChrW("1585") & ChrW("1610") Exit Do End Select Case Else MsgBox MSG_OPERATION_CANCELED, vbExclamation Exit Do End Select Loop هذا شرح مبسط للفكرة العامة ولكن ان اردنا العمل اكثر احترافية ومرونة من خلال الاكواد فى وحدة نمطية انظر المرفق الاتى رقم سري.accdb 3
شايب قام بنشر مايو 3 قام بنشر مايو 3 6 ساعات مضت, ابو جودي said: قلت فى نفسى لا لابد من المرور والقاء السلام وعليكم السلام ورحمة الله اخي محمد 6 ساعات مضت, ابو جودي said: ولكن ان اردنا العمل اكثر احترافية ومرونة من خلال الاكواد فى وحدة نمطية انظر المرفق عمل رائع ومتميز وغير مستغرب من استاذنا الفاضل @ابو جودي الذي تعلمنا ومازلنا نتعلم منه الكثير 🌹 بالنسبة للاخ شايب يفضل استخدام نظام صلاحيات محكم وبالتالي فلا حاجة لكلمة مرور لفتح نموذج او طباعة تقرير الامر الاخر ان وضع كلمة مرور بشكل مباشر في محرر الاكواد يتطلب الدخول لوضع التصميم عند الرغبة في تغييرها وهو مالا يمكن تحقيقه عند تحويل القاعدة الى ACCDE اضافة الى ان كتابة كلمة المرور في محرر الاكواد يجعل امكانية معرفتها اكثر سهولة حتى لو تم تحويل القاعدة الى ACCDE انظر هنا ⬇️ اقتباس مداخلات اخونا الشايب تمثل رأي غير ملزم وليس الهدف منها انتقاد عمل الاخرين لذا نقول لمن يمر خذ او اترك 3
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.