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

هدية متواضعة : اجعل الأكسس 2007 كأنه برنامج بالصور

بدأه علي العامر في 8 مايو 2011 · 32 رد · 14,827 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

بعد محاولات كثير والبحث المستمر استطعت التوصل إلى طريق لتمكن من إخفاء واجهة الأكسس 2007 وتحويلة كواجهة برنامج تنفيذي (EXE) كما في الصورة

post-232412-019885300 1304854797_thumb.p

وطريقة كتالي

الخطوة الأولى

بعد الإنتهاء من تصميم قاعدة البيانات في حدث عند الفتح في نموذج بدء التشغيل اكتب الكود التالي:

DoCmd.ShowToolbar "ribbon", acToolbarNo

مهمت هذا الكود اخفاء ملامح الأكسس التالية: شعار الأوفيس ، شريط الأدوات ، القوائم كما في الصورة

post-232412-067625200 1304854127_thumb.p

الخطوة الثانية

وهي لإخفاء شريط المعلومات وشريط علامة التبويب والخطوات موجودة في الصورة التالية

post-232412-020979600 1304854113_thumb.p

الخطوة الثالثة

وهي الخطوة الأهم فيها سنقوم بتغيير امتداد قاعدة البيانات من "accdb" إلى "accdr"

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

ولمن من لا يعرف كيف يقوم بتغيير الأمتداد اذهب إلى الأدوات (التنظيم في فيستا و سفن) ومن ثم خيارات المجلد والتبع الصورة

post-232412-034295000 1304854084_thumb.p

ومن ثم قم بإعادة التسمية بتغيير مابعد النقطة فقط

post-232412-001212800 1304854145_thumb.p

إلى هنا يمكننا أن قول بأننا قمنا باخفاء الواجهة ولكن تبقة الأيقونة يمكنك أن تقوم بإنشاء اختصار وتغير الأيقونة الخاصة بالأختصار

انتها الشرح

المرفقات
04-06-32 07-48-26 م.png04-06-32 07-36-33 م.png04-06-32 07-31-51 م.png04-06-32 07-53-03 م.png05-06-32 02-38-20 م.png

تم تعديل هذه المشاركة بواسطة علي العامر في 8 مايو 2011 في 14:43

8

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#2

جميل جدا +1

ننتظر المزيد

كيميائى / محمد طه

#3

غيرت الامتداد

و لكنه لم يفتح القاعده

و طلع تحذير و ضغط موافق

فتح قاعده فاضيه

كيميائى / محمد طه

#4

هل متأكد من أنك قمت بتغيير إلى الأمتداد الصحيح أو أنك قمت بتحديد نموذج البداية

وإلا قم برفع القاعدة على الموقع

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#5

اشكر لك ردك

الغلط من عندى

لم اقم يتحديد نموذج البدايه

---------

نفسى حلمى يكتمل

و ارى برنامج اكسس يعمل كله بشاشه واحده

اى ان كل العناصر تتفتح بنفس المقاس و لكن بنافذة واحده للتطبيق الواحد

مثل اى برنامج ديسكتوب عادى

كيميائى / محمد طه

#6

عزيزي: علي العامر

تقبل شكري على هذه المعلومة التي كنت انا وغيري يفتقر إليها..

جزاك الله خيراً

#7

بارك الله فيك وجزاك الله خير اخي الفاضل

وفقك الله ورعاك

هديه مقبوله

شكرا

احترامي وتقديري

اتق الله حيث ماكنت

#8

اخونا / على العامر

فعلا معلومة قيمه جزاك الله كل خير

ولك مني +1

#9

شكرا الك ان شاء الله الجميع يستفيدو .

#10

السلام عليكم

الف الف شكر اخي العزيز

على هذه المعلومات القيمة

ولو اني جربت فقط تغيير الامتداد ونجح عندي نجاح هائل

وهو ما اريده بالضبط

ولا افهم لما هذا الكود المرفق

اكرر شكري وامتناني

اخوك المهندس

يوسف القيم

#11

أشكر الجميع وأنا في العون

أخي الكريم يوسف القيم

بعد القيام بتغيير الامتداد ستبقى علامة الأوفيس ظاهرة ومهمة هذا الكود اخفاءها

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#12

للرفع وتعميم المعلومة

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#13

السلام عليكم

اخي العامر الله يعمرك بيت بالجنة

ودي اسئلك عن هذا الكود

DoCmd.ShowToolbar "ribbon", acToolbarNo

هل انزله كما هو اما ماذا

لأنه لما انزله على فورم البدأ وعند حدث الفتح

يظهر لي مسج انه يتعذر على الاكسسز العثور على الكائن DoCmd

فما هي المشكلة الله يخليك استاذ

تقبل مروري وتحياتي

اخوك المهندس

يوسف القيم

#14

هذه المشكلة لم يسبق أنا مرة علي

يمكنك التخلي عنها، ولكن ستبق شعار الأوفيس ظاهر

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#15

جميل ورائع ما تقدمه من تحف وهدايا أيها الشبل

#16

السلام عليكم

لك جزيل الشكر الى السيد علي العامر على هذه الهدية القيمة

ولكن لدي سؤال انا لدي الاكسس باللغة الانكليزية ولم اجد نموذج البدء لكتابة الكود

فهل بالامكان شرح كيفية كتابة هذا الكود

وشكرا

وهــــــل بإمكانك إرفاق الملف

تم تعديل هذه المشاركة بواسطة nebras0000 في 18 مايو 2011 في 14:23

#17

السلام عليكم جميعا

قمت بإرفاق مثال لتعم الفائدة على الجميع

النموذج غير كامل

.:: صورة للمرفق ::.

post-232412-018714200 1305720172_thumb.j

* ملاحظة : لتعديل على المثال قم بتغير الامتداد إلى "Accdr"

فاتورة مبيعات.rar

المرفقات
5456.jpg

تم تعديل هذه المشاركة بواسطة علي العامر في 18 مايو 2011 في 15:07

1

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#19

شكراً على هذا المجهود الطيب بارك الله فيك.

وَقُلْ رَبِّ زِدْنِي عِلْمًا

#20

مشكور

طريقة رائعة بالفعل

#21

سأضيف هنا كود للتأكد من ان قاعدة البيانات فى الصيغة accdr أى انها run time

هذا الكود يتم وضعه فى حدث عند الفتح لنموذج بدء التشغيل للقاعدة

فاذا تم تغيير الامتداد لن يفتح البرنامج

و بالتوفيق للجميع

If SysCmd(acSysCmdRuntime) = False Then      ‘ms access file extention is not accdr
'Should be using runtime but we are not, so quit application.
MsgBox "تم التلاعب بالبرنامج "
Application.Quit
End If

تم تعديل هذه المشاركة بواسطة Abo_Yossof في 1 يونيو 2011 في 19:52

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

#22

أشكرك أخي بو بوسف على هذه الفكرة الرائعة

إن كانت النفوس كباراً **** تعبت في مرداها الأجسام

.:: علي العامر ::.

مبرمج أكسس وفيجوال يبلغ من العمر 16 سنة

#23

ماشاء الله عمل رائع جدا جدا جدا

الله يبارك في جهودك

#24

الف شكر اخوي علي

شرح اكثر من رائع

#25

فكرة جميلة و رائعة جداً

أنت مبدع أخوي علي في تصاميمك وهي التي تعطي للنموذج رونقة الخاص المميز :thumb_up: :thumb_up:

جزاك الله كل خير ....

سبحان الله وبحمده

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

5429.gif

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

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

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

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

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