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

السلام عليكم أخي فتى الوادي ، بارك الله فيك 1. لقد قمت بإنشاء اقتران عام تطلبه ممرا له اسم العلاقة ويقوم بحذفها برمجيا. 2. في البرنامج المرفق يمكنك اختيار العلاقة التي تريد حذفها من كومبو وهو يطلب الاقتران السابق ويحذف العلاقة. مع الاحترام DeleteRelationByVBA.rar

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

السلام عليكم أخي أبا الوليد ، بارك الله فيك طريقة ممتازة، وأكثر أمنا وعبئاً. هل تود أن اضبط لك البرنامج بإستخدامها ؟ مع الاحترام

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

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

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

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

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

السلام عليكم أختي ليلي ، بارك الله فيك أشكر أخي أبا هادي على هذا الحل الصحيح 100% ، وقد قمت بعمل مثال ووضعت فيه الكود السابق حيث يوضع في حدث عند التنسيق OnFormat لمقطع التفاصيل Detail في التقرير. الاخت ليلي ، أمل أن ينال المثال والطريقة إعجابك ويحقق المطلوب. مع الاحترام DifferentRecordColorsInReports.rar

السلام عليكم أخي أبا هادي، بارك الله فيك بكل تأكيد أستخدمه ، هل ننتظر نسخة جديدة أما ماذا ! مع الاحترام

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

السلام عليكم اختي ليلى ، بارك الله فيك حتى لا تظنين أنني متجاهل هذا الموضوع ، أود أعلامك أنني أحاول فيه ، ولكني لم أصل إلى حل بعد. مع الاحترام

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

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

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

السلام عليكم أخي فتى الوادي ، بارك الله فيك لقد تم ضبط الكود. والسبب تغير أنواع عناصر التحكم في النموذج. مع الاحترام archive.rar

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

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

السلام عليكم اختي ديما ، بارك الله فيك إليك حل السؤال الرابع. مع الاحترام Dima.rar

السلام عليكم اخي محمد حجازي ، بارك الله فيك مجهود مبارك وعملك متقن 100% فقط تعديل بسيط جدا على الكود، ويعمل الاستعلام بالشكل الصحيح والمطلوب. وإن أحب الاخ m.hindawi ، البحث عن جزء من الرقم ما عليه سوى استخدام دالة Mid كما يلي: فمثلاً إن كان المستخدم سيقوم بإدخال الرقم 1090 للدلالة على السجل الذي يحتوي على الشيفرة AJ1090A005 في الحقل PNO. فإن الحل يكون هكذا SQL = "SELECT * FROM PM3 WHERE Mid(PNO,2,4) ='" & NumberRecorder & "';" ومثلا إن كان المستخدم سيقوم بإدخال الرقم 10125 التي تحتوي على الشفرات AM10125A25 و A010125M2E و BLU10125KITS فإن الحل يكون هكذا SQL = "SELECT * FROM PM3 WHERE Mid(PNO,2,5) ='" & NumberRecorder & "' or Mid(PNO,3,5) = '" & NumberRecorder & "'; " وإن كان هنالك طرق أخرى لإدخال الأرقام فيلزم من صاحب السؤال وضع كل هذه الحالات ويمكن دمجها في نفس الاستعلام مرة واحدة وبهذا يستطيع الاستفسار عن البيانات بكل الطرق التي يودها. مع الاحترام mh1.rar

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

السلام عليكم اخي ابا الوليد ، بارك الله فيك بالامس كنت تشتكي من الكهرباء ، واليوم أنت تشتكي من انقطاع الكهرباء عن النموذج ! الله ينور عليك ، سأفيدك كيف عرفت. 1. لأتأكد من المشكلة ليست من برمجة حدث معين أولا أزلت كل البرمجة من النموذج ، وبقي الاهتزاز كما هو لذلك فالاهتزاز ليس من البرمجة. 2. لأتأكد أن المشكلة ليست لأن رقم الصفحة هو 0 غيرته لرقم 1 وبقيت المشكلة إذن ليست من رقم الصفحة. 3. لأتأكد أن المشكلة ليست من المربعات المحفورة في النموذج أيضا أزلتها وبقيت المشكلة. 4. لأتأكد أن المشكلة ليست من التسميات وخصوصا غير المرتبطة مع حقول البيانات أزلتها فحلت المشكلة. هكذا أخي الكريم هي منهجية الحل ، ولا داعي للتعجب ، فهذه من أبسط المشاكل التي أحلها. الله يفتح علينا وعليك. مع الاحترام

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

السلام عليكم أختي ليلى ، بارك الله فيك تم عمل ما طلبت. مع الاحترام students.rar

السلام عليكم اخي محمد حجازي ، بارك الله فيك وإن كان سيستخدم الحروف بالطريقة التي أشرت إليها أعلاه فالأمر غاية في البساطة حينها يكون التغيير في الكود هكذا SQL = "SELECT * FROM PM3 WHERE Mid(PNO,2,4) ='" & NumberRecorder & "';" مع الاحترام