منتصر الانسي

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

تفضل اخي العزيز هذا مثالك بعد التعديل في الفورم ستجد ماتم عمله في حدث (AfterUpdate) (بعد التحديث) الخاص بالأربعة عناصر ( من حساب ، الى حساب ، الاجمالي مدين ، الاجمالي دائن ) جرب المثال واخبرنا بالنتيجة مع تحياتي,,, account - Copy.rar

OK أخي العزيز هذا هو ماتم في المثال الذي ارفقته لك حيث أن الاستعلام Q4 يقوم بدمج جميع السجلات الموجود في Q1,Q2,Q3 بحيث تصبح وكأنها في جدول واحد وهذه هي الفكرة التي اردت ان اوصلها لك وما عليك سوى تطبيقها بما يلائم برنامجك . مثال للتوضيح : لنعتبر أن جدول رصيد أول المدة (Q1) يحتوي علي الاصناف (أ ب ج د) جدول الوارد (Q2) يحتوي علي الاصناف (أ ب ج ه) جدول الصادر (Q3) يحتوي علي الاصناف (ب ج د و) سيكون نتيجة الاستعلام (Q4) يحتوي علي الاصناف (أ ب ج د ه و) أي أن الاستعلام (Q4) سيحتوي علي جميع الاصناف الواردة في الجداول الثلاثة وبالتالي عند عمل العلاقة من اليمين الى اليسار او من اليسار الى اليمين في الاستعلام Query2 فان نتيجة الاستعلام ستكون البيانات الاساسية (كود الصنف واسمه مثلا) لجميع السجلات في (Q4) ويتم أخذ رصيد اول المدة من جدول أول المدة ورصيد الوارد من جدول الوارد والصادر من جدول الصادر . أرجو أن يكون الشرح واضح وتم إستيعاب الفكرة . مع تحياتي,,,

اخي العزيز إذا كنت قد فهمت طلبك فستجد مثال الاستاذ اسامة بعد اضافة تقريرين ارجو ان تطلع عليهما وتخبرنا بالنتيجة تحياتي,,, aa.rar

أخي العزيز تفضل المثال الذي يحتوي على ثلاث طرق إضافية لطريقة أخونا admiral 1- باستخدام دالة DLookup يستمد نتيجته من الاستعلام 2- باستخدام دالة DSum يستمد نتيجته من الجدول 3- باستخدام جملة Loop (سيبدأ بعد ثانية من فتح النموذج) ويمر على جميع السجلات واثناء المرور يتم عمل جمع تراكمي ولكن هناك ملاحظة مهمة يجب الانتباه لها وهي أن عملية الجمع سستراكم إذا كررت عملية Loop يعني أول مرة ستكون نتيجة التجميع متتطابقة مع الطريقتين الاولى والثانية ولكن لو قمت بالعودة إلى أول سجل سيتم تنفيذ جملة Loop مرة أخرة ويصبح الناتج ضعف الاول (اذا كان 100 يصبح 200 وهكذا) ولتفادي هذا الخلل يمكنك اما وضع ضوابط اكثر على شرط تنفيذ عملية التكرار Loop او وضع الضوابط على السجلات بحيث ماتم جمعه لا يتكرر مرة اخرى . هذا ما اردت توضيحه وان شاء الله تستفيد من المثال مع تحياتي,,, AymenIntel.rar

مثال ممتاز وفكرة جميلة تجعلنا نعيد التفكير في كثير من المشاكل التي يمكن حلها بالأمر SendKeys فشكراً جزيلاً لك وجزاك الله خيراً مع تحياتي,,,

أخي العزيز هناك بعض التساؤلات الخاصة بطلبك فمثلا هل تريد أن تنقل النتيجة كما هي فقط أي صندوق مدين = إجمالي المدين أم الجمع التراكمي أي صندوق مدين = الإجمالي التراكمي لـ(إجمالي المدين)الخاص بالصندوق التساؤل الثاني هل هناك عمليات أو حسابات اخرى تؤثر أو تتأثر بهذا الحساب لوضعها في الحسبان عند عملية الإحتساب أو التراجع عنها يرجى التوضيح أكثر تحياتي,,,

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

اخي العزيز من خلال إطلاعي على القاعدة يبدو لي الأتي: 1 - الاستعلام الذي ظهرت فيه المشكلة هو الاستعلام Query2 2 - الاستعلام يتكون من بيانات اول المدة وبيانات الوارد وبيانات المنصرف 3 - تريد أن تكون النتيجة هي إظهار جميع الإصناف بمجرد وجودها في جدول واحد على الأقل إذا كانت هذه هي المشكلة فحلها يكون بعمل إستعلام توحيد ليشمل كافة سجلات الثلاثة جداول وبالتالي عمل العلاقات مع هذا الاستعلام والملف المرفق سيوضح أكثر إذا لم تكن هذه هي المشكلة أرجو التوضيح أكثر مع تحياتي,,, Factory Manager System.rar

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

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

تفضل اخي العزيز ولكن يجب التوضيح بأن هذا الترتيب بحسب الوظيفة في إطار المحافظة الواحدة . الفكرة تعتمد على دالة التجميع DCount لإحتساب عدد السجلات التي تطابق المعايير . أرجو أن تراجع الطريقة بدقة حتى (تفهم...وأعيد حتى تفهم) مضمون الإجراء وبالتالي تطبيقها على أي حقول وفي أي إستعلام. ورغم كل هذا لا أدري ما الغرض من ترقيم الإستعلام في البرنامج ...؟ مع تحياتي,,, 20-2-2010.rar

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

أخي العزيز تفضل اخي مثالك بعد تعديل استعلام ( قيادات حسب الأقدمية العامة ) ونموذج (main_data ) بخصوص الفرز بحسب الوظيفة في استعلام ( qu_m ) فكما أوضح الأخ ابو خليل فقد تم إضافة حقل الى جدول Employees اسمه JobIndex يستمد بياناته من كومبوبوكس أو (قائمة منسدلة) كما ستلاحظ وهذا الحل جيد إذا كانت الوظائف ثابتة (أو شبه ثابته) أما إذا كانت تلك الوظائف قابلة للزيادة أو التعديل فالأفضل عمل جدول جديد لتكويد الوظائف يشمل البيانات التي وردت في القائمة المنسدلة وجعل هذا الجدول هو مصدر بيانات القائمة بدل القيم الثابتة. تحياتي,,, 20-2-2010.rar

تفضل أخي العزيز هذا المثال الذي قمت بعمله على عجل قد يساعدك مع تحياتي Example.rar

أخي العزيز كما وسبق أخبرتك أن هذه الخاصية غير موجودة في عنصر التحكم ComboBox أو القائمة المنسدلة في إصدار 2003 وماقبله. ولكن يمكن عمل ماتريده بطرق "إلتفافية" توصلك إلى مرادك فإذا كان الموضوع مهم ولم تكن على عجلة من أمرك فسأحاول أن أعمل مثال في وقت فراغي مالم فعليك بأكسس 2007 ليلبي طلبك. تحياتي,,,

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

أخي العزيز صدقني لم أفهم ماذا تريد ففي البداية قلت أي أن تكون الأسماء في الأسفل ثم تقول الآن أرجو أن توضح طلبك أكثر مع تحياتي,,,

إقلب الوضع إجعل تقرير الأسماء هو التقرير الفرعي لتقرير الوصف .

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

اخي العزيز طالما وكما ذكرت أن البرنامج لا يحتوي على نظام مستخدمين وصلاحيات فيمكنك انشاء فورم وليكن frmMain بحيث يكون هو الفورم الرئيسي الذي يفتح مباشرة عند تشغيل البرنامج وفي حدث OnOpen أو عند الفتح اكتب كود شبيه لهذا Select Case HardNo Case = 123456789 DoCmd.OpenForm "frm1" Case = 987654321 DoCmd.OpenForm "frm2" . . . End Select DoCmd.Close acForm ,"frmMain" حيث يتم أولا قراءة رقم الهارد وبناء عليه يتم فتح النموذج المطلوب ثم يتم إغلاق الفورم الرئيسي مع تحياتي,,,

اخي العزيز في إعتقادي أن هذه الخاصية غير موجودة في عنصر التحكم ComboBox أو القائمة المنسدلة في إصدار 2003 وماقبله ولكنها أستحدثت إبتداء من إصدار 2007 ولكنها موجودة في عنصر ListBox أو مربع القائمة وستجد في المرفقات أمثلة ممتازة لذلك. مع تحياتي ,,, MultiSelectListBoxQuery.zip MultiSelectListBox_A2K.zip MultiSelect2k.zip

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

اخي العزيز هذا تعديل على عجل وبحسب ما فهمته من السؤال حيث انك لم توضح ماهو الجدول الذي سيتم الترحيل اليه وكذا ماهي الحقول المراد تصفيتها من البيانات . عموما اخي في التعديل المرفق تم إجراء مايلي : 1-اضافة جدول جديد employeesNo2 لترحيل البيانات اليه . 2-إضافة نموذج جديد frmJobEnd لتنفيذ العملية يحتوي على مربع نص لادخال تاريخ الاحالة المطلوب فتظهر سجلات المستحقين للإحالة حتى هذا التاريخ ولم يسبق ترحيلهم من سابق 3-عند النقر على زر الأمر سيتم تنفيذ استعلامين بالشكل التالي: -الاستعلام الاول جعلته ضمن كود زر الامر ويقوم بترحيل السجلات الظاهرة في النموذج من الجدول الاول الى الثاني -الاستعلام الثاني جعلته في استعلام qryJobEnd وذلك لتتعرف على الفكرة عن كيفية تصفية الحقول من البيانات في الجدول الاول حيث يمكنك اضافة او الغاء أي حقول ارجو ان اكون قد وفقت في حل المشكلة مع تحياتي,,, 3-2-2010.rar

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