-
Posts
384 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو nssj
-
هل هذا يعني أن الأمر غير وارد في أكسس 🤔
-
أحسن الله إليك أخي الكريم .. تم الأمر بحمد الله مع أنني كنت أجري هذه العملية كثيرا في تجاربي .. حذف عمود الترقيم التلقائي ثم إضافته .. ويعود الترقيم التلقائي متسلسلا بالشكل المطلوب بغض النظر عما تم حذفه أو إضافته من السجلات لكن هالمرة ما زبطت .. ممكن يكون بسبب حجم الملف الكبير ؟؟ على كل حال .. تعلمت من كلام الأساتذة الكرام أمثالك أخي الكريم أنه لا ينبغي التدخل في عمود الترقيم التلقائي .. وهذا ما أنوي فعله .. لكن بعد الانتهاء تماما من التصميم النهائي للجدول وترك التجارب والبدء في (الجَد) 🙂
-
أخي الكريم جعفر .. هل هذا يعني أنه لا يمكنني بطريقة أو بأخرى إنشاء عمود لترقيم تلقائي جديد للسجلات كما هي الآن بغض النظر عما تم حذفه أو إضافته سابقا .. يعني يكون موافقا لعمود (TNO) الحالي
-
الإخوة الكرام .. في الملف المرفق حاولت إدراج عمود للترقيم التلقائي (ID) بحيث يكون الترتيب حسب عمود (TNO) ولكن الترقيم التلقائي لا يكون متسلسلا حسب المطلوب .. يعني أنه يضع الترقيم التلقائي دون الالتزام بأن يكون الترتيب حسب (TNO) كما يظهر في الصورة وكررت المحاولة .. والحذف والإضافة مع جعل ترتيب الجدول على (TNO) والنتيجة نفسها في كل مرة .. مع اختلاف موضع الخلل في التسلسل أحيانا ما هو السبب ؟؟ وأين الخطأ ؟؟ MusndWZwayid003.rar
-
تم الأمر بالطريقة التي كنت أتطلع لها .. والحمد لله وجزاك الله خيرا أخي الكريم فقد انطلقت من هذا الكود الأخير وأجريت عدة تجارب، ظهر لي أن المشكلة في رمزي (*) (#) وكانت نتيجة التجارب هذا الكود الذي أدى المطلوب بشكل دقيق Not Like "@" And Not Like "$" And Not Like "[*]" And Not Like "^" And Not Like "+" And Not Like "=" And Not Like "!" And Not Like "%" And Not Like "[#]" And Not Like "|" And Not Like "<" And Not Like "؟" And Not Like "<<"
-
جزاك الله خيرا أخي الكريم يوسف أحمد وأحسن إليك تم المطلوب .. وجربت الاستعلام على الملف الأصلي وعرفت أين الأخطاء هذا طبعا بعد عدة محاولات لتقليد الاستعلام الذي ذكرته .. فهو استعلام لم أجربه من قبل .. لكن نجح الأمر بحمد الله لكن كنت أتطلع إلى معالجة الأمر بطريقة أخرى .. بطريقة قد أستخدمها مستقبلا في أمور أخرى وهي طريقة للبحث عن هذه الرموز التي لها معان خاصة في أكسس مثل (* ^ #) فطرق البحث والاستبدال العادية لا تنفع معها وهي موجودة بكثرة في الجدول الرئيسي (TAB) .. لأن أصله ملفات وورد التي كنت أعمل عليها سابقا .. وأنا الآن أريد الانتقال للعمل على أكسس وأريد من الآن البدء باستبدالها بأرقام ووضعها في جداولها الخاصة المرتبطة بالجدول الرئيسي .. فهل من طريقة للبحث عن هذه الرموز المذكورة وغيرها وإن كان لها معاني خاصة في أكسس، سواء باستعلام أو كود، حتى أقوم بعد ذلك باستبدالها أو نقلها ثم حذفها .. أرجو أن أكون قد أوضحت المطلوب وكالمرة السابقة كتبت الرد السابق قبل الاطلاع على مشاركتك الأخيرة أخي الكريم 😂 والتي يظهر أن فيها معالجة للأمر بالطريقة التي كنت أتطلع إليها .. وسأجرب الكود لاحقا بعد أن أنتهي من بعض المشاغل .. وسأوافيك بالنتيجة أحي الكريم
-
الأخ الكريم يوسف أحمد .. رأيت مشاركتك بعد أن كتبت التعليق السابق وجزاك الله خيرا .. فقد فهمت قصدي وأني أريد كل عمود لوحده وعدلت على الاستعلام الأول ليصبح هكذا <>0 And <>1 And <>2 And <>3 And Is Not Null وكانت النتيجة المطلوبة لكن .. نفس المشكلة في العمود الثاني (TFR) .. تخرج جميع النتائج .. والمفروض أن تكون النتيجة هكذا
-
جزاك الله خيرا أخي الكريم Moosak .. الاستعلام المذكور أدى المطلوب بخصوص عمود (TFLVL) مع العلم أنه كان قصدي التعامل مع كل عمود لوحده، ولكن يظهر أني لم أوضح المطلوب لكني عدلت على (Quiry 1) ليعمل على كل عمود لوحده، فكانت هذه صيغته في عمود (TFLVL) SELECT TAB.ID, TAB.TNO, TAB.NOM, TAB.NASS, TAB.TFLVL FROM TAB WHERE (((TAB.TFLVL)="0" Or (TAB.TFLVL)="1" Or (TAB.TFLVL)="2" Or (TAB.TFLVL)="3" Or (TAB.TFLVL) Is Null)); وتم المطلوب بحمد الله .. وجزاك الله خيرا وحاولت أن أجرى نفس الطريقة على عمود (TFR) وعدلت الاستعلام إلى SELECT TAB.ID, TAB.TNO, TAB.NOM, TAB.NASS, TAB.TFR FROM TAB WHERE (((TAB.TFR)="@" Or (TAB.TFR)="$" Or (TAB.TFR) Like "*" Or (TAB.TFR)="^" Or (TAB.TFR)="+" Or (TAB.TFR)="=" Or (TAB.TFR)="!" Or (TAB.TFR)="%" Or (TAB.TFR)="#" Or (TAB.TFR)="|" Or (TAB.TFR)=">" Or (TAB.TFR)=">>" Or (TAB.TFR)="؟" Or (TAB.TFR) Is Null)); لكن يظهر أن هذه الجملة بحاجة لتعديل Or (TAB.TFR) Like "*" فعند تشغيل الاستعلام تخرج جميع النتائج
-
الإخوة الكرام .. في الملف المرفق عمودان (TFLVL) (TFR) (TFLVL) المطلوب التأكد أن القيم فيه هي أحد هذه الأرقام فقط 0 1 2 3 (TFR) المطلوب التأكد أن القيم فيه هي أحد هذه الرموز فقط @ $ * ^ + = ! % # | > >> ؟ وحيث يوجد غيرها تميز من خلال (ID) لتصحيحها MusndWZwayid 01.accdb
-
الإخوة الكرم .. بخصوص تلوين نتائج البحث باللون الأحمر، فقد طرح هذا الموضوع سابقا تلوين نتيجة البحث وبعد عدة محاولات نجحت في تطبيقه على ملفي حيث البحث فيه مبني على الاستعلام، ولكن السؤال لأهل الخبرة: هل ما قمت به لهذا الغرض صحيح أم هناك طريقة أفضل ؟ أما موضوع إظهار نتيجة البحث في السطر الأول، وبالتحديد في منتصف السطر الأول بحيث يسبقها بضع كلمات، فهذا الأمر لم أجد كلاما حوله وتظهر أهميته في الحقول النصية الطويلة، فإذا لم تكن كلمة البحث في بدايات النص فلن تظهر في نموذج نتائج البحث، وعليك أن تبحث عنها في كل نتيجة فما هي طريقة إظهار نتائج البحث في منتصف السطر الأول ؟ تلوين.accdb
-
جزاك الله خيرا أخي الكريم .. الاختصار يعمل بشكل جيد .. وأصبح كود البحث يتجاهل الفروق بين الحروف المطلوبة
-
الإخوة الكرام .. أفادني مؤخرا أحد الأخوة ممن عنده بعض المعلومات عن أكسس بتعديل الكود ليصبح هكذا: Dim str As String searchtext.SetFocus str = Me.searchtext.Text Me.searchtext = Replace(str, "أ", "ا") str = Me.searchtext.Text Me.searchtext = Replace(str, "إ", "ا") str = Me.searchtext.Text Me.searchtext = Replace(str, "آ", "ا") str = Me.searchtext.Text Me.searchtext = Replace(str, "ة", "ه") str = Me.searchtext.Text Me.searchtext = Replace(str, "ى", "ي") str = Me.searchtext.Text Me.searchtext = Replace(str, "ؤ", "و") وأصبح الكود يعمل بشكل جيد ويستبدل جميع الحروف المطلوبة ولكن هل توجد صيغة تختصر هذا السطر المكرر، أم أن هذه أفضل صياغة للكود
-
الإخوة الكرام .. في الملف المرفق كود لاستبدال بعض الحروف بحروف أخرى في مربع البحث (searchtext) وأنا لست من أهل الخبرة في كتابة الأكواد، ولكن هذا الكود محاولة تجميعية من هنا وهناك Private Sub search_go_Click() Dim str As String searchtext.SetFocus str = Me.searchtext.Text Me.searchtext = Replace(str, "أ", "ا") Me.searchtext = Replace(str, "إ", "ا") Me.searchtext = Replace(str, "آ", "آ") Me.searchtext = Replace(str, "ة", "ه") Me.searchtext = Replace(str, "ى", "ي") Me.searchtext = Replace(str, "ؤ", "و") والمشكلة فيه أنه لا يستبدل كل هذه الأحرف‘ إنما يستبدل الأحرف الموجدة في آخر جملة من الكود فقط ويتجاهل ما قبلها فما هي الصيغة الصحيحة لتأدية المطلوب واستبدال جميع هذه الأحرف وللتوضيح .. هذا الاستبدال في مربع البحث (searchtext) يجعل كود البحث يعمل بشكل أدق في المساواة بين أشكال الهمزة (أ إ آ ا) ونحوها عند البحث .. Replace.accdb
-
قمت بذلك والأمر يتم بسلاسة والحمد لله .. فجزاك الله خيرا أخي الكريم .. لا أريد أن أتدخل في هندسة البيانات أو في طريقة عمل البرنامج .. المهم الحصول على المطلوب لكن أحد الأمور المطلوبة والمهمة عندي هو حفظ هذه المعلومات في جداول الكتب، لأن هذه المعلومات بالنسبة لي هي كرقم الحديث أو كالجزء والصفحة، بل ليس من المبالغة أن أقول كالنص، هي جزء لا يتجزأ من كل كتاب، فينبغي أن تبقى في جداول الكتب .. ليس من باب (هندسة البيانات) أو (قواعد البرمجة) بل من باب (طبيعة العمل الذي أقوم به) لذلك كررت أكثر من مرة (ما هو المطلوب للوصول لهذه النتيجة) لأني لا أزال في مرحلة تصميم الجداول وأستطيع تغيير التصميم حسب ما يلزم .. كل الملفات التي عندي للتجارب فقط .. وملفاتي الأصلية لا تزال على الوورد لذلك أنا أسير معك أخي الكريم بخطوة بخطوة بصفتك خبير بقواعد البيانات .. لكن في نهاية المطاف وبعد الانتهاء من المطلوب -بعون الله- حسب ما تقتضيه (هندسة البيانات) .. .. لابد -أخي الكريم- من العودة لهذا المطلب (نقل التغييرات لحقل MNO) ولو عبر كود معاكس للكود الذي تفضلت به بداية، ينقل المعلومات من الجدول الوسيط لهذا الحقل، ونبحث عندها ما هو المطلوب للوصول لهذه النتيجة .. لأنها مهمة بالنسبة لي
-
أخي الكريم .. لا مشكلة في التعديل الذي أضفته في جداول الكتب وقد جربت التعديل على رقم الارتباط بالشاشة التي تفضلت بها .. وتم التغيير بسلاسة .. ولكن لم يحفظ التعديل في حقل (MNO) الذي جداول الكتب لذلك عندما شغلت كود (إجراء دمج المراجع) حصل الخلل لأن الجدول الوسيط أخذ المعلومات القديمة الموجودة في حقل (MNO) فما هو المطلوب لكي يتم حفظ التغييرات في حقل (MNO) في جداول الكتب
-
أخي الكريم .. هل لك أن تقوم بإجراء التعديل بالطريقة التي تراها مناسبة لكي أفهم قصدك بالضبط .. إجمالا إذا كانت العملية تقتضي إضافة حقل أو حقول لجداول الكتب فلا مشكلة عندي .. ولا مشكلة عندي أيضا إن اقتضى الأمر إنشاء جدول آخر بخصائص ومواصفات خاصة .. بل لا مشكلة عندي إن اقتضت الضرورة إضافة حقل أو أكثر في الجدول الرئيسي (TAB) لهذا الغرض .. فلا أزال في سعة من أمري من جيث تصميم وإضافة الجداول المهم الوصول للنتيجة المطلوبة إن أمكن: أن تحفظ التعديلات في حقل (MNO) الذي في جداول الكتب وأن يبقى هو المستودع الرئيسي للبيانات
-
أخي الكريم شكرا على الإفادة .. مع أنني لم أستوعب جميع كلامك أخي الكريم ما تعني بقواك (التخلي عن الاعتماد على رقم التخريج في جداول المراجع) مع أن إدراج رقم المرجع قد تم فيها - لا مشكلة أن يكون الاعتماد على الجدول الوسيط لتسجيل التعديلات والتغييرات، ولا مشكلة عندي في طريقة إجراء هذا التعديل وفي أي جدول يكون، ولا يهم إن كان يتطلب أكثر من خطوة المهم بالنسبة لي .. أنه بعد إنهاء جميع الخطوات وحفظ التعديلات في الجدول الوسيط أو أي مكان آخر.. تحفظ الأرقام المعدلة في حقل (MNO) الموحد في جداول الكتب .. لا يكفي فقط أن يتم تعديلها في الجدول الوسيط .. ينبغي أن يبقى هذا الحقل (MNO) هو المستودع الرئيسي لهذه الأرقام وللتوضيح أكثر .. فلا مشكلة عندي أن يكون حفظ التعديلات وإجراؤها في الجدول الوسيط بعيدا عن هذا الحقل (MNO)، ثم استخدام كود منفصل لنقل هذه التعديلات لحقل (MNO) .. المهم ألا يكون هناك أي فرق في البيانات والأرقام بين هذا الحقل (MNO) وبين الجدول الوسيط، التعديل الذي يتم هنا يتم هناك .. ثم أخي الكريم .. إن الكود الذي تفضلت به (دمج المراجع) يأخذ البيانات بداية من حقل (MNO) الموحد ويفرغها في الجدول الوسيط، فإذا كانت التغييرات والتعديلات لا تنقل إليه فسوف يحدث خلل عند استخدامه مرة أخرى .. لذلك أنا بفهمي المتواضع حريص أن يبقى هذا الحقل هو المستودع الرئيسي لأرقام الربط وأصدقك القول .. من البداية وأنا أشعر (بالقلق) من هذا الأمر، لاحتواء هذا الحقل على رموز وأرقام وليس أرقاما فقط، بل وأكثر من رقم في خانة واحدة .. فكيف سيميز البرنامج بين هذا الرقم وبين غيره وهما في خانة واحدة، ليقوم بتعديل هذا والإبقاء على ذاك .. ولكن قلت لعل أهل الخبرة يجدون حلاً
-
أخي الكريم .. على الرغم من أني لست من أهل الاختصاص ولكن عندي فضول شديد لمعرفة أين الخطأ الذي عالجته 😐 .. هل هو في الوحدة النمطية أم في موضع آخر وجزاك الله خيرا أخي الكريم .. تم الشق الأول من المطلوب، وقد أضفت كتابا جديدا آخر وأحاديث جديدة أخرى وأجريت التجارب، والنتيجة بحمد الله جيدة والحاصل إلى الآن: الوحدة النمطية التي تفضلت بها تقوم بكل العمل كما سبق، مهما أضفتُ من كتب جديدة أو أحاديث جديدة للجدول الرئيسي. ولا مشكلة في وجود رموز أو في تعدد الأرقام في الخانة الواحدة في حقل (MNO) في ملفات الكتب، تستطيع الوحدة النمطية تجاهل الرموز واستخراج الأرقام المتعددة ما دام كل رقم في سطر جديد وهو المطلوب بحمد الله .. فجزاك الله خيرا أخي الكريم وأحسن إليك الآن الشق الثاني من المطلوب: التعديل على هذه الأرقام عند الحاجة واكتشاف خطأ، كما ذكرت في آخر المشاركة الأولى فما هي الطريقة المناسبة لهذا الإجراء، بحيث يحفظ هذا التعديل في حقل (MNO) الموجود في ملفات الكتب. ذلك أني حريص أن يبقى هذا الحقل المشار إليه هو (المستودع الرئيسي) لهذه الأرقام والرموز فهل هذا ممكن بطريقة أو بأخرى على الرغم من الملاحظة التي تفضل بها الأخ (Eng.Qassim) من كون نوع البيانات غير موحد وتصوري المتواضع لعملية التعديل على أرقام الارتباط، يبدأ بتحديد الحديث المطلوب تعديل ارتباطه، ثم طلب كود وشاشة التعديل MusndWZwayid 10.accdb
-
شكرا لك أخي الكريم أبو إبراهيم الغامدي .. محاولتك بداية جيدة بعون الله الذي فهمته أن الوحدة النمطية التي تفضلت بها تقوم بالعمل كله، بداية من تفريغ المعلومات من عمود (MNO) الموجود في جداول الكتب في الجدول الوسيط الجديد، ثم عرض الكتب مع نصوصها في أماكنها في الجدول الرئيسي وقد جربت أن أضيف كتابا جديدا (60012) وجربت الكود فكانت النتيجة المطلوبة، أضاف معلومات الكتاب الجديد بشكل صحيح. لكن .. عندما أصفت للجدول الرئيسي (TAB) أحاديث جديدة للتجربة، وأضفت لها أرقاما في جداول الكتب، لم يقم الكود بإدراجها فلا أدري ما السبب أخي الكريم .. والمحاولة في الملف المرفق MusndWZwayid 9.accdb
-
🤔 🤔
-
الإخوة الكرام .. عطفا على الموضوع السابق الذي طرحته قريبا بعنوان مساعدة في إظهار حقل النص في نموذج فرعي وقام الأخ المكرم د. حسين بمساعدتي في أداء المطلوب، بقي الآن طلب سأحاول توضيجه قدر المستطاع الفكرة تقوم على أساس ربط جداول الكتب بالملف الرئيسي (TAB) عبر المفتاح الأساسي (MNO) بحيث تظهر في نموذج خاص كتخريج للحديث الرئيسي يعني أن هذا الحديث من الملف الرئيسي (TAB) موجود في هذه الكتب، مع ذكر اسم كل كتاب ورقم الحديث فيه ونص كل حديث من جدوله وتظهر هذه النتائج بناء على الجدول الوسيط (TAB_Books_X) وهذا ما تم الوصول إليه بمساعدة الأخ المكرم فجزاه الله خيرا والآن .. المطلوب الوصول لهذا الجدول الوسيط (TAB_Books_X) تلقائيا من جداول الكتب، وليس تعبئته يدويا كما فعلت أنا، مع إمكانية تحديثه تلقائيا أيضا عند إضافة جداول كتب أخرى وكل جداول الكتب تصميمها واحد، وحقل الربط بينه وبين الجدول الوسيط اسمه (MNO) ومطلوب تفريغ ما فيه من أرقام فقط في حقل (MNO) في الجدول الوسيط (TAB_Books_X) ذلك أن حقل (MNO) في جداول الكتب لا يحتوي أرقاما فقط، بل يحتوي رموزا معينة لها دلاتها عندي وهي (*) (@) (&) ($) (%) فالمطلوب أداة تتجاهل هذه الرموز وتنقل الأرقام فقط إلى الجدول الوسيط وأمر آخر .. يوجد أحيانا في الخانة الواحدة أكثر من رقم، اخترت أن أفصل بين كل رقم بسطر جديد (Enter) ففي هذه الحالة ينبغي أن يكرر هذا الحديث في الجدول الوسيط حسب عدد هذه الأرقام .. كل رقم في سجل جديد، كما في الصورة: وفي الملف المرفق قمت بتعبئة حقل (MNO) في الجدول الوسيط (TAB_Books_X) يدويا لتوضيح الصورة .. والمطلوب سلمكم الله كما ذكرت سابقاً: أداة تقوم بتعبئة هذا الحقل تلقائيا مع إمكانية التحديث عند إضافة جداول كتب أخرى مع مراعاة تتالي التحديث في الجانبين .. يعني إذا أردت تغيير ارتباط الحديث التالي في الصورة من رقم (8) إلى (5) مثلاً يتغير المطلوب في الجدول الوسيط وجداول الكتب أيضاَ أرجو أن أكون قد أوضحت المطلوب MusndWZwayid 8.accdb
-
أخي الكريم .. عدلت الكود في الاستعلام ليصبح هكذا Nz(DLookUp("[nass]",[TAB_Books_X]![BookNO],"[Hno] LIKE '*" & [TAB_Books_X]![HNO] & "*' And [Hno]=" & [TAB_Books_X]![HNO]),"-") وكانت النتيجة المطلوبة بحمد الله وللتأكد زدت كتابا جديدا للتجربة وكانت النتيجة جيدة بحمد الله .. وهذا الملف بعد التعديل لإلقاء النظرة الأخيرة من المختصين قبل الاعتماد MusndWZwayid 8.accdb
-
أخي الكريم ..لا يزال هناك خلل في إحضار النص من الكتاب الصحيح أخي الكريم .. يبدو أن هناك تحسن .. ولكن ليس كل الأحاديث يتم إحضار نصها، انظر الصورة المرفقة للاستعلام
-
لا تزال المشكلة قائمة أخي الكريم، وهي إجضار النص من الكتاب الصحيح في الصورة المرفقة أول حديثين هما من كتاب (ثلاثيات البخاري) ولكنه أحضر النص من كتاب (حديث أبي إسحاق)
-
أخي الكريم .. أنا عدلت على الكود الذي تفضلت به من =DLookUp("[nass]","[20101]","[id] =" & [HNO]) فأصبح =DLookUp("[nass]","[20101]","[HNO] =" & [HNO]) وبهذا أصبح يحضر رقم الحديث المطلوب .. لكن تبقى قضية اختلاف الكتاب فالمطلوب أن يحضر النص من جدول الكتاب المذكور في حقل (BookName) وبعبارة أخرى .. أن يتغير رقم الجدول في الكود [20101] بتغير اسم الكتاب في (BookName) فإذا كان الكتاب (حديث أبي إسحاق) يحضر الحديث من جدول (50011) وإذا كان الكتاب (مجلس في الحديث) يحضر الحديث من جدول (50012) وهكذا في حالة وجود كتب أخرى .. وأسماء الكتب وأرقام جداولها من جدول (TAB_Books)