العبيدي رعد

حل رائع استاذ قاسم احسنتم استاذ خليفة جزاك الله خيرا

السلام عليكم البرنامج المرفق فيه جدول karz وفيه اسم المقترض nam وفيه حقلين daen , الذي هو حقل لتسديد الفرد من القرض وحقل maden وهو مبلغ القرض المستلم .... وقد يستلم الفرد اكثر من قرض المطلوب في حال كون مجموع التسديدات ( في حقل daen) اكثر من مجموع المبالغ المستلمة ( maden ) تظهر رسالة تنبية في نموذج kabz ان الفرد سدد جميع مابذمته لايمكن الترحيل والحدث في بعد التحديث لمبلغ التسديد تسديدات الافراد.rar

السلام عليكم لدي جدول في تنسيق التاريخ شورت ديت وكذلك في النموذج لكن احيانا وبالاشتباه يتم ادخال تاريخ مثلا 01/02/221 والصحيح هو 01/02/2021 اريد رسالة تنبيه بعدم قبول تاريخ خطأ

وعليكم السلام اخي تقدر من نفس مربع النص الذي عملته للبحث ... اخر الكود تضيف "" = me.text1 في حال اسم مربع النص text1

احسنتم استاذنا الفاضل وجزاكم الله خير الجزاء

بسم الله الرحمن الرحيم السلام عليكم أريد اخفاء كل حقل يكون الباقي في ذمة الفرد صفر او فارغ كما موضح في الصورة والمثال المرفق القروض 10.rar

عملت التعديل التالي ... لكن عندي فقط العلاقة بين جدول الموظفين وجدول karz حيث يجب ان تكون العلاقاة واحد الى متعدد لكون يمكن ان يكون لموظف واحد اكثر من قرض dbk.rar

ممكن لو سمحت تكوين العلاقات ؟ لأن عندي جدول person و gehat حقول تكست ورقم الموظف في جدول الموظف حقل رقمي

هناك جدول لمعلومات الموظف empi جدول اخر عام اسمه karz يدخل فيه معلومات استلام القرض ,,, تعزيز صندوق القروض ,,, تسديد قروض الموظفين جدول اخر باسماء الموظفين person جدول اخر باسماء محل عمل gehat جدول اخر بعنوان tab وهو يبين نوع الحركة كما موضح في كل جدول وهذه هي القاعدة بجداولها والعلاقات كل فرد قد يستلم اكثر من قرض وهو يسدد كل قرض هناك جهة عليا تقوم بتعزيز الصندوق اولا وقد تعزز ذلك مرة اخرى انا بحاجة الى نماذج ثلاث .... نموذج تعزيز الصندوق يكون فيه مبلغ دائن واسم الجهة ونوع الحركة نموذج ثالث صرف القرض وفيه حقل مدين واسم الموظف ومحل عمله وملاحظات وتاريخ استلام القرض واسماء الكفلاء ومعلوماتهم dbk.rar

السلام عليكم رمضان كريم اريد المباشرة بعمل قاعدة بيانات رصينة لغرض انشاء صندوق القرضة الحسنة الصندوق كالتالي : اولا يستلم تعزيز للصندوق من جهة تمويل ويرحل في حقل الدائن ثانيا توزيع مبلغ القرض حسب الاستحقاق للموظفين وتحت عنوان مدين dbk.rar

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

Private Sub com1_AfterUpdate() Tg = DLookup("[gehat]", "karz", "[nam]= 'com1'") End Sub عكلت هذا الكود لكنه لابجلب الجهة ما الخطأ؟

السلام عليكم رمضان كريم وكل عام وانتم بالف خير يارب لدي نموذج kabz اريد جلب جهة العمل من جدزل karz في حدث بعد التحديث لأسم الموظف في نموذج kabz data1.rar

بسم الله الرحمن الرحيم السلام عليكم لدي نموذج raseed يفتح تقرير qras وعملت فيه معادلة لجلب الرصيد قبل التاريخ من ولكن تحدث أخطاء ممكن تصحيح المعادلات علما البرنامج اوفيس 10 قروض 7.rar

كل شئ ممكن لكن عليك اعادة رسم قاعدة البيانات اولا ماذا تريد هل هو كفاتورة مبيعات ان كان كذلك فهناك الكثير الكثير من الامثلة المفيدة وطبق على فكرتك

اخي العزيز هذا النموذج يعرض لك مدخلات نوع المنتج فانت حين تختار اطفال يعرض لك كل ماتم ادخاله فهو يستقي معلوماته من استعلام

الشكر الجزيل لكم استاذ @Foksh لكن هناك أمر اسم المقترض يحفظ في جدول المقترضين في حال الغاء اضافة مبلغ القرض عند عدم وجود رصيد ماهي الطريقة لعدم الحفظ في جدول preson ولماذا يتم الحفظ فيه ؟

شكرا جزيلا تمت الاجابة

انا عملت جدول تعزيز لقاعدة البيانات وربطته مع جدول karz هل تقصد هكذا كما في البرنامج المرفق وعندي مشكلة اخرى عملت استعلام اسمه q-ras للترصيد لحركة الصندوق عملت حدث في فورم sarf في حقل tmaden بعد التحديث تظهر الرسالة رصيدك لايكفي لكنه يرحل ويظهر عندي الرصيد بالسالب قروض 4.rar

في بداية العمل وهو الاساس ادخال مبلغ التمويل اولا ولنقل هو رصيد اول المدة فعند ادخال اسم مالية عليا مثلا سوف يدخل الى جدول person والى جدول kabz قروض 4.rar

السلام عليكم اخوتي الافاضل المطلوب في فورم taazez هو ادخال اسم معين واحد فقط وانا اسميته مالية عليا على الفرض فما الاشكال ياترى ممكن التوضيح انا غايتي التعلم

استاذي نفرغه حتى من جدول person اهتديت لحل في بداية الادخال بقاعدة البينات عندما تصفر نهائيا وه و في حال عدم وجود الاسم يتم يحفظه واضافته كما في الكود ادناه Private Sub t2_NotInList(NewData As String, Response As Integer) If (MsgBox("الإسم غير موجود " & vbCrLf & "هل تريد اضافته", vbInformation + vbMsgBoxRight + vbYesNo, "النظام") = vbYes) Then DoCmd.SetWarnings False DoCmd.RunSQL "INSERT INTO person( nam ) Values('" & Me.t2.Text & "');" DoCmd.SetWarnings True Response = acDataErrAdded Else Response = acDataErrContinue Me.t2.Undo End If End Sub

شكرا جزيلا استاذ خليفة لاحظ في حال افراغ كل البيانات الان وابدا بفورم taazez فهو اول عملية نبدأ بها وهي تعزيز الصندوق فهو لايرحل ؟ ممكن ارشادنا للسبب

السلام عليكم عندي ثلاث نماذج ترحل بياناتها الى جدول واحد وهو جدول karz النماذج هي التعزيز لتمويل صندوق القروض taazez kabz يختص بتسديدات الموظفين من القرض الذي بذمتهم sarf وهو لصرف مبلغ القرض للموظف برجاء ملاحظة كودات الترحيل علما جربت في فورمي kabz و sarf ترحل الى الجدول فقط فورم taazez وهو في حال غلقه تخرج رسالة اذا امكن معالجتها قروض 3.rar

مشكلة q1 حليتها حيث كان من المفروض ان يكون حقل daen القيمة الافتراضية 0 يبقى تكست ts في النموذج sarf لايتجدد المتبقي الا في حال الخروج من النموذج