إخواني
لغيت خاصية مفتاح shift وعلمت ذر ليعيد الخاصية بكلمة سر ولكن اثناء عمل الكود نسيت اضع end if في نهاية كود الذر الذي يعيد خاصية shift فالقاعدة اصبحت تفتح مع إلغاء خاصية shift وحاولت الدخول لكن دون جدوى
فعملت قاعدة بيانات فارغة وسحبت كل البيانات فيها وبالفعل تعاملت معها ولكن انا عندي بعض نماذج (عنصر تحكم علامة جدولة) المشكلة فيها انها لا يتغير لونها للون الذي اريده مع اني عملت نمط الخلفية شفاف
أرجوا المساعدة
1. هل استطيع دخول القاعدة الأصلية
2. هل استطيع تلوين (عنصر تحكم علامة جدولة)
وشكراً
السلام عليكم
بصراحة أنا ماجربت ولكن أريد منك خدمة:
ممكن ياأخي ترسل لي الكود الذي يلغي الشفت
وجزاك الله خير
فلسطين الزاهية بألوان الحب والسلام
ذلك الطعم الزيتوني الذي يتدفق عسلاً من أفواه بساتينها وحدائقها
تشتاق إليها نفوس المتقين وترنوا للسجود فيها جباه المسلمين
السلام عليكم ورحمة اللو وبركاته
انتظر اجابة احد المشرفين على سؤالك ولمن اريد ان اقول لك احتفظ بنسخه لم يتم الغاء الشفق بها حتى اذا اردت ان تعدل عدلت فيها ووضعتها مكان القاعدة التى لاتسطيع فتحها المقفوله بشفت مع سحب الجداول من القاعده المشفره الى القاعده الجديده حتى تسطيع الاحتفاظ ببياناتك ومن ثم تحل القاعده الجديده مكان القديمه وتشفيرها ايضا واحتفاظ بنسخه جديده ثالثه غير مشفره لاخر تعديلات لك
اللهم اغفر لى وللمسلمين
أخي الكريم توجد برامج تعيد عمل الشفت للقاعدة ..
وعلى أي حال هذا كود ضعه في ملف أكسس جديد ونفذه سيقوم بإعادة عمل مفتاح الشفت للقاعدة المقفلة :
Dim Dbs As New Access.Application
Dbs.OpenCurrentDatabase "ضع هنا مسار واسم الملف المطلوب"
Dbs.CurrentDb.Properties("AllowBypassKey") = False
Dbs.CloseCurrentDatabaseتم تعديل هذه المشاركة بواسطة مهند عبادي في 7 أكتوبر 2004 في 20:27
هذا هو المثال للإلغاء او اتاحة مفتاح shift
هذا الموضوع مغلق.
