Login User لا يعمل الكود في حال الجدول مرتبط

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

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

1. اولا قم بعمل نسخة اضافية لقاعدة البيانات الحالية الى اي مكان في جهاز الكمبيوتر

2. القاعدة التي بها النموذج قم بحذف الجدول منها

2. القاعدة الثانية التي بها الجدول قم بحذف النموذج منها

الآن لديك قاعدتين الأولى بها نموذج فقط والثانية بها جدول فقط

3. انتقل الى القاعدة التي بها النموذج وقم بعملية ربط الجدول من القاعدة الثانية

الآن اصبح لديك جدول مرتبط بقاعدة النموذج

4. في النموذج ضع هذه الوظيفة

Public Function OpenForSeek(TableName As String) As Recordset
Set OpenForSeek = DBEngine.Workspaces(0).OpenDatabase (Mid(CurrentDb().TableDefs(TableName).Connect, 11), False, False, "").OpenRecordset(TableName,dbOpenTable)
End Function

هذه الوظيفه مهمتها الإتصال اولا بقاعدة البيانات الثانية ثم فتح الجدول لتنفيذ اي مهمه تريدها

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

Private Sub btnOk_Click()
    'Dim dbUser As Database .............................................................................تم ايقافه
    Dim rsUser As Recordset
    Dim cpass As String

    'Set dbUser = DBEngine.Workspaces(0).Databases(0) ......................... تم ايقافه
    Set rsUser = OpenForSeek("tblUser") 'تم اضافة الوظيفة........................................هنا'
    With rsUser
        .Index = "PrimaryKey"
        .Seek "=", cmbUser

        If Not rsUser.NoMatch Then
            If !bIsActive = -1 Then
                txtPassword.SetFocus
                cpass = !strPassword
                If txtPassword = cpass Then
                  MsgBox " Password OK "
                Else
                    intCounter = intCounter + 1
                    If intCounter > 3 Then
                        .Edit
                        !bIsActive = 0
                        .Update
                    End If
                    MsgBox " Please make sure your password الرجاء التأكد من كلمة السر "
                    txtPassword.SetFocus
                End If
            Else
                MsgBox " User Name does not exist or was suspended by the administrator اسم المستخدم غير موجود او تم ايقافه الرجاء راجع المسئول  "
                cmbUser.SetFocus
                Exit Sub
            End If
        End If
    End With
End Sub

ملاحظة : قم بوضع قاعدة الجداول في مجلد جديد اسمه DbTable على محرك الأقراص D

قم الآن بإعادة ربط الجدول من جديد حسب المكان الذي ستضع به قواعد البيانات

User Login.rar

بالتوفيق

السلام عليكم ورحمة الله وبركاته

استاذة المنتدى ام عهود

ماشاء الله تبارك الله، طاقة متجددة في المنتدى

نعم لقد تم حل المشكلة ولكنها شوية معقدة.

هل بالامكان استبدال الاكوااد كي تعمل في جميع الحالات سواء في قاعدة البيانات الحالية او في قاعدة بيانات جداولها مرتبطة.

مع كل التقدير وجزيل الشكل

تحياااااتي

اخي الفاضل

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

1. نقوم بأخذ الكود كاملا ونضعه في وظيفة مستقله ونعطيها مثلا اسم zaTlink اشارة الى ان هذه الوظيفة خاصة للجداول المرتبطه

2. نقوم بنفس العمل ونضع الكود الخاص بفتح الجداول الداخلية الموجوده في قاعدة البيانات الحالية في وظيفة مستقله ونضع لها اسم مثلا zaTDefault اشارة الى ان هذه الوظيفة خاصة لجداول القاعدة الحالية

3. نقوم بإضافة اختيار لنحدد منه ماذا نريد ان نفتح ( الخيار الأول للجداول الحالية الموجوده في قاعدة البيانات ) و ( الخيار الثاني للجداول المرتبطه )

4. نقوم الآن بإستدعاء الوظيفتين كل حسب الخيار المطلوب لفتح الجداول

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

za-User Login-UP.rar

بالتوفيق

السلام عليكم

استاذتي الفاضلة ام عهود

يبدو انه قد حدث التباس في السؤال او لم احسن طرح سؤالي بشكل واضح

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

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

المطلوب: ان يكون كود واحد يعمل على قاعدة البيانات، سواء كانت قاعدة البيانات رئيسية (الجدول الرئيسي) ام قاعدة بيانات على جهاز آخر ويكون فيها الجدول مرتبط.

جزاك الله خيرا

تحياااااتي

حسنا اخي الكريم

لا يوجد اي مشكله

الآن بعد فتح المجلد ستجد قاعدتين :

الأولى وهي الرئيسية User LoginFront.accdb وتوضع في الجهاز الرئيسي

والثانية هي الفرعيه User LoginBack.accdb وتوضع في جميع الأجهزه المرتبطه بالجهاز الرئيسي

الآن قم بوضع قاعدة البيانات User LoginFront.accdb في الجهاز الرئيسي بدون ان تغير فيها اي شي ثم قم بفتحها واعمل التجربه وبكل تأكيد ستكون مثل هذه تماما

الآن خذ القاعدة الثانية User LoginBack.accdb وضعها في جميع الأجهزة مع اعادة ربط الجدول بالقاعدة الرئيسية User LoginFront.accdb ثم قم بفتحها وحتما ستكون بهذا الشكل

وهذه هي الطريقة الصحيحة لعملية الربط سواء في قاعدة البيانات الرئيسية او الفرعيه

User Login.rar

بالتوفيق

الشكر الجزيل لأستاذة المنتدى ام عهود

بارك الله جهودك ووفقك لما يحب ويرضى

تقديري وتحيااااتي

بسم الله الرحمن الرحيم

الأخت زهرة المحترمة

أثابك الله خير الثواب على كل مجهود وكل معلومة نتعلمها منك

فعلاً أنت خير مثال للأمة المسلمة التي لا تبخل على إخوانها وأخواتها بالعلم

أدعو لك الله بظهر الغيب أن يزيدك علماً وأن يجعل ثوابك الفردوس الأعلى مع حبيبنا ومعلمنا محمد صلى الله عليه وعلى آله وصحبه وسلم

لدي سؤال إذا تفضلتي أن تجيبينب عليه وهو :

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

ملحوظة : 1- طبعا عندي نسخة من البرنامج مازالت بالاكسس.

2- البرنامج بأكسس 2003

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

2- أن يكون هناك نسخه موجودة على السيرفر حيث يتم تخزين كل البيانات عليها ونسخه لكل مستخدم للنماذج فقط.

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

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

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

اخي الكريم : ياسر

السلام عليكم ورحمة الله وبركاته

بارك الله بك وجزاك الله خير الجزاء ورزقك الله الفردوس الأعلى من الجنه

اطلع على هذه المشاركات واذا واجهت صعوبه في اي امر فنحن في الخدمه

مشاركة قواعد البيانات اكسيس على الشبكة

/index.php?showtopic=78439

آكسس على الشبكة مع الصلاحيات للمستخدمين

/index.php?showtopic=66225

ملاحظة : قبل تحزيم قاعدة البيانات فيفضل تقسيمها الى قسمين

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

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

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

بالتوفيق

اللهم يا مالك الملك يا حي يا قيوم أسألك بكل إسم هو لك علمته أحداً من خلقك أو إحتفظت به لنفسك

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

الأخت العزيزة إن شاء الله سوف أقرأ المشاركتين وأحفظهما عن ظهر قلب وسوف أجربهم على برنامجي وسوف أوافيكي بالنتيجة إن شاء الله

أختي في الله زهره

السلام عليكم ورحمة الله وبركاته

أولا الموضوعين شيقين جدا جدا وقرأتهما وفصفصتهما

وقمت بتجربة الفكرة ولله الحمد والمنه والفضل اشتغلت كويس طبعا لان انا عندي برنامج vmware ومثبت عليه جهازين xp client وجهاز server 2003 جربت عليهم البرنامج بعد تقسيمه وضعت النسخة التي بها الجداول فقط بعد تحزيمها وتسطيبها على الجهاز السيرفر.

وقمت بتسطيب نسخه من البرنامج التي بها النماذج والاستعلامات والتقارير والجداول المرتبطة بعد التحزيم على الجهازين للمستخدمين .

قابلتني مشكلة واحدة ولا أجد لها حل وهي :

أنني أقوم باعادة ارتباط الجداول بين أجهزة المستخدمين وجهاز السرفر ( كل جهاز مستخدم أقوم باعادة الارتباط حتى تتعرف القاعدة على مكان الجداول على السرفر )

المطلوب:

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

ولك كل الشكر والتقدير

اخي الفاضل : ياسر

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

في الوحدة النمطية ستجد وظيفتين

الأولى هي : RelinkByTableDefs

اذا كانت قاعدة الجداول موجوده على الجهاز المحلي فإننا نستخدم الوظيفة الأولى

الثانية هي : RelinkByCustomList

اذا كانت قاعدة الجداول على السيرفر فإننا نستخدم الوظيفة الثانية

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

الآن كل ما عليك هو اخذ هذه القاعدة التي ستوضع على كل الأجهزه ومن ثم تقوم بتغيير مسمى قاعدة الجداول التي في الوظيفة الى اسم قاعدة الجداول لديك يعني الموضوع بسيط وسهل ولن تحتاج الى اي جهد فقط تغيير مسمى القاعدة التي سوف ترتبط بها ولهذا قم بعمل التالي :

1. استورد جميع كائنات القاعدة PubsLiteFE.mdb الى القواعد التي على الأجهزة

2. قم بتغيير مسمى قاعدة الجداول التي في الوحدة النمطية لما هو موجود لديك على السيرفر

3. قم بحذف الجداول المرتبطة في هذه القاعدة ( انتبه هناك جدول tblLinkedTables غير مرتبط لا تقوم بحذفه لأنه يحدد المسار اذا كان الربط محلي او على السيرفر ) لأنها تخص القواعد الثلاث التي بها الجداول في المجلد Data المرفق مع القاعدة

4. الأن قم بفتح النموذج frmLinkedTables وسوف يقوم بالبحث عن قاعدة الجداول في السيرفر وسيتم الربط بها مباشرة وظهور رسالة نجاح الربط وايضا يحدد لك كم عدد الجداول التي تم الربط بها . بهذه الطريقة

وهذا مثال للتطبيق عليه

RelinkTables.rar

بالتوفيق

الحمد لله الذي علمنا ما لم نعلم

السلام عليكم ورحمة الله وبركاته

أولاً أحب أن أشكر حضرتك شكرا جزيلا لما تقدميه من عون للغلابه أمثالي

ثانيا سوف اقوم بالتجربة وإن شاء الله سوف أوافيكي بالنتيجه

ومعلش أرجو أن تتحمليني قليلا لو قف معي أي شيء

بارك الله فيكي وفي أسرتك ورفع قدرك في الدنيا والآخرة

قمت بعمل نفس الخطوات وظهرت لي هذه الصورة

اخي الفاضل : ياسر

لم تقم بعمل الخطوات كما شرحتها لك

فكما هو واضح من الصوره انه لا زال هناك جداول موجوده في القاعدة داتا على الجهاز المحلي

انظر الجداول المرتبطة التي تحت الرساله وهذا يعني انك لم تتبع الشرح

لقد ابلغتك ان تقوم بتغيير اسم قواعد البيانات الثلاث الموجوده في الوحدة النمطية لما هو لديك على السيرفر

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

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

عليك بتصحيح مسار الجداول واعادة الربط . يجب ان تظهر جداول انت فقط وليس الجداول التي وضعتها لك في المثال .

بالتوفيق

أختي الكريمة زهره

والله يأست من غبائي لكن الحمد لله على كل شيء سوف أشرح لكي ما قمت به بالضبط :

أولاً قسمت البرنامج إلى قاعدتين :

الاولى : قاعدة للجداول فقط - وهي التي ستوضع على جهاز الخادم server - اسمها HR System_be.mdb ووضعتها في مجلد سميته (HR System Tables(server

الثانية : قاعدة للنماذج والتقارير والاستعلامات والوحدات النمطية والماكرو والجداول مرتبطة - وهي التي سوف تثبت على أجهزة المستخدمين client - اسمها HR System.mdb ووضعتها في مجلد سميته (HR System (clients

ثانياً قمت باستيراد الجدول tblLinkedTables من المثال ووضعته في القاعدة الخاصة بالمستخدمين التي تحتوي على الجداول المرتبطة. وقمت باستيراد الوحدة النمطية basRelinkTables أيضاً من المثال إلى القاعدة الخاصة بالمستخدمين . وقمت باستيراد النموذج frmLinkedTables من المثال إلى القاعدة الخاصة بالمستخدمين.

ثالثاً فتحت النموذج frmLinkedTables من على قاعدة HR System.mdb - الخاصة بالمستخدمين - وقمت بالتعديل عليها باستبدال اسم القاعدة ( PubsDataB.mdb ) باسم القاعدة الخاصة بالمستخدمين (HR System.mdb) كما يلي :

رابعاً فتحت الوحدة النمطية basRelinkTables من على قاعدة HR System.mdb - الخاصة بالمستخدمين - وقمت بالتعديل عليها باستبدال اسم القاعدة ( PubsDataB.mdb ) باسم القاعدة الخاصة بالمستخدمين (HR System.mdb) كما يلي :

هذا هو كل ما فعلته

لو مافيهاش غلاسه ممكن تعدليلي على الأكواد لو التعديل ناقص

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

اخي الفاضل : ياسر

هل تفوت عليك مثل هذه التعديلات البسيطة

بالتوفيق

جزاك الله خيرا أختي زهرة

لكن كل المحاولات باءت بالفشل

هاغلبك معايا معلش

انا رفعت البرنامج على أجزاء لو أمكن تعمليلي التعديلات ويبقى جزاكي الله خيرا

في شاشة المستخدمين :

المسئول admin = hr systemadmin

مستخدم لا يستطيع التعديل ولا الاضافة view=123

مستخدم يستطيع التعديل والاضافة edit=123

http://www.4shared.com/file/6ErXlnhe/HR_Systempart01.html

http://www.4shared.com/file/zk4DZwcE/HR_Systempart02.html

http://www.4shared.com/file/yNWI4Kt_/HR_Systempart03.html

للرفع

الملف بعد التعديل

HR System.rar

بالتوفيق

السلام عليكم ورحمة الله وبركاته

أختي الكريمة زهره

أولاً في هذا اليوم العظيم الكريم يوم عاشوراء أدعو الله لكي ولأسرتك ولكل أعضاء المنتدى والقائمين عليه أن يوفقهم الله لما يحب ويرضى وأن يفتح عليهم بركات السماء وأن يطيل أعمارهم في طاعته وأن يمن عليهم بفضله ورحمته

ثانياً لن أطيل عليكي فعلاً هذا هو ما كان مطلوب ولكن إذا تم تغيير مكان قاعدة الجداول لا يتم الربط

مثلاً أنا سوف أضع قاعدة الجداول على الجهاز السرفر فلن يتم الربط بين القاعدتين ما الحل في هذه الحالة ؟

للرفع

alexandrien كتب:

السلام عليكم ورحمة الله وبركاته

أختي الكريمة زهره

أولاً في هذا اليوم العظيم الكريم يوم عاشوراء أدعو الله لكي ولأسرتك ولكل أعضاء المنتدى والقائمين عليه أن يوفقهم الله لما يحب ويرضى وأن يفتح عليهم بركات السماء وأن يطيل أعمارهم في طاعته وأن يمن عليهم بفضله ورحمته

ثانياً لن أطيل عليكي فعلاً هذا هو ما كان مطلوب ولكن إذا تم تغيير مكان قاعدة الجداول لا يتم الربط

مثلاً أنا سوف أضع قاعدة الجداول على الجهاز السرفر فلن يتم الربط بين القاعدتين ما الحل في هذه الحالة ؟

اخي الفاضل ياسر

اتبع الطريقة التالية

1. انسى في هذه اللحظة البرنامج الخاص بالربط

2. خذ مجلد HR_System_Tables الذي به قاعدة الجداول وضعه في السيرفر واعمل له مشاركه وحدد له كل الصلاحيات

3. اذهب الى اي جهاز من اجهزة المستخدمين وضع به القاعدة التي بها النماذج

4. افتح قاعدة البيانات وقم بعملية الربط اليدوي بين هذه القاعدة والقاعدة التي على السيرفر التي بها الجداول

5. بعد اتمام عملية الربط للجداول حرك مؤشر الماوس الى احد الجداول المرتبطة ليظهر لك المسار كاملا

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

مثال : المسار كاملا بالقاعدة سيكون

C:\HR System\HR_System_Tables\HR_System_be.mdb

بعد استبعاد قاعدة البيانات منه سيكون

C:\HR System\HR_System_Tables\

7. خذ المسار بعد استبعاد قاعدة البيانات منه وضعه في كود النموذج وكود الوحدة النمطية و طبعا قاعدة بيانات الجداول HR_System_be.mdb موجوده اصلا في كود النموذج وكود الوحدة النمطية

8. قم الآن بفتح نموذج الربط الخاص بربط الجداول ليتم تخزين المسار الجديد في جدول الربط tblLinkedTables

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

بالتوفيق

الأخت الكريمة زهرة

والله لساني يعجز عن شكرك وصبرك معي وإنه لمن فائض كرمك أن تتحمليني طيلة هذه الأيام

وإنه والله لوسام على صدري أنني من تلاميذك

كما أدعو الله الله لك بظهر الغيب أن يبارك لك في أسرتك وأن يتقبل صالح أعمالك وأن يتجاوز عن سيئاتك

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

قال رسول الله صلى الله عليه وسلم: " من أغاث ملهوفاً كتب الله له ثلاثاً وسبعين حسنة: واحدة منها يصلح بها آخرته ودنياه والباقي في الدرجات"

قال رسول الله صلى الله عليه وسلم: " إن لله خلقاً خلقهم لقضاء حوائج الناس، آلى على نفسه أن لا يعذبهم بالنار، فإذا كان يوم القيامة وضعت لهم منابر من نور يحدثون الله تعالى والناس في الحساب "

قال رسول الله صلى الله عليه وسلم: " من سعى لأخيه المسلم في حاجة، فقضيت له أو لم تقض غفر الله له ما تقدم من ذنبه وما تأخر، وكتب له براءتان براءة من النار وبراءة من النفاق.

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

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

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

عَنْ أَبِي هُرَيْرَةَ قَالَ : قَالَ رَسُولُ اللَّهِ صَلَّى اللَّهُ عَلَيْهِ وَسَلَّمَ : ((مَنْ نَفَّسَ عَنْ مُؤْمِنٍ كُرْبَةً مِنْ كُرَبِ الدُّنْيَا نَفَّسَ اللَّهُ عَنْهُ كُرْبَةً مِنْ كُرَبِ يَوْمِ الْقِيَامَةِ وَمَنْ يَسَّرَ عَلَى مُعْسِرٍ يَسَّرَ اللَّهُ عَلَيْهِ فِي الدُّنْيَا وَالْآخِرَةِ وَمَنْ سَتَرَ مُسْلِمًا سَتَرَهُ اللَّهُ فِي الدُّنْيَا وَالْآخِرَةِ وَاللَّهُ فِي عَوْنِ الْعَبْدِ مَا كَانَ الْعَبْدُ فِي عَوْنِ أَخِيهِ وَمَنْ سَلَكَ طَرِيقًا يَلْتَمِسُ فِيهِ عِلْمًا سَهَّلَ اللَّهُ لَهُ بِهِ طَرِيقًا إِلَى الْجَنَّةِ وَمَا اجْتَمَعَ قَوْمٌ فِي بَيْتٍ مِنْ بُيُوتِ اللَّهِ يَتْلُونَ كِتَابَ اللَّهِ وَيَتَدَارَسُونَهُ بَيْنَهُمْ إِلَّا نَزَلَتْ عَلَيْهِمْ السَّكِينَةُ وَغَشِيَتْهُمْ الرَّحْمَةُ وَحَفَّتْهُمْ الْمَلَائِكَةُ وَذَكَرَهُمْ اللَّهُ فِيمَنْ عِنْدَهُ وَمَنْ بَطَّأَ بِهِ عَمَلُهُ لَمْ يُسْرِعْ بِهِ نَسَبُهُ)) .

وعن أنس رضي الله عنه أن النبي صلى الله عليه وسلم قال:" الخلق كلهم عيال الله، فأحب خلقه إليه أنفعهم لعياله " رواه البزار والطبراني في معجمه، ومعنى عيال الله فقراء الله تعالى، والخلق كلهم فقراء الله تعالى، وهو يعولهم.

و إن الساعي لقضاء الحوائج موعود بالإعانة مؤيد بالتوفيق؛ يقول النبي صلى الله عليه وسلم: "من يسر على معسر يسر الله عليه في الدنيا والآخرة"، ويقول عليه الصلاة والسلام: "صنائع المعروف تقي مصارع السوء والآفات والهلكات، وأهل المعروف في الدنيا هم أهل المعروف في الآخرة"

ففي الصحيحين عن عَبْدَ اللَّهِ بْنَ عُمَرَ رَضِيَ اللَّهُ عَنْهُمَا أَنَّ رَسُولَ اللَّهِ صَلَّى اللَّهُ عَلَيْهِ وَسَلَّمَ قَالَ: ((الْمُسْلِمُ أَخُو الْمُسْلِمِ لَا يَظْلِمُهُ وَلَا يُسْلِمُهُ وَمَنْ كَانَ فِي حَاجَةِ أَخِيهِ كَانَ اللَّهُ فِي حَاجَتِهِ وَمَنْ فَرَّجَ عَنْ مُسْلِمٍ كُرْبَةً فَرَّجَ اللَّهُ عَنْهُ كُرْبَةً مِنْ كُرُبَاتِ يَوْمِ الْقِيَامَةِ وَمَنْ سَتَرَ مُسْلِمًا سَتَرَهُ اللَّهُ يَوْمَ الْقِيَامَةِ)

الشكر الأعظم الأجل لله رب العالمين الذي وفقني وهداني لهذا المنتدى الكبير والذي تشرف بوجودك به ثم الشكر لكي ولكل الأخوة والأخوات في هذا المنتدى

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

كما أرغب في نصائحك لي وهدايتي للطريق الصحيح في تصميم البرامج حيث أنني مغرم بقواعد البيانات وأجدني أحول أي فكرة لقاعدة بيانات

والسلام عليكم ورحمة الله وبركاته

أخوك المخلص ياسر alexandrien

السلام عليكم ورحمة الله وبركاته

الاستاذه زهره

هل يمكن ربط جداول اكسيل مع قاعدة البيانات بنفس الطريقة؟

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

والنتيجه تظهر لي رساله بانه لم يتم التعرف على تنسيق قاعدة البيانات .