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

دروس متقدمة في الأكسس للمبتدئين (الدرس الأول)

مثبّترائج
بدأه فهد الدوسري في 15 يناير 2003 · 153 رد · 74,104 مشاهدة · في قسم الدروس والمشاريع
مشاركة: واتساب X فيسبوك تيليجرام
#51

الاختبار السابع :

الأدوات المطلوبة :

1- ثلاثة نماذج بأي اسم تريد

2-ثلاثة تقارير بأي اسم تريد

3-مربعي نص على النموذج الرئيسي (واحد للتقارير ) و ( واحد للنماذج ).

4-زري أمر اثنين

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

كذلك إذا كتبت في (مربع نص النماذج ) اسم النموذج وبعد الضغط على الزر الآخر يفتح النموذج الذي كتبت اسمه في هذا المربع

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

كيف نتحقق من أن الحقل فارغاً ؟ .. الجواب نستخدم إحدى الطريقتين أو كلاهما معاً

الطريقة الأولى استخدم علامتي التنصيص فقط لا غير ""

الطريقة الثانية استخدم IsNull(مربع_النص)

ويستحسن استخدامهما معاً عن طريق And

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

الكود هو :

 DoCmd.OpenReport "اسم_التقرير", acPreview

ربما يخرج لديكم مشاكل .. هذا ما أريده فعلاً لكي تتغلبوا عليها في المرات القادمة

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

أرجو للجميع التوفيق

#52

جزاك الله كل خير على هذا العلم النافع

#53

الاختبار السابع :

exam7.zip

#54

الاخ AliHamdan ماشاء الله إجابة صحيحة 100%

#55

الاخ فهد جزيل الشكر لك على هذا التشجيع .

#56

إجابة الإختبار السابع :-

test_7.zip

ibnmusqat.gif
#57

اجابة السوال السابع

test_7.zip

#58

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

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

أرجو للجميع دوام التوفيق

#59

الإختبار السابع: تم بحمد ا لله

ولكن فى ملف الإختبار السابع المرفق, كيف انقر على إختيار في ال List Box فتنتقل القيمة المختارة إلى Text 1 ????

test7_openfrm_reprt_mm.zip

#60

تعديل على حل الاختبار السابع

شكرا اخي فهد على معاونتك لنا في كيفية ايجاد الحل الافضل لكل اختبار

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

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

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

الحل بعد تعديل الاكواد

test_7.zip

#61

الاخ salem_1212 بارك الله فيك إجابة صحيحة ولعل الخطأ السابق يجعلك تستفيد أكثر وأكثر

#62

بعد نجاح الاختبارات السبعة سوف نبدء بالتطبيق العملي للأداة IF

ملاحظة مهمة جداً قبل البداية :

بالطبع لن نهتم بالجداول أو الاستعلامات أو العلاقات فهذا ليس موضوعنا

كل ما نهتم به ونركز عليه هو ما قمنا بدراسته هنا ويجب على الجميع التقيد بذلك

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

فلا يلزمنا أن يضع لنا برنامجه هنا بل يضعه في أي مكان آخر غير هذا الموضوع لكي لا يتشعب بنا الموضوع

===========

على بركة الله نبدأ .. التطبيق العملي الأول :

شخص يريدك أن تصمم له برنامج خاص به ويطلب فيه عدة طلبات وسوف نصمم البرنامج شيئاً فشيئاً مع التركيز الشديد على استخدام If

أولاً : الشاشة الافتتاحية للبرنامج /

وهو عبارة عن نموذج باسم (افتتاحية) يعمل في مقدمة البرنامج ويملئ الشاشة ويوجد فيه ما يلي :

(مربع نص) أو (مربع تسميه) اختر واحداً فقط حسب قدرتك انت في التعامل مع أحدهما

هذا المربع تخرج فيه في البداية جملة (أهلاً وسهلاً بك معنا)

ثم تخرج فيه جملة ( في برنامج )

ثم تخرج فيه جملة ( تطبيق الدروس )

ثم جملة (تفضل بالدخول)

ثم يقفل النموذج تلقائي .. ويفتح النموذج الآخر المسمى ( المقدمة )

(( لتنفيذ ذلك يجب استخدام أداة الشرط IF في حدث عند عداد الوقت أو التايمر ))

طريقة جعل النموذج يعمل في مقدمة البرنامج لمن لا يعرف ذلك كما يلي :-

1- من شريط الأدوات العلوي للأكسس نختار( أدوات )

2- نضغط على (بدء التشغيل )

3- نذهب إلى مربع التحرير والسرد المسمى (عرض النموذج/الصفحة:)

4- نختار منه نموذج (افتتاحية)

5- ثم موافق

((طبعاً كل شخص له الحرية من ناحية جمال النموذج وترتيبه وهذا عامل مهم لإنتاج البرامج))

في التطبيق القادم إن شاء الله سنتطرق إلى النموذج المسمى (المقدمة )

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

أرجو لكم دوام التوفيق

#63
اقتباس
( أرجو عدم نقل الموضوع إلى قسم المشاريع الجماعية والدروس وإذا لم يكن لهذا الدرس فائدة فسوف أتوقف )====================================

أخي فهد

عذرا فلم أنتبه الي الجملة

فقد قرأتها ( أرجو نقل و ليس عدم نقل )

فلو أردت ارجاعه فأخبرني

و ان كنت أفضل أن يبقي هنا لكي يكون سببا فى دخول الأعضاء الي هنا

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

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

#64

الإجابة على التطبيق العملي الأول :

test_8.zip

ibnmusqat.gif
#65

السلام عليكم...

الأستاذ فهد: باحاول منذ نشرك التطبيق ومافيش فايد ة.. هل إستخدامى لخاصية timerinterval إستخدام خاطئ حيث تظهر الجملة الأولى فقط دون سواها(أهلاً وسهلاً بك معنا). فيا ريت الإيضاح

وجزاكم الله خيرا

app1_mm.zip

#67

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

ولك خالص تحياتي

#68

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

أخي Mandour الرجاء قراءة المطلوب جيداً قبل الاجابة فلو دقـقت قليلا لوجدت أني طلبت مربع نص واحد أو مربع تسمية واحد فقط فقط وأنت ذكرت أربعة مربعات تسمية وهذا مخالف للطلب .. أيضاً أنا طلبت ملئ الشاشة .. من أجل أن تستفيد أكثر أعد المحاولة بعد قراءة المطلوب .. وأتمنى لك التوفيق

#69

أخي salem_1212 ماشاء الله تبارك الله تقدم ملحوظ وتصميم رائع .. ولكن لك نفس الكلام الذي سبق للأخوين ابن مسقط وMandour من حيث عدد مربعات النص أو التسمية أتمنى لك التوفيق

#70

إعادة حل التطبيق العملي الأول

أخي الكريم/ فهد الدوسري

لم أتعمد مخالفة الشروط الموضوعة للحل ولكني لم أنتبه إلى المكونات المطلوبة فأرجو المعذرة على ذلك.

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

test_8.zip

ibnmusqat.gif
#71

بعد عدة مرات من تجربة الاكواد والتفكير وجدت الفكرة في المنتدي كيف تضع امرين في

زر وعدلت على الكود ارجو ان يكون هو المطلوب

çلêّèي‏_çلْملي_çلçول.zip

#72

انقطعت عن متابعة الدروس عند الاختبار الثاني وذلك بسبب نقل الموضوع من مكانه ، دون مراسلة المشتركين..

الله يعين نلحق بكم في الدروس

#73

السلام عليكم

الأخ الأستاذ فهد:

جزاكم الله خيرا لاسلوبك فى المتابعة و على صبرك.. ومعلهش إذا بأتاخر فى الرد وبأسأل أسئلة فى غير موضعها لإن بصراحة دى أول محاولاتي الجدية لتعلم الكود .

app1a_mm.zip

#74

أتقدم بالشكر الجزيل للآخ والاستاذ محمد طاهر على تثبيت الدروس في الصفحة الرئيسية للقسم فله جزيل الشكر .

============

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

============

الاخ ابن مسقط بارك الله فيك التطبيق رائع جداً ولي فيه ملاحظة بسيطة وهي لاتنقص منه شيئاً وهي:

في آخر الكود ذكرت مايلي

DoCmd.Close acForm, "افتتاحية"

DoCmd.OpenForm "المقدمة"

وكان يكفي

DoCmd.Close 

DoCmd.OpenForm "المقدمة"

الاخ salem_1212 جزاك الله خيراً تطبيق رائع جداً ولي ملاحظة أيضاً وهي لاتنقص منه شيئاً وهي:

في آخر الكود ذكرت ما يلي :

DoCmd.OpenForm "المقدمة"

Me.Visible = False

DoCmd.Close acForm, "افتتاحية"

وكان يكفي

DoCmd.Close 

DoCmd.OpenForm "المقدمة"

الاخ المهاجر01 حياك الله معنا في التطبيقات إذا كنت قد فهمت الدرس

الاخ Mandour تطبيق رهيييييب مرررة .. بالنسبة لي يبهرني ويعجبني الاهتمام بمظهر النماذج فبارك الله فيك وكثر من أمثالك وجهد تشكر عليه

أتمنى لك ولجميع الدارسين هنا دوام التوفيق والاستمرار في النجاح

#75

التطبيق العملي الثاني :

بعد أن عملنا الشاشة الافتتاحية للبرنامج سوف نتطرق للنموذج (المقدمة) الذي يفتح بعد نموذج (الافتتاحية)

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

المربع الأول باسم (المستخدم) والثاني باسم ( السر) ونريد منك ما يلي بعد الضغط على زر الأمر:

- إذا كان (المستخدم) صحيح و (السر) خطأ تخرج هذه الرسالة "كلمة السر خطأ" أو مشابه لهذه الرسالة ثم يفرغ حقل (السر ) من البيانات

- إذا كان (المستخدم) خطأ و (السر) صحيح تخرج هذه الرسالة "اسم المستخدم خطأ" أو مشابه لهذه الرسالة ثم يفرغ حقل (المستخدم ) من البيانات

- إذا كان (المستخدم) خطأ و (السر) خطأ تخرج هذه الرسالة "ليس لديك صلاحية الدخول" أو مشابه لهذه الرسالة ثم يفرغ حقل (السر ) و حقل (المستخدم ) من البيانات

- إذا كان (المستخدم) صحيح و (السر) صحيح تخرج هذه الرسالة "تفضل بالدخول" ويفتح النموذج المسمى(الرئيسي)

( المستخدم ) : فهد ....... (السر):123

طبعاً يتم استخدام أداة الشرط في نموذج (المقدمة) حسب ما فهمتم من الاختبارات السابقة

من يخطئ يضع البرنامج كما هو لنخبره أين الخطأ وليس هذا عيباً .

في التطبيق القادم إن شاء الله سنتطرق إلى النموذج المسمى (الرئيسي)

أرجو للجميع التوفيق

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

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

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

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

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