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

برنامج اللغاء وتمكين مفتاح الشفت للاستاذه زهره لايعمل لدي

بدأه younisaljbory في 26 ديسمبر 2012 · 12 رد · 5,846 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

برنامج اللغاء وتمكين مفتاح الشفت للاستاذه زهره لايعمل لدي

برنامج اكسيس 2003 قمت بمايلي

في (برنامج اللغاء وتمكين مفتاح الشفت) للاستاذه زهره من ( اضغط هنا لاختيار قاعدة البيانات) اخترت القاعدة المرفقة التي هي خاضعة لنظام المستخدمين باسم a وكلمة مرور a حاولت اللغاء وتمكين مفتاح الشفت لكنه لم يعمل لدي بحيث في كل مره يمكنني الدخول للقاعدة المرفقه عن طريق ضغط مفتاح الشفت أرجو مساعدتي بحيث أتمكن من اللغاء عمل مفتاح الشفت وتشغيله عند الحاجة يبدو ان مني لكن لا اعرفه 0 شكرا لجميع القائمين على هذا المنتدى ولمن يرفدونه يوميا بالأفكار ألنيره اللهم اجعل ذلك في ميزان حسناتهم

younis.7z

#2

اسف جدا القاعده المرفقه هي المقصوده

younis.rar

#3

اخي العزيز لايمكني فتح الملف لكوني في العمل لكن يمكنك وضع هذا الكود في قاعدة بيانات لتعطيل او تفعيل مفتاح Shift

من الافصل ان تضع هذا الكود في وحدة نمطية Moudle

كود التعطيل

Function ap_DisableShift()
'This function disable the shift at startup. This action causes
'the Autoexec macro and Startup properties to always be executed.

On Error GoTo errDisableShift

Dim db As DAO.Database
Dim prop As DAO.Property
Const conPropNotFound = 3270

Set db = CurrentDb()

'This next line disables the shift key on startup.
db.Properties("AllowByPassKey") = False

'The function is successful.
Exit Function

errDisableShift:
'The first part of this error routine creates the "AllowByPassKey
'property if it does not exist.
If Err = conPropNotFound Then
Set prop = db.CreateProperty("AllowByPassKey", _
dbBoolean, False)
db.Properties.Append prop
Resume Next
Else
Msgbox "Function 'ap_DisableShift' did not complete successfully."
Exit Function
End If

End Function

كود التفعيل

Function ap_EnableShift()
'This function enables the SHIFT key at startup. This action causes
'the Autoexec macro and the Startup properties to be bypassed
'if the user holds down the SHIFT key when the user opens the database.

On Error GoTo errEnableShift

Dim db As DAO.Database
Dim prop As DAO.Property
Const conPropNotFound = 3270

Set db = CurrentDb()

'This next line of code disables the SHIFT key on startup.
db.Properties("AllowByPassKey") = True

'function successful
Exit Function

errEnableShift:
'The first part of this error routine creates the "AllowByPassKey
'property if it does not exist.
If Err = conPropNotFound Then
Set prop = db.CreateProperty("AllowByPassKey", _
dbBoolean, True)
db.Properties.Append prop
Resume Next
Else
Msgbox "Function 'ap_DisableShift' did not complete successfully."
Exit Function
End If

End Function

الان لتفعيل او تعطيل مفتاح Shift ادخل لمحرر الفيجول بيسك وضغط Ctrl+G لفتح نافذة Immediate Window. ستفتح هذه النافذة بالاسفل. اذا اردت ان تعطل مفتاح Shift فقط انسخ ثم الصق

ap_DisableShift

داخل النافذة واضغط Entre

اما اذا اردت ان تفعل فانسخ ثم الصق

ap_EnableShift

داخل النافذة واضغط Entre

تحياتي

تم تعديل هذه المشاركة بواسطة Creative Man في 26 ديسمبر 2012 في 14:36

2 −1
#4
younisaljbory كتب:

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

برنامج اللغاء وتمكين مفتاح الشفت للاستاذه زهره لايعمل لدي

برنامج اكسيس 2003 قمت بمايلي

في (برنامج اللغاء وتمكين مفتاح الشفت) للاستاذه زهره من ( اضغط هنا لاختيار قاعدة البيانات) اخترت القاعدة المرفقة التي هي خاضعة لنظام المستخدمين باسم a وكلمة مرور a حاولت اللغاء وتمكين مفتاح الشفت لكنه لم يعمل لدي بحيث في كل مره يمكنني الدخول للقاعدة المرفقه عن طريق ضغط مفتاح الشفت أرجو مساعدتي بحيث أتمكن من اللغاء عمل مفتاح الشفت وتشغيله عند الحاجة يبدو ان مني لكن لا اعرفه 0 شكرا لجميع القائمين على هذا المنتدى ولمن يرفدونه يوميا بالأفكار ألنيره اللهم اجعل ذلك في ميزان حسناتهم

اخي الفاضل : يونس

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

post-15367-085326600 1356523814_thumb.gi

لا تنسانا من التقييم بارك الله بك

za-Younis.rar

بالتوفيق

المرفقات
xx1.gif
3
#5

السلام عليكم

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

هل يوجد غير مفتاح الشفت يفتح القاعدة

ومشكوريين

#6
سلامنا لكم كتب:

السلام عليكم

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

هل يوجد غير مفتاح الشفت يفتح القاعدة

ومشكوريين

اخي العزيز سلامنا لكم .... قبل كل شي ربي يوفقك لكل خير لانك متفاني في طلب العلم

الجواب عزيزي لا. عملية Bypass اي تجاوز امن امن قاعدة البيانات يتم بزر Shift وهو شي مبني من الاساس في قاعدة Built-in فلايمكنك تغييره.

1
#7
Creative Man كتب:

اخي العزيز سلامنا لكم .... قبل كل شي ربي يوفقك لكل خير لانك متفاني في طلب العلم

الجواب عزيزي لا. عملية Bypass اي تجاوز امن امن قاعدة البيانات يتم بزر Shift وهو شي مبني من الاساس في قاعدة Built-in فلايمكنك تغييره.

السلام عليكم

بارك الله بك اخي الرجل المبدع وكثر من امثالك

هدفنا هنا في هذا المنتدى بعد توفيق من الله

ان نتعلم ونعلم

وان نفيد الاخرين قدر المستطاع

والله الموفق

تم تعديل هذه المشاركة بواسطة سلامنا لكم في 26 ديسمبر 2012 في 18:41

#8

بسم الله الرحمن الرحيم

﴿ وَمَن يَتَّقِ اللَّهَ يَجْعَل لَّهُ مَخْرَجاً{2} وَيَرْزُقْهُ مِنْ حَيْثُ لَا يَحْتَسِبُ وَمَن يَتَوَكَّلْ عَلَى اللَّهِ فَهُوَ حَسْبُهُ ﴾ صدق الله العظيم

الحمد لله الذي مكننا من التعرف على اخوه واخوات متحابين في الله نذروا انفسهم ليكونوا مخرجا لكل سائل وتنشرح صدورهم عندما ينفعوا الاخرين

سيدي الفاضل/

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

وانتي ياسيدتي الفاضله ام عهود المحترمه يازهرة المنتدى بحق / اكيد لاحظت بان كل مفردات القاعده هي من صنع يديك الكريمتين لكن ربما لم تكن الطبخه بالشكل الذي تتمنينه لانني لست طباخا ماهرا

المهم جربت مره ثانيه ولم يتعطل مفتاح الشفت ولااعرف السبب وساشرح مافعلت

1. فتحت القاعده(za-En-Dis-SHIFT )

2. كلك على(اضغط هنا لاختيار قاعدة البيانات )

3. اخترت من سطح المكتب قاعدة البيانات(ccc)

4. ضغطت على الزر(تعطيل مفتاح الشفت )

5. ضغطت على الزر (stop)

6. ذهبت الى قاعدة(ccc)وفتحتها بضغط المفتاح شفت وانفتحت ولم يتعطل المفتاح شفت

كررت المحاوله مع استبدال الفقر(4) بالظغط على الزر(تمكين مفتاح الشفت) كذلك لم يتعطل مفتاح الشفت

كررت المحاولات مع استخدام زر اغلاق بدل stop ولم يتعطل المفتاح

عندي تقصير يا اخوان .

اختي ام عهود اكرر شكري وتقديري

وقليله +1 بحقك وحق الاخ/ الرجل المبدع

بالانتظار

#9
younisaljbory كتب:

بسم الله الرحمن الرحيم

﴿ وَمَن يَتَّقِ اللَّهَ يَجْعَل لَّهُ مَخْرَجاً{2} وَيَرْزُقْهُ مِنْ حَيْثُ لَا يَحْتَسِبُ وَمَن يَتَوَكَّلْ عَلَى اللَّهِ فَهُوَ حَسْبُهُ ﴾ صدق الله العظيم

الحمد لله الذي مكننا من التعرف على اخوه واخوات متحابين في الله نذروا انفسهم ليكونوا مخرجا لكل سائل وتنشرح صدورهم عندما ينفعوا الاخرين

سيدي الفاضل/

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

وانتي ياسيدتي الفاضله ام عهود المحترمه يازهرة المنتدى بحق / اكيد لاحظت بان كل مفردات القاعده هي من صنع يديك الكريمتين لكن ربما لم تكن الطبخه بالشكل الذي تتمنينه لانني لست طباخا ماهرا

المهم جربت مره ثانيه ولم يتعطل مفتاح الشفت ولااعرف السبب وساشرح مافعلت

1. فتحت القاعده(za-En-Dis-SHIFT )

2. كلك على(اضغط هنا لاختيار قاعدة البيانات )

3. اخترت من سطح المكتب قاعدة البيانات(ccc)

4. ضغطت على الزر(تعطيل مفتاح الشفت )

5. ضغطت على الزر (stop)

6. ذهبت الى قاعدة(ccc)وفتحتها بضغط المفتاح شفت وانفتحت ولم يتعطل المفتاح شفت

كررت المحاوله مع استبدال الفقر(4) بالظغط على الزر(تمكين مفتاح الشفت) كذلك لم يتعطل مفتاح الشفت

كررت المحاولات مع استخدام زر اغلاق بدل stop ولم يتعطل المفتاح

عندي تقصير يا اخوان .

اختي ام عهود اكرر شكري وتقديري

وقليله +1 بحقك وحق الاخ/ الرجل المبدع

بالانتظار

اخي الفاضل

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

post-15367-010726700 1356550660_thumb.gi

post-15367-077277900 1356550684_thumb.gi

بالتوفيق

المرفقات
H1.gifH2.gif
2
#10

الاستاذه زهره المحترمه

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

خفضت مستوى الامان/ اختفت لوحة الامان التي تظهر في بدايه تشغيل القاعده/ لكن الذي حدث انه اذا قمت بتحديد القاعده وقمت بفتحها من يمين الماوس وليس بدبل كلك تظهر النماذج مباشره ويمكن التعامل معها سواء كان مفتاح الشفت في حالة تمكين او تعطيل / وكم كنت مسرورا بفكرتك بتعطيل اوتمكين مفتاح الشفت من قاعده اخرى غير التي نعمل عليها/ بالانتظار / والله احساسي يقول تعبتك معاي لكن يبدو لي ان صاحب الحاجه أيا كان لا يكون مرهف الاحساس

تحياتي

#11
younisaljbory كتب:

الاستاذه زهره المحترمه

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

خفضت مستوى الامان/ اختفت لوحة الامان التي تظهر في بدايه تشغيل القاعده/ لكن الذي حدث انه اذا قمت بتحديد القاعده وقمت بفتحها من يمين الماوس وليس بدبل كلك تظهر النماذج مباشره ويمكن التعامل معها سواء كان مفتاح الشفت في حالة تمكين او تعطيل / وكم كنت مسرورا بفكرتك بتعطيل اوتمكين مفتاح الشفت من قاعده اخرى غير التي نعمل عليها/ بالانتظار / والله احساسي يقول تعبتك معاي لكن يبدو لي ان صاحب الحاجه أيا كان لا يكون مرهف الاحساس

تحياتي

اخي العزيز

تم تعديل ملفك. وضعت لك زرين في شاشة صلاحيات المستخدمين زر لتعطيل مفتاح Shift وزر لتفعيله. كل ما عليك هو ان تضغط زر التعطيل او التفعيل ثم تغلق وتعيد اقتتاح قاعدة البيانات ليتم التغيير

Bypass.rar

تحياتي

1
#12
Creative Man كتب:

اخي العزيز

تم تعديل ملفك. وضعت لك زرين في شاشة صلاحيات المستخدمين زر لتعطيل مفتاح Shift وزر لتفعيله. كل ما عليك هو ان تضغط زر التعطيل او التفعيل ثم تغلق وتعيد اقتتاح قاعدة البيانات ليتم التغيير

Bypass.rar

تحياتي

#13

السلام عليكم

بارك الله بك اخي الرجل المبــــــــــــــــــــــــدع/ كله تمام 100% وفيت وكفيت / جعل لله ذلك في ميزان حسناتك اللهم اجزه عنا خير الجزاء / وبصراحه عملك للزرين واختيار موقعهما كان ضربة شاطر او كما يقول المثل عصفورين بحجر واحد/ الاولى عمل الزرين في نفس القاعده والثانيه كحلت برنامج نظام صلاحيات المستخدمين وجعلته اكثر مقبوليه تحياتي لك ولمن صمم برنامج الصلاحيات وللاستاذه الفاضله زهره المحترمه حيث انني اتعبتكما معي كثيرا وتحيه ولكل من وضع لمسه في منتدانا الغالي / و +1 /اخوكم يونس الجبوري

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…