nssj

أحسن الله إليك أخي الكريم husamwahab هذا هو المطلوب مع أني عندما فتحت الكود تفاجأت بأنه كود كامل بعدة جمل هل هذا يعني بأن المطلوب لا يمكن تنفيذه بهذه الجمل التي على شاكلة .. .. UPDATE b14 SET b14.HNO ذلك أنه خلال تجاربي الفاشلة 🙄 كانت تظهر لي أحيانا رسالة مفادها أنه يوجد خطأ في بناء جملة (update) .. فسبق إلى ذهني أن الطريقة صحيحة من حيث المبدأ وأن الخطأ إنما كان فقط في الصيغة ؟؟

شكرا على مرورك أخي الكريم أبو عبدالله الحلوانى ولكن كما ذكرت في المشاركة السابقة .. يبدو أني بحاجة لاستعلام تحديث وليس استعلام إلحاق فالمطلوب نسخ بيانات حقل (HNO) التي في جدول (b14000) إلى جدول (b14) وعليه .. فحقل المفتاح الأساسي (MNO) ليس بمشكلة لأنه لا توجد زيادة سجلات .. عدد السجلات سيبقى كما هو والعملية هي مجرد تعبية بيانات أو تغييرها بناء على حقل من جدول آخر الخطأ مني منذ البداية عندما استعملت الكود بصيغة الإلحاق وليس التحديث ثم أحب أن أذكر الإخوة الكرام .. المطلوب أساسا هو أداء هذه العملية من خلال كود وليس استعلام .. أنا لجأت للإستعلام لمعرفة أين الخطأ .. فلم أفلح على الحالتين 😐

شكرا على الإفادة أخي الكريم وبعد تجربة الكود بعد إزالة المفتاح الرئيسي ظهر لي أن المطلوب استعلام تحديث وليس استعلام إلحاق !!!!! المطلوب باختصار هو أنني كنت أنسخ عمود (HNO) من جدول (b14000) ثم أقوم بلصقه في عمود (HNO) من جدول (b14) والمطلوب هو أن يقوم الكود بهذه العملية جربت UPDATE b14 SET b14.HNO = [b14000].[HNO] وما زبطت وحاولت بالاستعلام ونفس النتيجة هو أنا كل ماأفكر حالي وصلت لمستوى مبتدئ بكتشف إنو لسه الطريق طوييييييل 🤔 🤔 🤔

الإخوة الكرام .. الكود في الملف المرفق أخذته من بعض الأكواد، والغرض منه إلحاق البيانات من جدول لآخر .. ولكنه لا يعمل cdb.Execute "insert into b14 (HNO) select HNO from b14000" وجربت إجراء الأمر عبر استعلام فلم ينجح أين الخطأ على الوجهين ؟؟ سجلات xx.rar

السؤال المفروض يكون: طيب إيه بس اللي إنت فاهمه 😂 هاي الأكود (الذكية 😃) صعبة كثييييير علي .. أنا بالكاد ممكن أستوعب بعض الأكواد العادية

شكراَ للأخ ناقل والأخ الناقل ابا جودى 😁 تم المطلوب بحمد الله .. فبارك الله فيكما مع إني زعلان شوي .. فكرت حالي صرت معلم، وخليت النماذج الفرعية بخاصية غير مرئي، وبالنسبة للسطر If Not IsNull(Form_FRM_TFX.txtMNO) Then Me.FRM_TFX.Visible = True Else Me.FRM_TFX.Visible = False شفتو طويل شوي .. وقلت لحالي: مادام إنو هالنموذج صار غير مرئي أصلا، يعني مافي داعي للجملة الأخيرة (Else Me.FRM_TFX.Visible = False) وشطبتها .. بس ما زبطت .. صار النموذج يظهر حتى وحقل (MNO) فارغ .. والغريب إنو بيظهر دايما مع نموذج (Frm_TF) فرجعت كل شي زي ماكان .. وبطلت تجارب واختراعات 😐

مع إني مش فاهم إشي من الكود 🙄 .. بس برضو أنا إلي دور في الموضوع .. بسبب السطر السحري إللي أضفتو Me.Requery 😂 😂 😂

شكلو مصباح علاء الدين شغال اليوم على وذنو 😁 .. وأنا مش ملحق عليه .. راح أجرب المرفق وأبلغكم بالنتيجة

في الملف المرفق النموذج الرئيسي (FRM1) وفيه ثلاث نماذج فرعية 1- (FRM_RMZ_X) 2- (Frm_TF) 3- (FRM_TFX) بالنسبة للنموذجين الأول والثاني فالمطلوب -إن أمكن- ألا يظهرا إلا إذا كان فيهما بيانات، أما إذا كانت الحقول فارغة فلا يظهر النموذج الفرعي أصلاً بدل أن يظهر بحقوله الفارغة أما بخصوص النموذج الفرعي الثالث (FRM_TFX) فالمطلوب ألا يظهر إذا كان حقل (MNO) فارغاً وتوجد نماذج أخرى على هذه الشاكلة .. لكني سأحاول أن أعالج الأمر بنفسي بعد أن أتعلم من إفادات أهل الخبرة ومشاركاتهم في هذا الموضوع 🙂 MusndWZwayid001.rar

الحمد لله .. ومصباح علاء الدين هذا إلك فيه دور أخي الكريم ابا جودى وكل الشكر للأخوين الكريمين husamwahab & ابا جودى وتم المطلوب بحمد الله والحاصل من كل ما سبق: تعلمتُ كيفية حذف سجلات من (..) إلى (..) عبر الاستعلام إذا احتجت لهذا الأمر في بعض الأحيان وإذا كنت أريد إدراج هذا الإجراء في النماذج لتكرار الحاجة إليه فأستخدم الوحدة النمطية، مع الأمر التالي إذا كان مصدر البيانات هو الجدول نفسه Call SpDelRec(Me.RecordSource, "TNO") Me.Requery أما إذا كان مصدر البيانات استعلام فأستخدم الأمر التالي Call SpDelRec("TAB_RMZ", "TNO") Me.Requery مع تغيير اسم الجدول حسب المطلوب

لأ هيك كثييير .. إذا كنت إنت مش مبرمج يعني أنا لسه مش مبتدئ 😁 والطلب اللي طلبتو .. طلبتو لأني شفت أكواد فيها نفس الفكرة .. أو نفس الذكاء .. بتجيب اسم الجدول لحالها بدون ما حدا يحكيلها ما تسألني وين هاي الأكواد .. لأني نسيت 🙃

شكرا أخي الكريم ابا جودى على الإفادة ومن باب التطفل على موائد الكرام أضفت للكود عبارة (Me.Requery) حتى لا تظهر الصفوف المحذوفة # # ، فأصبح الكود هكذا Call SpDelRec("TAB_RMZ", "TNO") Me.Requery فهل هذا هو التصرف السليم والكود الذي تفضلت به أخي الكريم مريح جدا ومرن فبارك الله فيك، وهو مناسب تماما في حالة أن يكون حقل الترقيم مختلف في كل جدول أو نموذج .. لكن أيضاً رغبة في التعلم وحتى لا يبقى في ذهني تساؤلات: في مثل هذه الحالة التي يكون اسم حقل الترقيم وهو مجال عمل الكود موحدا في جميع الجداول والنماذج (TNO)، والمتغير الوحيد هو اسم الجدول، فهل يمكن في مثل هذه الحالة أن يعرف الكود بنفسه اسم الجدول الذي سيجري عليه العملية، يعني أن يأخذ اسم الجدول من مصدر بيانات النموذج الذي تم استدعاؤه منه

شكراً لك على الإفادة أخي الكريم husamwahab وتطبيقا لما فهمته عدلت على استعلام الحذف بحيث أكتب فيه مباشرة أرقام الحذف المطلوبة، فأصبح بهذه الصورة وإلى هنا تم المطلوب بحمد الله، فجزاك الله خيراً وأحسن إليك ولكن .. أطمع بإجراء آخر إن كان بالإمكان وهو تحويل الكود الذي تفضلت به إلى وحدة نمطية ذكية أو كود ذكي، يتم استدعاؤه من أي نموذج، فيخرج هذا المربع [حذف من () إلى ()] وبمجرد كتابة الأرقام يقوم بالمهمة، دون الحاجة لكتابة كود لكل نموذج أو تغيير اسم النموذج، فهو يغير اسم النموذج بالنظر للنموذج الذي تم استدعاؤه منه، وفي جميع النماذج الأرقام المطلوبة هي تحت حقل باسم موحد (TNO) وفي الملف المرفق نموذجين للتطبيق عليهما إن كان هذا ممكنا Tab05.accdb

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

الإخوة الكرام .. مطلوب استعلام لحذف سجلات معينة يتم تحديدها بالأرقام من () إلى () والترقيم من حقل (Tno) Tab02.accdb

نعم أخي الكريم husamwahab هذا هو المطلوب فجزاك الله خيراً وأحسن إليك

الإخوة الكرام .. مطلوب كود لتعبئة حقل (MNO) من الجدول (TAB_TF) والقيمة المطلوبة هي الرقم الموجود في حقل (MNO2) ويحدده قيمة الحقل (lvl) فحيث ما كانت قيمة (lvl) = 1 أو 2 فإن قيمة (MNO) هي رقم (MNO2) السابق له والذي قيمة (lvl) فيه = 0 أما حيث ما كانت قيمة (lvl) = 3، فإن قيمة (MNO) هي رقم (MNO2) السابق له والذي قيمة (lvl) فيه هو 2 وليس مطلوبا تعبئة السجلات التي تكون فيها قيمة (lvl) = 0، لأنها ستحذف، فهي موجودة فقط لتعبئة الجدول بالطريقة السابقة والترتيب بناء على حقل (Tno) وللتوضيح فإن هذه الأرقام لبيان الأصول والفروع، فحقل (MNO) هو للأصول ، وحقل (MNO2) لفروعها وحيثما كان (lvl) = 0 ، فهذا يعني أنه الأصل والفروع التابعة له هي التي فيها (lvl) = 1 أو 2 ولكن الفرع الذي برقم (2) قد يكون له فروع، وهي الأرقام (3) التي بعده أرجو أن أكون قد وفقت في شرح المطلوب، ولزيادة البيان ففي الملف المرفق جدول (TAB_TF2) كتبت بعضه يدويا للتوضيح Tab_Tf.accdb

😐 طيب .. ممكن طلب آخر يمكن يكون أسهل هل يمكن تحويل هذه الأكواد إلى وحدة نمطية ذكية لتطبيقه على أكثر من نموذج .. قصدي بوحدة نمطية ذكية أنها تكتشف اسم النموذج والجدول بنفسها، فبمجرد استدعاء الكود من أي نموذج يقوم الكود بتنفيذ العملية عليه .. لأن حقل الترقيم الذي هو مجال عمل الكود موحد في جميع الجداول والنماذج وهو (Tno) والأكواد المطلوبة 1- كود نقل السجل حركة واحدة للأسفل أو للأعلى، وهو أحد الأكواد التي أشار إليها عليها الأخ biskra 2- كود الإضافة الذي تفضل به الأخ (kanory)، حيث سوف أستخدمه في الجداول والنماذج الفرعية، حيث لا توجد مشكلة النصوص الطويلة التي تسبب البطء، وميزة كود الأخ (kanory) أنه لا يتطلب وجود الترقيم العشري يكفي فيه فقط وجود حقل الرقم المسؤول عن الترتيب (Tno) وفي الملف المرفق نموذجان للتطبيق عليهما .. وقد نسخت الأكواد المطلوبة في وحدات نمطية للتوضيح .. هذا ما أعرفه فقط النسخ واللصق، أما التحويل والتفعيل فهذه لأهل الخبرة MusndWZwayid 01.accdb

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

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

شكراً أخي الكريم على توضيحاتك .. ويناء على كل ما سبق سأبني جدول (TAB_Msaneed) بنفس الطريقة، حقوله الأربعة التي كانت قوائم من عمودين أجعلها أرقاما فقط، وترجمة هذه الأرقام لمعانيها في الجدول المخصص (tbl_C) واستفسار أخير بخصوص حقول (LVL) ذات القائمة الواحدة من عدة أرقام، أنا في الجدول أضع لها خاصية (قاعدة التحقق من صحة) وأحصر الإدخال بالأرقام المطلوبة (1 or 2 or 3)، من باب الأمان وضمان ألا يتم إدخال غيرها تحت أي ظرف .. هل هذا مناسب؟

1- تمام .. ولكن من باب الفضول هل لك أن تبين لي ما هي الفائدة التي قد تلزمني في المستقبل؟ 2- كونك أخي الكريم قلت (أو) يعني أنك ترى أن الاحتمالين بنفس الأداء، فهل ما فهتمه صحيح؟ .. فإن كان كذلك فأنا بنظرتي السطحية أفضل الاستعلام الداخلي يعني (استعلام إعدادات مصدر الصف) حتى لا تكثر الاستعلامات في الواجهة 3- الإشكالية التي عندي بسبب أن حقل (LVL) في بعض الجداول من رقمين وفي بعضها من ثلاثة، وقد يضاف مستقبلا في جدول آخر من خمسة أرقام مثلاً .. فكيف يتم التمييز بين قيمته في كل جدول مثلا حقل (LVL) في جدول (TAB) من ثلاثة أرقام، وهو في جدول الرموز (TAB_RMZ) من رقمين .. فاجتهدت وجعلت مصدر الصف في نموذج الرموز (FRM_RMZ) استعلام ووضعت في خانة المعيار (1 or 2) وزبطت معي .. أصبح يعرض قائمة من رقمين فقط .. بينما في النموذج الرئيسي (Frm1) يعرض الأرقام الثلاثة .. فهل هذا تصرف صحيح ؟ 4- وعندي اقتراح آخر بخصوص حقل (LVL) وأمثاله حيث المطلوب اختيار رقم من قائمة .. أقصد قائمة من عمود واحد وليس من عمودين، أن تكون قائمة الأرقام هذه في النموذج ، في [نوع مصدر الصف] (قائمة القيم) وفي [مصدر الصف] أضع الأرقام المطلوبة، فبذلك تظهر قائمة الأرقام المطلوبة دون اللجوء لجدول (tbl_C) كما فعلت ذلك في نموذج (FRM_EH) فإذا كان هذا الإجراء مناسبا فيمكن استخدامه في بقية الجداول ونماذجها .. أضع قائمة الأرقام في النموذج بهذا الشكل، كل نموذج وما يناسبه .. فما رأيك أخي الكريم ؟ وعندي استفسار آخر في هذا الموضوع سأطرحه بعد أن أستوعب المعلومات السابقة .. فهي معلومات دسمة بالنسبة لي 😁 MusndWZwayid03.rar

شكرا على هذه النصائح أخي الكريم جعفر .. ولدي هنا استفساران، لكن قبل ذلك أحب أن أحيطك علماً بأني أنا المستخدم الوحيد الذي له الحق في إدخال البيانات والتعديل عليها، وحتى على افتراض أني وجدت يوما من يساعدني في بعض هذه الأمور فلن تكون هذه الإجراءات والتحديثات على قاعدة البيانات مباشرة .. لابد حينها أن أجد طريقة أستعرض فيها هذه البيانات لأتأكد منها قبل إدخالها في قاعدة البيانات .. أحببت أن أحيطك علما بهذه المعلومة لأنه قد يكون لها تأثير على النصائح والتوجيهات والتعديلات التي تتكرم بها 1- الاستفسار الأول: ما فائدة حقل (c_Option_2) في جدول (tbl_C) 2- ثانيا: توجد لدي بعض الحقول بنفس الاسم في عدة جداول، مثلا حقل (LVL) وهو يعبر عن المستوى وهو مجرد بضعة أرقام، أضعه بهذه الاسم في كل جدول أحتاجه فيه، ولا يوجد في جدول (tbl_C) خانة لاسم الجدول فكيف تميز هذه الحقول التي بنفس الاسم .. أم أن وجود حقول بنفس الاسم في أكثر من جدول خطأ ؟

هيك صار سهل علي .. 😁 شكرا لك أخي الكريم