الدكتور خضر الرجبي

السلام عليكم بارك الله فيك اخي ابا سليمان ، مع الشكر. أخواني المشاركين في المشروع mzaki، الباشق1 ، mohammed55. أود أن أحيطكم علماً أنني قررت تكليف نفسي بالمسؤولية عن إدخالات الامثلة في المواضيع التالية: دوال الاكسس الماكرو الامثلة والتطبيقات مع الاحترام

السلام عليكم شكرا لك اخي mohammed55 ، لكونك أول المبتدئين. نسيت أن أقول لكم شيء مهم جدا ، لا تذكروا اسماء المشاركين في عناوين المشاركات أو في الامثلة حتى وإن وجدت . لأننا في مشروعنا لا نذكر الاسماء نهائيا . مع الاحترام

أختي شيرين ، بارك الله فيك في هذه المثال تتعرفين على طريقة تحديث البيانات وجمعها في قاعدة واحدة عن طريق استعلامات الإلحاق واستعلامات التحديث : في المثال يوجد 3 قواعد بيانات Rajabi_B ، Rajabi_W ، Rajabi_Z وهي 3 قواعد موزعة في 3 مخازن قطع سيارات وكل قاعدة فيها نفس الجداول Categories، Cars ، Companies ، Products . طبعا كل قاعدة تعمل مستقلة عن الأخرى فيتم فيها إضافة القطع والسيارات والأصناف الجديدة وكذلك تغيرات تجري على جدول البضائع (قطع سيارات) باستمرار. القاعدة الرابعة التي أرفقتها هي التي تدمج هذه القواعد في بعضها البعض حسبما نرغب. وفي التعامل مع هذا المثال أرجو ملاحظة ما يلي : 1. يجب وضع القواعد الأربعة على جهاز التخزين المحلي :C 2. لاحظي طريقة ربط الملفات مع القواعد. 3. يتم تشغيل التحديث Updating ويتم تلقائيا حسب المثال المرفق دمج بعضها في بعض أي تنتقل التغيرات الى القواعد الثلاثة. 4. إذا أحببت بإمكانك إيقاف رسائل التحذير التي تنتج كنتيجة للاستعلامات الإجرائية عن طريق : أدوات -- خيارات – تحرير وبحث – إزالة الصح عن الاستعلامات الإجرائية أرجو أن أكون قد وفقت بإيصال الفكرة المطلوبة. مع الاحترام Updating.rar

السلام عليكم اخي الطاير ، بارك الله فيك الامر بسيط كما ذكرت لك سابقا ، ما عليك الا اضافة حقل جديد ولنسميه Rank اي الرتبة كما يلي : الرتبة _ الدرجة 1 ____ أ/عامة 2 ____ ب/عامة 3 ____ أولى عامة 4 ____ ثانية عامة 5 ____ ثالثة عامة 6 ____ رابعة عامة 7 ____ ثالثة فنية مساعدة 8 ____ رابعة فنية مساعدة 9 ____ مجموعة الوظائف العامة 10 ____ راتب مقطوع والترتيب يتم في التقرير حسب Rank الرتبة ويمكن طباعة اسم الدرجة في بداية مقطع مجموعة الرتبة بدل الدرجة. أتمنى أني كنت واضحا هذه المرة ، واستطيع أن اشرح أكثر لاحقا ان لم يكن هذا كافيا. مع الاحترام

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

السلام عليكم اخي ابا هادي ، بارك الله فيك ابتداءً أحمد الله على عودتك لنا ، ففعلا لقد اشتقنا الى توجيهاتك وملاحظاتك . فعلا كلامك صحيح ، كنت افكر في A4 . مع احترامي وتقديري

السلام عليكم أخي جمال فاير ، بارك الله فيك. أنت تستحق الهدية المرفقة بجدارة. مع الاحترام JamalFaiz.rar

السلام عليكم اخي ابا سليمان ، بارك الله فيك لقد صدق بوصفك اخونا ابو هادي حينما وصفك بالخبير ، وأنت لست خبيرا فحسب بل منظما ومرتبا في عملك ، الله يفتح عليك ، الحقيقة لم تترك لي المجال لأي ملاحظات سوى أني اشكرك على هذا العمل المتقن والاكثر من رائع حقا وبدون مجاملات. أخي أبا سليمان ، أود ان انصحك نصيحة: حيث أن هذه الاداة الممتازة تعمل الان على قائمة واحدة فأن أنصحك برفعها الى المنتدى في موضوع منفصل مع شرح تفصيلي لحيثيات استخدامها، فهي مهمة جدا ومن المفيد استخدامها تقريبا في كل البرامج. وتحسب لك (ان شاء الله) صدقة جارية عند الله. إخواني المتبرعين للمشاركة في المشروع اليكم توزيع الادوار. الاخ mzaki ، سيكون مسؤولا عن الادخالات من الرابطين التاليين: مشاركات الاكسس العامة تحليل وتصميم قواعد اليانات وتصميم الجداول الاخ الباشق 1 ، سيكون مسؤولا عن الادخالات من الرابطين التاليين: حماية وتأمين قواعد البيانات الاستعلامات وجمل SQL الاخ mohammed55 ، سيكون مسؤولا عن الادخالات من الرابطين التاليين: النماذج واكواد VBA التقارير وبإنتظار المزيد من الاخوة الذين يودون المشاركة في هذا المشروع المفيد للجميع. اخواني المشاركون ما هو المطلوب منكم : طبعا قمتم بإنزال البرنامج والان عليكم تعبئة البيانات حسب المطلوب كما في الشرح التالي : مع ملاحظة ما يلي : 1. في بعض المشاركات يكون هناك أكثر نسخة من المثال ونحن نختار المثال الاحدث والمطور ويتبين لكم ذلك من المناقشات ففي بعض الاحيان سنضطر لقراءة المناقشات. 2. في بعض المشاركات يوجد أكثر من مثال ونحن نريدها كلها مع تغيير العنوان بما يتناسب مع الامثلة الاضافية. 3. أرجو الدقة المتناهية في العمل وشكرا لكم جاهز للأجابة عن استفساراتكم دائما فأرجو التواصل توفيرا للجهد والوقت. الوقت الممنوح لكم لإنجاز مهماتكم هو من الان 10 أيام فهلا بدأتم مع احترامي وتقديري لجهودكم .

السلام عليكم اخي gs7581 شكرا لرفعك الملف ، كل شيء تمام ، برمجة الملصقات المطلوبة جاهزة . اذا احتجت لأي توضيحات فسأكون جاهز ان شاء الله. مع الاحترام والتقدير KR_Officena12.rar

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

السلام عليكم اخي الوحيد ، انت لم تشير سابقا انك تريد استخدام النتائج في تقرير ولذلك حسبتك تود النتيجة للنموذج فقط عند الضغط على زر أو ماشابه ولذلك اعطيتك ذلك الحل المبسط أما وانك تريد استخدام النتيجة في تقرير فعليك عمل ما يلي : أولا استعلام توحيد وقد سميته انا استعلام2، SELECT Count(tblCows.CowStatus) AS a,0 as b,0 as c,0 as d FROM tblCows HAVING (((tblCows.CowStatus)="حامل")) Union SELECT 0 as a,Count(tblCows.CowStatus) AS b , 0 as c, 0 as d FROM tblCows HAVING (((tblCows.CowStatus)="جافة حامل")) Union SELECT 0 as a, 0 as b ,Count(tblCows.CowStatus) AS c , 0 as d FROM tblCows HAVING (((tblCows.CowStatus)="جافة غير حامل")) UNION SELECT 0 as a , 0 as b, 0 as c , Count(tblCows.CowStatus) AS d FROM tblCows HAVING (((tblCows.CowStatus)="حلوب حامل")); ثانيا استعلام ثاني مبني على السابق كما يلي : SELECT Sum(استعلام2.a) AS Sumمنa, Sum(استعلام2.b) AS Sumمنb, Sum(استعلام2.c) AS Sumمنc, Sum(استعلام2.d) AS Sumمنd FROM استعلام2; وبعدها تبني التقرير على الاستعلام السابق الذي اسميته انا استعلام3 . ولكي اريحك من الطباعة ارفقت لك الحل . مع احترامي وتقديري KR_Officena_11.rar

السلام عليكم اخي Doyazen ، حياك الله تم تطوير البرنامج المذكور الذي عمله اخونا أمير عاطف ليشمل الاضافة التي طلبتها. مع الاحترام NEMA.rar

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

السلام عليكم اخي الوحيد ، بارك الله فيك هذا مثل على ما طلبته مؤخرا في عد انواع البقرات حسب ما جاء في الكمبو هذه طريقة تعريف الاستعلام وبالقياس عليها يمكن عمل باقي الانواع مع الاحترام

السلام عليكم اخي الفيلسوف111 ، أتمنى أن تكون كل أيامك سعيدة ، واليك الحل البرمجي المطلوب ، وبالتوفيق دائما. مع الاحترام KR_Officen_10.rar

السلام عليكم اخي فتى الوادي اليك حل السؤال المطلوب . مع الاحترام KR_Officen_9.rar

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

السلام عليكم اخي zekry2002 ، عذرا على التأخر في الاجابة بالنسبة لربط الجداول اليك الخطوات مع مثال موضحا بالصور : خطوة 1: جداول --> جديد --> ربط الجداول خطوة 2: تحديد قاعدة البيانات --> ضغط زر ارتباط خطوة 3: تحديد الجداول المراد ربطها --> وضغط موافق خطوة 4: الارتباط يصبح جاهز واشارة السهم التي تشاهدها بالصورة تدل على ذلك وهكذا فأن اي تعديل تجريه على الجداول المرتبطة يتم في القاعدة التي تتبع لها الجداول. أمل أن أكون ساعدتك بالشكل المطلوب مع احترامي

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

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

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

السلام عليكم بلا ادنى شك وبدون تردد اختي شيرين 2004 سأساعدك (ان شاء الله) اعطيني يومين يكون عندك برنامج يقرأ من عدة قواعد بيانات ويجمعها في واحدة مع مراعاة السجلات التي تم اضافتها سابقا والتعديلات التي دخلت عليها حديثا. يعني باختصار برنامج يجمع قواعدة البيانات في قاعدة واحدة وهو طلبك. مع الاحترام

السلام عليكم اختي lyla بكل تأكيد معك حق ، وقريبا ان شاء الله ستجدين مشاركة لي بهذا الخصوص. مع الاحترام

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

السلام عليكم اخي mhf2005 ، يبدو السؤال الذي تطرحه للوهلة الاولى غاية في البساطة حيث ان تعريف شرط التحقق من الصحة لهذه المسألة بسيط . ولنقل أن حقل الخصم هو D وحقل السعر هو P فيكون شرط التحقق من الصحة للحقلين كما طلبت في سؤالك هو =[P]<1250 And [D]<500 السؤال الصعب ، هو ماذا لو تم ادخال قيمة ( D > 500 ) بطريقة أو اخرى مثلا بجعل القيمة الافتراضية لذلك الحقل 600. هنا تكمن المشكلة الكبيرة وعندما يكون التركيز على حقل السعر فأننا لن نستطيع الخروج منه نهائيا الا بإغلاق النموذج وهذا خطأ طبعا. الحل للمشكلة هو برمجيا فقط كالتالي : يتم تعريف حدثي عند التركيز للسعر والخصم كما يلي : Private Sub D_GotFocus() If Me.P>= 1250 Then Me.P= 1249 End Sub Private Sub P_GotFocus() If Me.D>= 500 Then Me.D= 499 End Sub ارجو أن يكون هذا الشرح كافيا لحل مسألتك. مع الاحترام