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

برنامج مرتبات

مغلق
بدأه ايهاب عثمان في 17 سبتمبر 2005 · 17 رد · 11,401 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

احبائي في الله..

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

وفقني الله تعالى الى اعداد برنامج للمرتبات - احسبه جيداً-

ورغبة في استفادة الجميع ...

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

بداية ارفق لكم دليل استخدام البرنامج للاطلاع على مواصفات وخصائص البرنامج

وبناء عليه ساقوم بشرح البرنامج.

ارجو من الاخوة الاطلاع على الدليل المرفق وتدوين الملاحظات والاستفسارات

لموافاتي بما لم يغطيه شرح البرنامج

ملحوظة:

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

مرفق دليل المستخدم والى اللقاء في القريب العاجل - باذن الله - لنبدأ سويا في التعرف على البرنامج

manual.rar

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#2

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

فحاول على ان ترفقه او ترسله عبر الايمي لي واكون شاكرا لك..

#3

أخي العزيز ايهاب :

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

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

أن كان من الممكن أرساله لي عبر الايميل 0

أتمنى لك التوفيق 0

#4

اشكركم اخواني...

البرنامج يصعب ارساله نظرا لسرية بياناته ..

ولكن تابعوني بدءً من مساء اليوم شرحا تفصيلياً

يمكنكم - باذن الله- من عمل برنامج مماثل ويتلائم مع متطلبات مؤسساتكم

شكر الله لكم جميعا وغفر..

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#5

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

بارك الله فيك اخي ايهاب

نحن في انتظار الشرح املين بعد نهايته من عمل برنامج مماثل

#6

بسم الله ابدأ

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

الجلسة الاولى:

تأمين البرنامج بطريقة مبسطة

وسوف تتكلم هنا عن نقطتين :

1- حماية البرنامج عن طريق اوامر الاكسيس

2- شاشة افتتاح البرنامج واكواد كلمات السر

ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

1- حماية البرنامج عن طريق اوامر الاكسيس

1/1 - ادخل الى القائمة ادوات Tools واختر الامر "بداية التشغيل" start up كما بالصورة:

20_09_05_11_57_03_1127242623_1.GIF

1/2 - فيظهر لك مايلي:

20_09_05_12_00_36_1127242836_.GIF

1/3 - قم بازالة كافة العلامات "صح"

1/4 - وفي المربع :

display Form/page

اكتب اسم نموذج شاشة افتتاح البرنامج وليكن "pass"

1/5 - النتيجة -عند فتح القاعدة -تختفي نافذة قاعدة البيانات واوامر القوائم وازرار الادوات التي تتيح تعديل التصميمات او الاكواد

ولا يظهر سوى نموذج شاشة افتتاح البرنامج التي تطلب كلمة سر للاستمرار.

لكي تقوم بتعديلاتك -كمبرمج- اي اعادة الوضع كما كان فقط اضغط المفتاح Shift اثناء النقر المزدوج على ايقونة البرنامج.

والان نتكلم عن شاشة الافتتاح...

لحظة :blink: اذا كان احد المستخدمين غلى علم بوظيفة الShift هذه او ضغط عليه بالصدفة

فلا قيمة اذت لما سبق

لا عليكم ... يمكنكم التحكم بوظيفة هذا المفتاح ابطالا او تفعيلاً

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

الان فقط.....يمكن ان نتكلم عن شاشة الافتتاح

ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

2- شاشة افتتاح البرنامج واكواد كلمات السر

انها الشاشة زاهية اللون الموضحة بالصفحة 2 من دليل الاستخدام

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

ويحتوي على الكائنات التالية:

2/1 - مربع نص اسمه ps مخصص لكتابة كلمة السر - ولاتنس ضبط خاصبة فناع الادخال لهذا المربع على القيمة Password

2/2 - زر الخروج من البرنامج

2/3 - الزرين 1 و2 للدخول الى اجزاء البرنامج وهما مخفيان "vivible=no" ولا يظهران الا اذا نجح المستخدم في كتابة كلمة السر الصحيحة... وكذلك التسميتين 1c , 2c الخاصتان بكل من الزرين 1 و 2

واذا كتب المستخدم كلمة غير سليمة يتم انهاء عمل البرنامج

ويمكن التشغيل باكثر من كلمة سر ولتكون mm11 و h55hg

اذا كتبت احداهما عمل البرنامج كيف ذلك ...

من ضمن احداث المربع ps اكتب الكود التالي للحدث befor update

If ps = "h55hg" Or ps = "mm11" Then
[1].Visible = True
[1c].Visible = True
[2].Visible = True
[2c].Visible = True
Else
Quit
End If

انتهت الجلسة الاولى

في انتظار استفساراتكم

اشكركم وشوقي الى لقائكم كبير :D

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#7

ملحوظة هامة....

الخطوة رقم 1 في الجلسة الاولى

يفضل اتمامها في نهاية عمل البرنامج وقبل التسليم للمستخدم/المستخدمين

الى لقاء قريب...

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#8

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

الاستاذ / إيهاب عثمان

شكرا لك على هذه الخطوة ، واتمنى لكم التوفيق والنجاح ،،،

عبدالمانع

إنما الأمم الأخلاق ما بقيت ××× فإن هم ذهبت أخلاقهم ذهبوا ...
#9

يعطيك الف عافيه اخي ايهاب

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

اختكم

زهره

#10

الاخ العزيز - عبد المانع

الاخت العزيزة زهرة

انا تلميذكم - كم تعلمت منكم اسال الله ان اكون عند حسن الظن..

والشكر موصول لجميع الاخوة الذين يشاركون معي هنا

استأذنكم جميعا ان نكمل سويا مساء الاخد القادم باذن الله

لاجراء صيانة على جهلزي

وشكرا

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#11

يعطيك العافيه يا أخ ايهاب ويكثر من امثالك

#12

اخواني الكرام ..اشكركم جميعا غلى تفاعلكم معي ودعواتكم الطيبة.

الان نعود.. :D

<span style='font-size:21pt;line-height:100%'>الجلسة الثانية:</span>

شاشة الافتتاح ..وماذا بعد الدخول بكلمة السر..

راجع الدليل والشكل رقم (2) - تجد انه عند النجاح في ادخال كلمة السر فانه تظهر لنا اربعة كائنات

مربعا نص والتسميتان الخاصتان بهما

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

اسماء الكائنات هي

1 زر الامر المسئول عن فتح شاشة ادخال / معالجة البيانات

2 زر الامر المسئول عن فتح شاشة التقارير

1c التسمية الخاصة بزر الامر 1

2c التسمية الخاصة بزر الامر 2

ـــــــــــــــــــــــــــــــــــــــــــــــــــ

لاحظ الاتي:

a- خاصية visible قيمتها False اي ان الكائنات مخفية ويقوم الكود المذكور سابقا بتحويلها الى مرئية بمجرد ادخال كلمة السر الصحيحة

b - طالما قمت بتسمية احد الكائنات برقم مث 1 و 2 فلا بد عند الاشارة اليها في الكود ان تضعهما بين القوسين [ ]

ــــــــــــــــــــــــــــــــــــــــــــــــــــــ

والان ماذ ينتج عن الضغط على زر الامر (1)

هو وفتح نموذج ادخال البيانات - ويسمى o_main- واقفال النموذج الحالي "Pass"عن طريق كود موضوع على حدث

On Click للزر 1.... وهاهو الكود:

Private Sub Ctl1_Click()
DoCmd.OpenForm "0_main"
DoCmd.Close acForm, "pass"
End Sub

اما عن الزر 2 فينتج عنه -وبنفص الكيفية فتح شاشة التقارير - المسماة o_rep-

واقفال شاشة الافتتاح وهاهو الكود

Private Sub Ctl1_Click()
DoCmd.OpenForm "0_rep"
DoCmd.Close acForm, "pass"
End Sub

يتبقى لنا في هذه الجلسة القصيرة زر الخروج من البرنامج.

24_09_05_02_15_14_1127553314untitled.GIF

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

هذه الكلمة هي :

Quit

وهو نفس الكود الذي يحدث عند الفشل في ادخال كلمة السر

سرني لقاؤكم .... والى لقاء قريب -باذن الله - مع شاشة ادخال ومعالجة البيانات.

شكراُ :) جزيلا

تم تعديل هذه المشاركة بواسطة ايهاب عثمان في 29 ديسمبر 2009 في 09:46

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#13

<span style='font-size:21pt;line-height:100%'>الجلسة الثالثة:</span>

شاشة ادخال / معالجة البيانات (1)

احبائي الكرام مع الشاشة الخاصة بادخال/ معالجة البيانات وقد تستغرق عددا من الجلسات

والله الموفق وهو المعين...

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

وشكل النموذج ومكوناته موجودة بالشكل رقم 3 - من دليل المستخدم

1 - قبل البدء في شرح مكونات النموذج تعالوا نتعرف على الجداول والاستعلامات المرتبطة بهذا النموذج

حتى اذا تعرضنا لاحدها اثناء الشرح - يكون معلوما وواضحة مكوناته وخصائصه

ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

لاحظ البرنامج مصمم لشركة متعددة الفروع / المشروعات/المواقع

ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

1/1 - جدول Main data

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

09_10_05_04_18_51_11288567311.GIF

1/2 جدول Salary

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

عامة - يتم تغذية هذا الجدول عن طريق عدة استعلامات اجرائية (بعضها يحتوي على حقول محسوبة ) وسنتعرض لجميعها تباعاً.

وعن حقول هذا الجدول سنذكرها حالا ولكن نلاحظ ان معظمها عبارة عن مفردات راتب – تختلف طبيعتها ومسمياتها من شركة لاخرى. – واليكم قائمة بالحقول..

09_10_05_04_19_22_1128856762_.GIF]

ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

هذان هما الجدولان الاساسيان في برنامجنا – في الجلسة القادمة – ان شاء الله نستكمل باقي الجداول وتلاستعلامات المرتبطة بنموذج ادخال / معالجة البيانات.

شكرا لكم..

تم تعديل هذه المشاركة بواسطة ايهاب عثمان في 29 ديسمبر 2009 في 09:44

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#14

أخي الكريم/إيهاب عثمان

بارك الله فيك وفيت وكفيت شرح مفصل وجيد جزاك الله عنا كل خير وفي انتظار المزيد منك إن شاء الله

والله الموفق

الباشا قمر الزمان

الله هو الموفق لسواء السبيل

#15

<span style='font-size:14pt;line-height:100%'>الجلسة الرابعة:</span>

شاشة ادخال / معالجة البيانات (2)

بدنا سوياً جلستنا السابقة في الحدبث عن شاشة ادخال / معالجة البيانات

و اوضحت انه لا بد من الحديث عن الجداول والاستعلامات المرتبطة بهذا النموذج و بالفعل تكلمت عن الجدولين الرئيسيين في البرنامج وهما main data و salary

والان مع بقية الجداول وتلاستعلامات المرتبطة بنموذج ادخال / معالجة البيانات :D

2/1 - الاستعلام الاجرائي finish:

وهو استعلام تحديث .

وظيفته كتابة حرف Y في الحقل finish بالجدول salary دلالة على اقفال بيانات الشهر الاخير ومنع اية ادخالات عليه وبدون تشغبل هذا الاستعلام فلن يتم انشاء شهر جديد

وتلكم هي صورة الاستعلام في طريقة العرض تصميم.

01_10_05_05_38_02_11281702821.GIF

2/2 - الاستعلام F_years

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

DMax("[yr]";"salary")

2/3 - الاستعلام Cur main

وهو استعلام تحديد يحتوي على كافة حقول الجدول main data مع عرض سجلات الموظفين الحاليين فقط (غير المستقيلين) وذلك بوضع المعيار "Is Null" تحت الحقل Ret_date وهو الاص بتسجيل تاريخ الاستقالة

وسوف نتعرض لاحقا لكيفية اثبات استقالة موظف.

2/4 - الاستعلام الاجرائي F_app

وهو استعلام الحاق وظيفته انشاء بيانات شهر جديد والحاقه الى الجدول salary

مع وضع الشهر والسنة الجديدين بصورة الية ولا يعمل الاستعلام الا اذا كان اخر شهر قد تم اقفاله - راجع الاستعلام finish

والاستعلام يربط بين الاستعلامين f_years و cur main عن طريق المفتاح emp_id كما بالشكل:

01_10_05_07_32_11_1128177131_.GIF

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

01_10_05_09_31_06_11281842663.GIF

ولنلاحظ الاتي:

أ- السجلات المعروضة هنا هي لاخر سنة موجودة في البيانات راجع معايير الحقل yr في الاستعلام F_years

ب- الحقل المحسوب newyr يقوم بحساب السنة الجديدة والحاقها بالحقل yr في جدول salary

وفكرة الحساب هي : اذا كان الشهر الحالي =12 فان السنة الجديدة = السنة الحالية +1 والا فان السنة الجديدة = السنة الحالية.

ج- الحقل المحسوب newm يقوم بحساب الشهر الجديد والحاقه بالحقل MO في جدول salary

وفكرة الحساب هي : اذا كان الشهر الحالي =12 فان الشهر الجديد = 1

والا فان الشهر الجديد = الشهر الحالي+ 1

2/5 - الاستعلام الاجرائي Zero

بعد ان قمنا بالحاق او ترحيل بيانات الشهر الجديدالى الجدول salary وجب تحديثها بواسطة هذا الاستعلام كالتالي

أ- الحقل finish يجب جعل قيمته = 0 دلالة على ان الشهر مقتوح وغير مقفل

ب- بعض البيانات المالية كالتاخير ةالغياب والجزاءات تتغير -بديهيا- من شهر لاخر لذا وجب جعل قيمتها =0 استعدادا لتغذيتها بالارقام الخاصة بالشهر الجديد

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

DMax("[mo]";"F_years")

واليكم صورة الاستعلام zero في طريقة العرض تصميم .

01_10_05_11_12_35_11281903554.GIF

2/6- الماكرو c and z

وبقوم بتشغيل الاستعلامين F_app و zero على الترتيب وهذه هي صورته :

01_10_05_11_13_32_11281904125.GIF

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

وتوضح لنا الصورة التالية ارنباطها جمبعا بنموذج الادخال

01_10_05_11_14_22_11281904627.GIF

اتمنى ان اكون قد وفقت في الشرح

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

والله المعين :D

تم تعديل هذه المشاركة بواسطة ايهاب عثمان في 29 ديسمبر 2009 في 09:42

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#16

احبائي .....

معذرة على التاخير فالمشاغل جمة والوقت ضئيل

وآمل منكم المزيد من التفاعل... ولو بالنقد (رحم الله امرأ اهدى الي عيوبي)

الجلسة الخامسة:

شاشة ادخال /معالجة البيانات (3)

بعد ما تعرضنا للجداول والاستعلامات المرتبطة بها تلكم الشاشة

وهي كما بالشكل رقم (3) بدليل المستخدم - الذي ارفقناه في بدايات الموضوع- عبارة عن تتابع لعدد من العمليات على يمين كل عملية زران الاول عليه علامة استفهام وبالضغط عليه يظهر نموذج به تبذة عن العملية وحدث "عند الضغط" لهذا الزر نجد به الكود التالي:

DoCmd.OpenForm "h1"

حيث h1 اسم نموذج التعليمات للعملية الاولى - و h2 للعملية الثانية ... وهكذا

وهذه صورة توضح احد نماذج التعليمات وهو يشرح العملية الرابعة في هذه الشاشة:

14_10_05_01_09_54_11293205948.GIF

وزر "عودة" بهذا النموذج يغلقه ويعيدك الى شاشة الادخال عن طريق الكود الموجود بالحدث "عند الضغط"

DoCmd.Close

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

اقتباس
Modal = yes

Pop up = yes

كانت هذه نبذة عن التعليمات الخاصة بكل عملية فكيف يتم تسغيل العملية

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

1 - اقفال بيانات الشهر السابق

بالضغط على زر هذه العملية يتم تشغيل استعلام التحديث Finish - هل تذكرونه - راجع الجلسة الرابعة-

وذلك بالكود التالي:

DoCmd OpenQuiry "finish"

2 - تعديل بيانات احصائبة...

يتم فتح نموذج جديد اسمه step2 سنتعرض له لاحقا - ولكن شرط اجراء هذه العملية هو ان تكون قد اقفلا الشهر السابق اي ان تكون كاقة الشهور السابقة مقفلة اي ان تكون حميع القيم بالحقل finish بالجدول salary هي Y - وليس منها ماهو" 0 " .. واليكم الكود/

If DMin("[finish]", "salary") = 0 Then
MsgBox "لايد من اقفال بيانات الشهر السابق اولا"
Else
DoCmd.OpenForm "step2"
End If

3 - انشاء ييانات شهر جديد :

هنا يتم تشغيل الماكرو المسمى "c and z" راجع اواخر الجلسة الرابعة

بشرط ان تكون قد اقفلت الشهر السابق كما ذكرنا.... وهذا هو الكود:

Dim hs As String
hs = DMin("[finish]", "salary")
If hs = "y" Then
DoCmd.RunMacro "c and z"
MsgBox "تمت عملية انشاء الشهر الجديد بنجاح", vbExclamation, "مبروك"
Me.Requery
Me.Refresh
Else
MsgBox "!!!لا بد من اقفال بيانات الشهر السابق اولاً"
End If

4 - تعديل البيانات المالية :

هنا يتم فتح نموذج جديد اسمه "step4" سنتعرض له لاحقا

بشرط ان تكون قد انشات شهرا جديدا - اي الا يكون الشهر الاخير مقفلا بعكس العمليين السابقتين

وهذا هو الكود

Dim hs As String
hs = DMin("[finish]", "salary")
If hs = "y" Then
MsgBox "لابد من انشاء شهر جديد اولا"
Else
DoCmd.OpenForm "step4"
End If

5 - ادخال مؤثرات الشهر الجديد:

هنا يتم فتح نموذج جديد اسمه "step5" بشرط انشاء شهر جديد اولا كما بالعملية السابقة

وهذا هو الكود:

Dim hs As String
hs = DMin("[finish]", "salary")
If hs = "y" Then
MsgBox "لابد من انشاء شهر جديد اولا"
Else
DoCmd.OpenForm "step5"
End If

ـــــــــــــــــــ

كانت تلكم هي العمليات الخمس الاساسية بالنموذج

بداية من الجلسة التالية نبدأ -ان شاء الله - بشرح النماذج المتفرعة من العمليات 2 - 4 -5

وهي step5 - step4 - step2 على الترتيب

الى اللقاء :D

ـــــــــــــــــــــــ

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

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

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#17

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

فحاول على ان ترفقه او ترسله عبر الايمي لي واكون شاكرا لك..

#18

بارك الله فيك ياأخي

ورزقت حسن العاقبة في الدارين 0

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

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