ابو جودي

ان شاء الله تعالى ممكن ذلك ارفق القاعدة

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

انتظروا النسخة بعد التعديل والاضافات 😉 تم بفضل الله تعالى التاكد من صحة الايات والتى لم تكن مضبوطة فى المصاحف الرقمية المنتشرة لان المصدر ان شاء الله فى النسخة القادمة هو من مجمع الملك فهد لطباعة المصحف الشريف

استاذى الجليل هو حضرتك تشرب سطل الشاى وانا اللى احاول واجاوب

انا اسف جدا لم انتبه بسبب انى اعمل على النظام ٣٢ بيت ولكن هذا التعديل للكود انا استخدمته داخل القاعدة ولكن الله اعلم به هل يعمل ام لا على العموم استاذى العزيز جرب التعديل ومن فضلك لو تمام فقط اهبرد

المصحف الرقمى - مجمع الملك فهد 2.zip

تم بحمد الله تعالى وفضله التوصل للنتيجة المطلوبة موديول لتجميع كل السجلات فى حقل واحد Public Function ToMrg() As String Dim strTemp, i Dim strSQL As String strSQL = "select Aya from tblAyatSource;" strTemp = CurrentProject.Connection.Execute(strSQL).GetRows For i = 0 To UBound(strTemp, 2) ToMrg = ToMrg & strTemp(0, i) & Space(1) Next ToMrg = Mid(ToMrg, 1, Len(ToMrg) - 1) End Function والان موديول فصل الايات من حقل واحد الى جدول اخر لتكون كل اية فى سجل Public Sub ToSplitForTabel() Dim db As DAO.Database Dim rs As DAO.Recordset Dim rsADD As DAO.Recordset Dim strSQL As String Dim strField1 As String Dim strField2 As String Dim varData As Variant Dim i As Integer Set db = CurrentDb strSQL = "SELECT ayat FROM TableA " Set rsADD = db.OpenRecordset("TableB", dbOpenDynaset, dbAppendOnly) Set rs = db.OpenRecordset(strSQL, dbOpenDynaset) With rs While Not .EOF strField1 = !ayat varData = Split(strField1, ChrW(1757)) For i = 1 - 1 To UBound(varData) With rsADD .AddNew !ayat = varData(i) & ChrW(1757) .Update End With Next .MoveNext Wend .Close rsADD.Close End With Set rsADD = Nothing Set rs = Nothing db.Close Set db = Nothing End Sub

طيب بفضل من الله توصلت الى نتيجة تقربنا جدا من المطلوب دمجت كل السجلات الى سجل واحد الان المطلوب فصل بيانات السجل الى عدة سجلات لتكون كل اية فى سجل خاص بها المصحف الرقمى - مجمع الملك فهد.zip

اسال الله لى ولكم وكل عباد الله تعالي المسلمين وكل خلق الله تعالى العفو والعافية استاذى الجليل تدور براسي فكرة ولكن هل يمكن بطريقة ما تجميع السجلات على التوالي عن طريق لوب ويتوقف التجميع عند العلامة ۝

طيب انا عملت نصف المهمه والحمد لله انظر الى ترتيب ايات سورة الفاتحة tblAyaat Aya سُورَةُ الفَاتِحَةِ بِسۡمِ ٱللَّهِ ٱلرَّحۡمَٰنِ ٱلرَّحِيمِ ۝ ٱلۡحَمۡدُ لِلَّهِ رَبِّ ٱلۡعَٰلَمِينَ ۝ ٱلرَّحۡمَٰنِ ٱلرَّحِيمِ ۝ مَٰلِكِ يَوۡمِ ٱلدِّينِ ۝ إِيَّاكَ نَعۡبُدُ وَإِيَّاكَ نَسۡتَعِينُ ۝ ٱهۡدِنَا ٱلصِّرَٰطَ ٱلۡمُسۡتَقِيمَ ۝ صِرَٰطَ ٱلَّذِينَ أَنۡعَمۡتَ عَلَيۡهِمۡ غَيۡرِ ٱلۡمَغۡضُوبِ عَلَيۡهِمۡ وَلَا ٱلضَّآلِّينَ ۝ انظر الى باقى الايات تجد الاية قد تكون مقسمة فى اكثر من سجل المطلوب تجميع كل اية فى سجل خاص بها كما فى سورة الفاتحة المصحف الرقمى - مجمع الملك فهد.mdb

السلام عليكم ورحمة الله تعالى وبركاته اساتذتى الافاضل لاحظت الكثير من الاخطاء عند العمل على المصاحف الرقمية وبفضل من الله تحصلت على ملف ورد من مجمع الملك فهد لطباعة المصحف الشريف اريد كل ايه فى سجل هل يمكن عمل ذلك برمجيا المصحف الرقمى - مجمع الملك فهد.mdb UthmanicHafs1 Ver13.doc

ونصيحة لوجه الله تعالى اقراء هذا الموضوع بعناية

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

انا اسف والله انا لم انتبه يا استاذ عبد الله ان مشاركة استاذ محمد سلامة كانت اقتباس من حضرتك لم انتبه الا الان اكتشفت السبب اكتب فى البحث الرحم**ن استبدل النجوم بالصغط على زر الشيفت مع زر حرف التاء لتمديد الحرف لتصبح الرحم_ن تكمن المشكلة بكتابة الايات نفسها تقريبا ٣ ساعات وانا احاول البحث عن السبب اعتقدت المشكلة برمجية ولكن لم تكن من الاكواد

مبروك استاذ @husamwahab 🌹🌹🌹 اتمنى لك النجاح في كل امورك ودائما فى تألق انا اسف على التاخير 🙏

ممكن المرفق

اهلا اهلا استاذى الحبيب واخى الكريم الاستاذ @محمد سلامة 🌹🌹🌹🙏 انا ما اشتغلت لسه ع البحث وما جربت بالقدر الكافى بس واضح كده من تجربة حضرتك ان هيكون فى مشاكل الله المستعان.. اخى وحبيبى كل الشكر والتقدير سوف ابحث من جانبي وان وفقكم الله فى حل المشكلة يا سلام يبقى جزاكم الله خيرا مشكلتى ان الافكار تتلاحق وتتزاحم فى راسي وبذلك انسي بعض الاشياء ممكن رابط الموضوع اذا تكرمت الله يرضي عليك

ممكن توضيح اكتر وماذا يعنى سيرفر هل جهاز رئيسي ترتبط به اجهزة اخرى بشبكة محلية نيت ورك ام سيرفر اى مساحة محجوزة على الانترنت وماذا تعنى بجهاز العميل الموضوع للاجابة يحتاج منك ما تبخل بعرض شرح واف وكاف حتى تقدم لك المساعدة ان شاء الله

استاذى الجليل حضرتك فكرتك ولا اروع فعلا 🙏🌹🌹🌹

استاذى الجليل ومعلمى القدير الاستاذ @Gamal.Saad ✌️🙏🌹🌹🌹 اولا وقبل كل شئ مهما قدمت من كلمات وعبارات شكر لن اوافيكم حقكم وقدركم استاذى الجليل شكر الله لكم واحسن اليكم كنا تحسنون الى طلبة العلم جزاكم الله خيرا 🌹🙏 شكرا اسال الله تعالى فى هذا الشهر الكريم وتلك السويعات الطاهرات فى هذه الايام المباركات ان يتقبل كل اعمالكم فتكون فى موازين حسناتكم ويرزقكم البركة فى العمر والعلم والاهل وان يرزقكم القبول والهدى والتقي والغنى وان يرزقكم ان شاء الله الفردوس الاعلى انت وكل اساتذتى العظماء ومل من تعلمت منه حرفا حتى ولو بطريق غير مباشر وكل المسلمين ان شاء الله امين امين امين واسمح لى استاذى الفاضل الكريم فى طلب على استحياء فضلا وكرما وليس امرا ان تنظر الى هذا المرفق بوجه عام ولا تحرمنى من رايكم وبوجه خاص الى نموذج البحث بطريقتكم المباركة للاطلاع على الوقت والنتيجة والالية بشكل عملى للعلم بخصوص تفادى التشكيل والهمزات هناك من الاكواد الكثير لعمل ذلك وبعد تجارب عديدة اتضح ان العملية مع بعض الاكواد تستغرق بعض الوقت لفتح النموذج لانها تحول كل النص عند الفتح دفعة واحدة وهناك ما يحول النص لحذف التشكيل والهمزات وقت عملية البحث ولكنها تستغرق وقتا. وبناء على تجارب عديدة وجدت من وجهة نظرى البسيطة ان الافضل تحويل النص والاحتفاظ به فى الجدول كما فعلت فى هذا المرفق خاصة ان عملية البحث تدور فى محيط الايات فقط ولن تزيد مع الوقت

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

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

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

لاجل خاطركم تم اضافة وتعديل الالوان برمجيا دون فتح التصميم ان شاء الله تكون مبسوط 🌹😀

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