مشروع زهره للصناعات الهندسية

الاخت زهرة

جعلها الله في موزاين حسناتك

وكما يقول المثل من علمني حرفا صرت له عبدا

لكن هنا من علمني زرا خخخخ صرت له كيبوردا

وفقك الله

zahrah كتب:

انشاء النماذج

والآن لا بد لنا من إنشاء نماذج لعرض وإدخال البيانات من خلالها والتعامل معها. كما يلي :

أنشاء نموذج بسيط :

يمكن إنشاء النماذج القائمة على الجداول والاستعلامات التي أنشئت سابقاً فالنموذج كما نعلم يمكن وأن يكون مبني على جدول أو على استعلام، والآن وعلى سبيل البداية سنقوم بصنع نموذج لعرض البيانات الناتجة من الاستعلام الذي أنشأناه تحت اسم ALL سابقاً والذي يستخلص البيانات من الجدولين معاً كما يلي :

اتجه إلى القسم الخاص بالنماذج واخترانشاء نموذج بواسطة المعالج Create From By Using Wizard والخاص بتصميم نموذج جديد بواسطة المعالج واضغط عليها نقراً مزدوجاً

بعد ذلك اختر الاستعلام ALL من صندوق الاختيار المخصص لذلك ثم اختر كل الحقول واضغط التالي Next بعد ذلك ستظهر الشاشة الموضحة بالشكل

والتي تطلب منك اختيار شكل النموذج الذي ترغب في إنشائه فسنختاره من النوع العمودي Columnar ثم نضغط Next لنتجه إلى الشاشة التي سنحدد منها الشكل العام للنموذج Style فسيكون هنا من النوع Standard قياسي ثم نضغط Next فتظهر لنا بعد ذلك الشاشة الخاصة بتحديد عنوان النموذج وبها أيضاً اختيارين الأول هو البدء في فتح النموذج لاستخدامه والثاني هو التعديل في تصميمه أن شئت فتختار الاختيار الأول ثم نضغط انهاء Finish

إنشاء نموذج من نوع : Master Details ( أي اساسي وله فرعي )

هناك علاقة من النوع One To Many بين الجدولين السابق أنشاؤهما، الشيء الذي يدفعنا عند إنشاء نموذج إدخال إلى أحد أمرين،

الأول : إنشاء نموذج منفصل لكل جدول ونربط بينهما عن طريق زر أمر ( إلا أن ذلك غير عملي).

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

اتجه إلى القسم الخاص بالنماذج في قاعدة البيانات ثم اختر Create form by using wizard فتظهر لك الشاشة الخاصة باختيار الجداول أو الجدول الذي ستبني عليه النموذج، اتجه بالمؤشر إلى صندوق الاختيار المسمى Queries tables الاستعلامات / الجداول ومنه اختر اسم الجدول الأول Departs وهو هنا الجدول الأبوي، بعد ذلك أنقل جميع حقوق هذا الجدول من الناحية اليسرى available fields إلى الناحية اليمنى Selected files ، فمعنى ذلك أننا اخترنا جميع حقول هذا الجدول لتظهر ضمن النموذج، ثم اتجه أيضاً إلى صندوق الاختيار Queries tables مرة أخرى واختر اسم الجدول EMP ثم أنقل أيضاً جميع حقوله من الناحية اليسرى Available fields إلى الناحية اليمنى Selected files ما عدا الحقل D_ID .

ستظهر جميع الحقول الخاصة بالجدولين والتي اختيرت كما هو موضح بالشكل

اضغط بعد ذلك الزر التالي Next لتتجه إلى الشاشة الخاصة باختيار عرض البيانات فيسألك المعالج كيف تحب أن تستعرض البيانات فهناك استعراض حسب جدول الإدارات وآخر حسب جدول الموظفين إلا أننا سنبقي الوضع كما هو عليه كوضع افتراضي، أيضاً تجد أسفل الشاشة اختيارين أحدهما يخيرك بأن تظهر البيانات في نموذج Master Details والآخر يخيرك بأن تقوم بعمل نموذجين مرتبطين إلا أن الاختيار الأول هو الافتراضي كما ذكرنا سابقاً... فقد عمل أكسيس تلقائياً أن هذين الجدولين بينهما علاقة، ولك أن تعلم أنه في حالة عدم وجود علاقة بين الجدولين فلن تسمح لك أكسيس بجمعهما في نموذج واحد.

ملاحظة

لاحظ أننا قد أدرجنا جميع حقول الجدول EMP ما عدا الحقل D_ID والموجود أيضاً بالجدول Departs فهو المستخدم في الربط، فهناك قاعدة في تصميم قواعد البيانات تقول أن "مفتاح الربط لا يظهر في وقت التنفيذ" لا تنزعج ودعنا نوضح ذلك بشيء من التفصيل، نعلم أن مفتاح الربط يكون حقل مشترك بين الجدولين، وهو في مثالنا الحقل D_ID أو رقم الإدارة، إذا أردنا أن نستعلم عن بيانات جميع الموظفين العاملين بالإدارة رقم 10، فهل يعقل أن تذكر أن اسم الموظف مثلاً محمد ويعمل مبرمجاً وتاريخ تعيينه 1/10/2000 وإدارته هي الإدارة هي رقم 10 ... !! بالطبع لا، لأن رقم الإدارة هو الحقل الذي تسأل عن جميع البيانات أساساً بدلالته وهكذا يجب الانتباه لذلك جيداً.

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

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

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

ملاحظة

اذا اتجهت بالمؤشر إلى القسم الخاص بالنماذج في قاعدة البيانات فستلاحظ وجود نموذجين جديدين وليس واحد، أحدهما يحمل الاسم Departs هو الخاص بالإدارات، وهو النموذج الأساسي Master والآخر يحمل الاسم EMP وبجانبه كلمة نموذج فرعي Sub For أي النموذج الفرعي وذلك بالرغم من أننا قد أنشأنا نموذج واحد إلا أن أكسيس صنعت نموذجين وجمعت بينهما في وقت التنفيذ فقط.

إضافة الأدوات البرمجية للنموذج :

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

أول شيء يمكنك إضافة بعض اللمسات الفنية على النموذج مثل تغيير مسميات الحقول وتحريك النموذج للأسفل لإنشاء مساحة خالية لوضع بعض الأزرار.

إظهار شريط الأدوات :

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

والآن وبعد الانتهاء من عمل الأزرار بإمكانك عزيزي القارئ أن تضع تلميحاً يخبرك عن وظيفة كل زر وذلك عند الوقوف عليه لثواني، ويمكنك عمل ذلك كما يلي:

حدد الزر المطلوب وليكن الزر الأول والذي سينقل المستخدم إلى أول السجلات، ثم انقر بزر الماوس الأيمن عليه ستنسدل اختر منها خصائص Properties فستظهر لك نافذة والتي تحتوي على كافة خصائص هذه الزر ومنها اخترنص تلميح عنصر التحكم Control Tip text واكتب التلميح الذي تريده بالخانة الموضحة جهة اليمين وليكن مثلاً "السجل الاول" ثم أغلق تلك النافذة، وللتأكد من عمل ذلك التلميح أذهب إلى حيز التنفيذ للنموذج وقف على هذا الزر ثواني فيظهر لك التلميح وبالمثل يمكنك عمل تلميحات لباقي الأزرار التي أنشأت.

إنشاء زر حول البرنامج :

يمكن إنشاء زر يعرض رسالة تفيد بشيء ما وليكن حقوق تأليف البرنامج مثلاً وذلك كما يلي :

اختر زر امر Command Button من شريط الأدوات المعتاد ولكن مع إلغاء نافذة المعالج التي تظهر تلقائياً مع كل أمر وذلك بالضغط على الزرالغاء الامر Cancel أو منع ظهور المعالج أصلا من البداية بالضغط على الزر الخاص به من شريط الأدوات، بعد ذلك ستجد الزر موضوعاً على النموذج وعليه Command Button زر امر اضغط عليه الزر الأيمن للماوس ستنسد ل قائمة اختر منها خصائص Properties فستظهر لك الشاشة الخاصة بخصائص هذا الزر ومنها اتجه إلى تسمية توضيحيه Caption ثم غيره إلى "حول البرنامج" مثلاً ثم أغلق النافذة الخاصة بالخصائص ستجد أن تلك الكلمة قد وضعت على الزر كما في النموذج اعلاه

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

Private Sub أمر32_Click()
MsgBox "جميع الحقوق محفوظه لمنتدى الفريق العربي", vbInformation, "حول البرنامج"
End Sub

لاحظ اسم زر الامر 32 في الكود قد يختلف لديك عند انشاءك واحد جديد

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

وبالمثل يمكنك عمل أي زر لإظهار أي رسالة.

ملاحظة

الكود المكتوب هنا هو كود لغة ACCESS BASIC والتي تشبه لغة VISUAL BASIC الشهيرة .

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

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

يوجد ملف مرفق كامل بالقاعدة

اختكم المخلصه

زهره

بارك الله فيك أخت زهرة ونفع بك الإسلام والمسلمين

جعلها الله في موزاين حسناتك

وفقك الله

لكنأختي العزيزة عندي مشكله في برمجة الأكسس أرجو أن تساعديني

1- عند تصميم النماذج في أكسس2007 إختفت من جهازي قائمة الخصائص لاأدري كيف أعيدها أضغط على رمزالخصائص في الشريط لاتظهر أحدد عنصر وضغط f4لاتظهر ممكن تساعدين الله يوفقك

2-عند تصميم البرنامج وتالتنفيذ الأوامر الذي تحتوي على مكرو مضمن لاتنفذ هل من حل

السلام عليكم يازهرة العالم ونور المنتدى ورحمة الله وبركاته

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

ألا الدعاء لها بالصحة والعافية والخير الكثير يارب يارب يارب