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

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

مغلق
بدأه asaz في 9 سبتمبر 2005 · 22 رد · 7,884 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

ويمكن اغلاق الجهاز عبر ايقونه فيه لاغلاق الجهاز

الهدف من ذلك : وضع الجهاز عند الأولاد لأغراض خاصة فقط بحيث لا يمكنهم تجاوزها في وضع لعبة او برامج اخرى لا اريدها في فترات خاصة من اليوم .

ارجو افادتي ولكم الشكر الجزيل

#2

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

ما تطلبه ممكن عمله بالبولسي و البرمجة و أعتقد ال vba ضعيفة من ناحية api

أخوك عمرو عيسي

#3

شكرا اخي عمرو

لكن هل يمكنني احصل على مثال على ذلك

ولك شكري وتقديري وجميع الاخوة

#4

اخي الكريم عمرو عيسى

اقتباس
ما تطلبه ممكن عمله بالبولسي و البرمجة و أعتقد ال vba ضعيفة من ناحية api

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

اخي asaz

اليك ما طلبت كل ما عليك اتباع خطوات الشرح

1. يوجد في المرفقات ملفين الاول خاص بالاوفيس 2003 وهو DiskTop2003 والثاني خاص بالاوفيس 2000 وهو DiskTop2000 اختر منها ما تريد حسب النسخه التي لديك

2. لضمان عمل البرنامج بكامل طاقته ضع الملف بعد فكه على محرك الاقراص C

3. لضمان مشاهده البرنامج بشكل رائع قم بتغيير دقة شاشة الكمبيوتر الى 1024 × 768 بكسل. تم وضع زر امر خروج من البرنامج لغرض تعليمي ولغرض التعديل على البرنامج لو احببت ويمكنك ازالته عند استخدام البرنامج لوجود زر امر اخر على سطح المكتب الخاص بالبرنامج اسمه " اغلاق جهاز الكمبيوتر " وهذا ما تريده انت حتى لا يستطيع احد الخروج من البرنامج والذهاب الى الكمبيوتر والعبث به فعند اغلاق البرنامج يغلق معه الويندوز ويعيد تشغيلها ويعود البرنامج للفتح من جديد كما هو .

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

5. لجعل البرنامج يعمل مع بدء التشغيل في الويندوز اتبع التالي :

* اذهب الى البرنامج واعمل له اختصار في اي مكان تريد ثم قم بنسخ الاختصار

* اذهب الى ابدأ

* البرامج

* اختر بدأ التشغيل

* اضغط بالماوس الايمن على بدء التشغيل واختر استكشاف

* قم بلصق اختصار البرنامج في بدء التشغيل

* اعد تشغيل الويندوز ولن يستطيع احد الخروج من الويندوز الا بإغلاق البرنامج والويندوز معا

نقطه اخيره هامه : لوضع البرنامج على شبكه اتبع الخطوات التي ذكرها استاذنا المبدع احمد الحربي على هذا الرابط

أكسيس على الشبكه

وهذه هذه الامثله مرفقه

DiskTop2003.rar

DiskTop2000.rar

اختكم

زهره

تم تعديل هذه المشاركة بواسطة zahrah في 9 سبتمبر 2005 في 20:23

#5

بارك الله فيك أختي الفاضلة زهرة ....

هل يوجد ملف خاص بأوفيس xp

#6

اخي حاكم

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

الذي اعرفه ان ملفات Office2003 ورقم نسختها 11 هي نفسها وتعمل متكامله مع OfficeXP اما Office2000 فنسختها 10 .

هل قمت بتحميل الملف ولم يعمل معك ارجوا ابلاغي بذلك .

اختكم

زهره

#7

شكرا جزيلاً اختي زهرة

تعجز الكلمات ان توفيكي حقكي من الشكر والامتنان

واسأل الله لكي التوفيق دائما

#8

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

أختي الكريمة زهرة أنا لم أعمل بال vba ولكن حتي عند تصميم mdb كنت أصممها من لغة البرمجة و غالبا تكون vb التي أعشقها

ولكن ذلك لا يمنع أن ال vba قويه ولكن ليست كل vb

هذا ما قصدته

أخوكي من مصر عمرو عيسي

#9

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

جزاك الله خيرا أخت زهرة على هذا البرنامج ...

تحياتي

من مواضيعي

برنامج للكفالات والأقساط

برنامج لإدارة مؤسسة نقل الطالبات

بـــــرنامج الصراف الآلي

_______________________

سبحان الله وبحمده سبحان الله العظيم

#10

اخي asaz

لا شكر على واجب واتمنى لك التوفيق

اخي dbprog

لا شكر على واجب واتمنى لك التوفيق

اخي R0OT

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

نعم اخي الكريم اوافقك الرأي بأن البرمجة من خلال vba لا ترقى ابدا الى vb لقلة الامكانات المتاحه فهي جزء صغير جدا من اللغة الام الفيجول بيسك حيث ان vba هو برمجه خاصه للتطبيقات المحدوده ولكن لا يمنع ان نقوم بتطوير وتطويع الاكواد حسب رغبتنا لينتج لدينا تطبيق ينافس ويضاهي تطبيق فيجول بيسك علما بأن لكل لغة برمجه حدود لا تستطيع تجاوزها .

ختاما لك مني كل الشكر والتقدير على هذه المشاركه البناءه

اختكم

زهره

#11

أيضاً أختي الفاضلة أوفيس xp .... رقم نسختها 10 .... إذا أوفيس 2000 سيعمل مع xp

أتضحت الصورة بردك أختي الفاضلة ....

بارك الله فيك

#12

الاخت زهرة

مششششششششكورة على هذا التمييز و الله تمييز بارك الله فيك

ولكننا نطمع عى ان تشرحى لنا كيفية عمل البرنامج على اكسس

وتكونى مشكورة

نحن لنا الشرف ان نتعلم منك

longway.jpg
#13

تحية طيبة للجميع

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

هل من حل لهذ؟

#14

اعتقد انه يمكن ذلك بتعطيل زر النوافذ في الكيبورد

ولكن كيف ؟

#15

اخي الفاضل

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

الكود الخاص بالغاء المفتاحين winkey اليسار واليمين من لوحة المفاتيح في حدث عند الضغط على مفتاح للاسفل هو

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   Select Case KeyCode
	  Case 91, 92
		 KeyCode = 0
   End Select
End Sub

وجعل مفتاح التمهيد : نعم

KeyPreview: Yes

ولكن للاسف لايعمل مع windows XP

لهذا هناك طريقه اخرى وهي عن طريق ملفات الريجستري

الملف الاول

disable_both_windows_keys.rar

بعد فك الضغط عن الملف قم بالضغط على الملف مرتين وسوف تظهر لك رساله اختر منها نعم

الان قم بإعادة تشغيل الويندوز ليتم تفعيل التعديل في الريجستري وعدم تمكين المفتاحين

هذا الملف فائدته عدم تمكين مفتاحي winkey من لوحة المفاتيح والتي تحمل شعار الويندوز

الملف الثاني

remove_scancode_mappings.rar

بعد فك الضغط عن الملف قم بالضغط على الملف مرتين وسوف تظهر لك رساله اختر منها نعم

الان قم بإعادة تشغيل الويندوز ليتم تفعيل التعديل في الريجستري وتمكين المفتاحين

هذا الملف فائدته استعادة و تمكين مفتاحي winkey من لوحة المفاتيح والتي تحمل شعار الويندوز

#16

انتي عبقرية ماشاءالله عليك

كنت ابحث عن نفس الفكرة

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

لكن مع زهره مافيه شي صعب

#17

تحية طيبة للجميع

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

اظن والله اعلم انه ممكن ولكن كيف *-) *-)

#18

أهلا وسهلا بكم جميعا ..

أنا د/مايكل .. صيدلي وعاشق للبرمجة

إسمحولي أن أسأل سؤال ولكن خاص بحماية ملف أكسيس عن طريق :

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

الرجاء بموافاتي بالرد

Dr.Michael

#19

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

الحقيقة حملت الملف وقلت ربما يكون نموذج منبثق عادي

وفيه بعض الحركات البرمجية البسيطة

بعد تصفحي للملف :blink: ذهلت تماما من العمل الذي تم فيه

خصوصا في الوحدات البرمجية المرفقة من الاخت زهرة

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

أحب أضيف إضافة بسيطة .. وأنصح بها فقط لمن يجيد التعامل مع الريجستري

وهي إضافة هذه الـــــــ Function للفورم

Private Function RegWrite(Key1, SValue As String)
	Set WSHShell = CreateObject("WScript.Shell")
	WSHShell.RegWrite Key1, SValue
End Function

ثم في حدث عند التحميل للفورم ضع الكود التالي

	RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\DiskTop2003.mdb", " C:\DiskTop2003.mdb"

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

تحياتي للجميع أخوكم Ekseer

تم تعديل هذه المشاركة بواسطة ekseer في 15 مارس 2007 في 20:54

#20

اخي الفاضل اكسير

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

بارك الله فيك على هذه الإضافة الجميله والرائعة حقا

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

لك مني كل الإحترام والتقدير على ما تبذله في المنتدى وإعلم ان الله لا يضيع اجر من احسن عملا واتمنى لك دوام والتوفيق وإلى الأمام .

#21

الاخ اكسير

هل من الممكن ادراج مثال جاهز لاستخدام الرجيستر

لكي نستطيع من خلالة تشغيل البرنامج مع بدء تشغيل الويندوز

#22

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

أخي الكريم Enjoy

غالي وطلبك رخيص .. حاضر أخوي

فقط امنحني بعض الوقت

تحياتي

اكسيرالحياة

#23

الأخ الفاضل ...

كما أوضحت الأخت زهرة بوضع الملف فى Startup ليعمل مع بدء التشغيل

وكما أوضح الأخ أكسير بوضعه فى الريجسترى لنفس الغرض

يمكنك أيضاً وضعه فى خدمات النظام ليعمل قبل بدء أى برنامج أخر للمستخدم وقبل دخول المستخدمين - وهذا يمكنك من امكانية اضافة تحكم أقوى فى البرنامج اذا اردت ذلك، ولتنفيذ ذلك راجع: تشغيل البرنامج كـ System Service

شكراً

Eng. Usama El-Mokadem

Nothing is impossible, the word impossible itself says that: I M - Possible

هذا الموضوع مغلق.

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