Tarekfathallah قام بنشر ديسمبر 26, 2015 قام بنشر ديسمبر 26, 2015 السلام عليكم ارجو المساعدة بقفل نموذج او كبسة command برقم سري ما هي الطريقة وكيفية تركيبها ولكم جزيل الشكر ----------------------- للرفع ---------------------------------
Tarekfathallah قام بنشر ديسمبر 27, 2015 الكاتب قام بنشر ديسمبر 27, 2015 يا اصحاب الخبرة والاساتذة بحاجة الى جواب معجل جدا للرفع
jjafferr قام بنشر ديسمبر 27, 2015 قام بنشر ديسمبر 27, 2015 حياك الله أخي طارق انا زرت موضوعك اكثر من مرة بالامس ، وما فهمت المطلوب ، فانتقلت الى الرد على اسئلة اخرى لذا ، وكما طلبت منك سابقا ، رجاء توضيح المطلوب بالتفصيل وخطوة خطوة ، وبأمثلة اذا لزم الامر جعفر
Tarekfathallah قام بنشر ديسمبر 27, 2015 الكاتب قام بنشر ديسمبر 27, 2015 الشكر لك اخ جعفر السؤال هو طريقة لقفل نموذج لدي برقم سري لا يمكن الدخول اليه الا عبر وضع كلمة سر او كبسة command لفتح النموذج لاتفتح الا عند ادخال الكود ولو انني اخالف قواعد المنتدى بس انا بعدني بنفس الموضوع هل يمكن قفل جدول برقم سري والطريقة لو سمحت واشكرك جزيلا واتعبتك معي ولكنني مضطر ومستعجل جدا واذا احببت ممكن ارفاق قاعدة بياناتي وشكرا لك للرفع
Tarekfathallah قام بنشر ديسمبر 28, 2015 الكاتب قام بنشر ديسمبر 28, 2015 السلام عليك اخ ابو عيشه وشكرا لمرورك , غير صحيح ليس هذا المطلوب ك المطلوب لدي نموذج form لا يفتح الا بكود يعني لازم تطلعلي صفحة وتقولي ادخل الكود لتستطيع الدخول ( اعتقد انه يتم تركيبه على كبسة الزر command ) وهل يمكن قفل جدول برقم سري اي اذا ضغططت غليه مرتين يفتحلك صفحة تقول لك ادخل الرقم السري لتقوم بمشاهدة محتوى الجدول وشكرا (كما يتم في قاعدة البيانات عند اقفالها برقم سري ) للرفع
jjafferr قام بنشر ديسمبر 28, 2015 قام بنشر ديسمبر 28, 2015 السلام عليكم أخي طارق انا عملت لك المرفق على عجالة ، واستوردت شوية وحدات نمطية من برامجي البرنامج عبارة عن قسمين: - BE وفي الجداول (جدول واحد حاليا) ، وكلمة السر هي jj - FE وبه نموذج ، وكلمة السر لفتح النموذج هي 1234 الخطوة الاولى هي ربط FE بالـ BE : افتح النموذج بالطريقة العادية ، وسوف يطلب منك معرفة اين الـ BE ، وعندما تختاره وتدخل كلمة السر jj ويفتح النموذج ، اغلق النموذج. الآن شغل البرنامج بالطريقة العادية ، وستلاحظ اللي طلبته موجود جعفر 297.FE_BE_Password_Both.zip 2
Tarekfathallah قام بنشر ديسمبر 28, 2015 الكاتب قام بنشر ديسمبر 28, 2015 الشكر لك اخ جعفر اتمنى ان يكون هو المطلوب ولكن ملف be لم يفتح اتمنى اعادة تحمياه مرة اخرى ويا ليت تشريح لي هالاكواد الكبيرة في الموديول لماذا واعتذر منك لتحملي و اشكرك جزيل الشكر للرفع شكرا لمرورك اخ حلمي نعم هذا فيما خص كبسة الكومند ولكن ماهي كلمة السر واين اضعها في الموديول وشكرا لك للرفع
jjafferr قام بنشر ديسمبر 28, 2015 قام بنشر ديسمبر 28, 2015 تفضل هذا المرفق الجديد ، وان شاء الله يعمل المرفق واللي فيه اما الكود ذو الـ 1000 سطر ، فهو لإعادة ربط الـ FE مع BE ، ولا تهتم فيه ، فهو يعمل في الخلفية ولا يؤثر على شئ وممكن تستفيد من فكرة الاخ bhelmy وتستخدمها بدل الطريقة اللي انا عملتها لفتح النموذج ، بس اول شئ جرب برنامجي مثل ماهو جعفر 297.FE_BE_Password_Both_mdb.zip ولما تنتهي من هذه الخطوة ، يجب عليك حماية قاعدة البيانات بالكامل ، ومنع استعمال زر الشفت والدخول على البرنامج في هيئة التصميم ، وهذا الرابط يعطيك المطلوب: http://www.officena.net/ib/topic/62892-الحماية-من-برنامج-الغاء-وتمكين-الشفت-shift/ جعفر 2
Tarekfathallah قام بنشر ديسمبر 29, 2015 الكاتب قام بنشر ديسمبر 29, 2015 اخ جعفر ادامك الله ووفقك هذا ما اريده ولكنني كيف ساطبقه على برنامجي وماذا سأستورد لبرنامجي ليتم عليه وهل تنفع هذه الطريقة اذا كنت اعمل ضمن مجموعة عمل وشكرا سأرسل لك قاعدة بياناتي اليوزر tarek الباسورد 26180 للرفع عذرا لم استطع الرفع سوى هكذا https://onedrive.live.com/redir?resid=F60EA5D0AE635104!420&authkey=!AEDL4dW8zgsfR5A&ithint=file%2crar شكرا لك اخ حلمي بانتظار اعلامي عن الرقم السري لفتح الكومند وشكرا لك للرفع
bhelmy قام بنشر ديسمبر 29, 2015 قام بنشر ديسمبر 29, 2015 اعتذر عن التاخر في الرد كلمه السر موجوده في Modules1 Public Function TEST() Dim strAdminPWord As String strAdminPWord = InputBoxDK("Password required to proceed.", "Enter Licence Code") If strAdminPWord = "password" Then MsgBox "cool Password Correct ", vbOKOnly, "success" DoCmd.OpenForm " Form2 " Else MsgBox ("You entered an invalid password") ' Exit Sub End If End Function 2 دقائق مضت, bhelmy said: اعتذر عن التاخر في الرد كلمه السر موجوده في Modules1 بالون الاحمر واسم الشاشه بالون الاخضر Public Function TEST() Dim strAdminPWord As String strAdminPWord = InputBoxDK("Password required to proceed.", "Enter Licence Code") If strAdminPWord = "password" Then MsgBox "cool Password Correct ", vbOKOnly, "success" DoCmd.OpenForm " Form2 " Else MsgBox ("You entered an invalid password") ' Exit Sub End If End Function
jjafferr قام بنشر ديسمبر 29, 2015 قام بنشر ديسمبر 29, 2015 5 ساعات مضت, tarek_f26180 said: اخ حلمي بانتظار اعلامي عن الرقم السري لفتح الكومند وشكرا لك ايش رايك بكلمة سر متغيرة ، يعني مافي داعي تخاف احد يشوفها ، لأنها تتغير دائماً كل دقيقة ،شوف الرابط وبقية المشاركات والمرفقات: http://www.officena.net/ib/topic/59387-إزالة-اشارة-الصح-من-خانة-الاختيار-بكلمة-مرور/#comment-383007 جعفر
Tarekfathallah قام بنشر ديسمبر 29, 2015 الكاتب قام بنشر ديسمبر 29, 2015 (معدل) اخ جعفر حياك الله الرجاء افادتي من خبرتك عن كيفية تطبيق البرنامج عبارة عن قسمين: - BE وفي الجداول (جدول واحد حاليا) ، وكلمة السر هي jj - FE وبه نموذج ، وكلمة السر لفتح النموذج هي 1234 الخطوة الاولى هي ربط FE بالـ BE : افتح النموذج بالطريقة العادية ، وسوف يطلب منك معرفة اين الـ BE ، وعندما تختاره وتدخل كلمة السر jj ويفتح النموذج ، اغلق النموذج. قسمت قاعدة بياناتي ولكن لم اعرف ماذا يجب استيراده من مويولات وعلى اي نموذج للرفع https://www.dropbox.com/s/8gx3ci8bixhpz77/tito.rar?dl=0 https://onedrive.live.com/?id=F60EA5D0AE635104!421&cid=F60EA5D0AE635104 https://onedrive.live.com/redir?resid=F60EA5D0AE635104!421&authkey=!AFIdkYE3NII48Yg&ithint=folder%2cLNK تم تعديل ديسمبر 29, 2015 بواسطه tarek_f26180
jjafferr قام بنشر ديسمبر 30, 2015 قام بنشر ديسمبر 30, 2015 (معدل) السلام عليكم أخي طارق الشئ الوحيد الذي لم اعمله هو ان اضع كلمة السر على النموذج ، حيث انك لم تذكر اسم النموذج الذي تريد ان تضع عليه كلمة السر!! وسؤال آخر ، ما دمت تستخدم ملف الحماية mdw ، فما الداعي لعمل نموذج خاص للإسم المستخدم وكلمة السر؟ فإذا كنت تريد ان تستخدم اسم المستخدم لأغراض التحكم في الصلاحيات ، فتستطيع عن طريق User and Group Permissions ان تفعل ذلك ، واذا اردت اسم المستخدم لأي سبب كان ، فهو موجود في CurrentUser اليك طريقة عمل كلمة السر لجزء الجداول: افتح برنامج الاكسس (ليس برنامجك ، ولكن الاكسس شخصيا ) ، ثم . . وكلمة السر التي استعملتها هي jj . وعندما تغلق البرنامج وتفتحه مرة اخرى: . اما كيفية وما هي الكائنات المطلوب استيرادها من FE اللي انا عملته ، فاليك الخطوات: افتح برنامجك FE ، ثم: . النموذج هذا ، حتى نستخرج منه طريقة عمل كلمة سر فتح النموذج ، ثم نستطيع حذفه من البرنامج . الماكرو AutoExec معناه انه اول شئ يشتغل لما تفتح برنامجك ، ولا داعي للذهاب الى اعدادات البرنامج واختيار النموذج الاساسي ليفحه البرنامج عند تشغيله ، وسنتكلم لاحقا عن هذا الماكرو . الوحدة النمطية basJStreetAccessRelinker تقوم بربط FE مع BE كلما لم يجد الـ FE جداول BE في مكانها ، وستلاحظ عند فتحك FE لأول مرة ، انه يفتح لك نافذة ويطلب مكان BE ، اما الوحدة النمطية m_Turn_Off فقد عملتها لجعل البرنامج يشغل ويملئ الشاشة ، ولا يعطي المستخدمين ادوات التصميم: . وقبل استعمال البرنامج ، يجب تعديل الماكرو AutoExec حتى يقوم بالخطوات التي نريدها . نغلق البرنامج ، ثم نفتحه ، فيطلب منا مكان BE (اول مرة فقط) . ولأن BE محمي ، فعند الربط بين FE و BE لأول مرة ، فيجب ادخال كلمة السر (وكلمة السر jj ، وستدخلها مرة واحدة فقط ، ولن يطلبها منك البرنامج مرة اخرى) . الى هنا وانتهينا من ربط FE و BE ، ولكن هناك بعض الامور الاخرى التي تستطيع عملها لتسهيل عملك ، او لزيادة الامان: يمكنك ان تستخدم الاختصار (عادة تضعه على سطح المكتب) ، وتضع فيه اسم المستخدم وكلمة السر ، وعند النقر عليه مرتين ، لا يسألك عن كلمة السر ، وطبعا هذا ممكن ان تستخدمه انت كمصمم ، ولا تسمح للمستخدمين ان يدخلوا بياناتهم: . وهذه هي المعلومة كاملة (طبعا لازم تغيرها حسب بياناتك وبيانات كمبيوترك) ، وطبعا يستطيع اي شخص يفهم الاكسس ان يدخل الى هنا ومعرفة اسم المستخد وكلمة السر ، لذا انتبه لها ، او لا تستعملها اصلا: . هناك شئ آخر استعمله انا في برامجي ، وهو نوع من الحماية ايضا ، وهو انك لا تسمح للبرنامج ان يفتح اذ لم يُفتح عن طريق اختصار المكتب ، فالبرنامج يعطي رسالة بانك غير مخول ، ثم يغلق البرنامج ، هذا مفيد اذا احد المستخدمين اخذ نسخة من البرنامج ، فلن يشتغل له في البيت (طبعا كلامنا كله ليس عن الشخص الخبير بالاكسس) ولعمل هذا ، نضع الكود على اول نموذج يتم فتحه (وهو نفس المكان الذي نضع عليه كلمة سر النموذج): . والكود هو: . جعفر 332.tito.zip تم تعديل ديسمبر 30, 2015 بواسطه jjafferr 2
wael_rafat قام بنشر ديسمبر 31, 2015 قام بنشر ديسمبر 31, 2015 السلام عليكم مبدع استاذنا جعفر بارك الله فيك حلو موضوع الشورت كت دا ... بس شوية شوية علينا ... مثلا انا عندي برنامج اسمة ABC وموجود على البارتشن D عند فتح البرنامج من البارتشن D لا يفتح ويعطينى الرسالة السابقة " غير مخول بالدخول ثم يغلق البرنامج " ... وانما يفتح فقط من الشورت كت الموجود على الديسك توب هل هذا الفهم صحصيح ام انا فهمت خطأ ؟؟؟؟ حيث انني قمت بوضع الكود المذكور عند الفتح ولكن يعطيني الرسالة فى الحالتين ( البرنامج الاصلي وايضا برنامج الشورت كت ) وجزاك الله كل خير
jjafferr قام بنشر ديسمبر 31, 2015 قام بنشر ديسمبر 31, 2015 وعليكم السلام اولا ، جزء الاختصار اللي على سطح المكتب ، واسم المستخدم اللي فيه ، وكلمة السر: 1. فهذا كله يعمل فقط اذا كنت تستعمل mdb ولا يعمل على accdb ، 2. ويعمل فقط اذا عندك ملف مجموعة العمل mdw . اذا كانت الشروط هذه متوفرة عندك ، رجاء اكتب لي المعلومات اللي وضعته في الاختصار . جعفر
wael_rafat قام بنشر ديسمبر 31, 2015 قام بنشر ديسمبر 31, 2015 تمام استاذي الفاضل وضحت الرؤية جزاك الله كل خير
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.