ابوخليل

اكتب الايعاز التالي : DoCmd.CancelEvent بدلا من : Cancel = True ولا تنسى تجعل الحدث قبل التحديث

الامر مقدور عليه ان شاء الله ولكن اجبني : على اي اساس هذه التجميعة ؟ اللبن مع الزبادي والفول مع العدس هل التجميع حسب الفئة : الالبان ، الحبوب ، البقول .... او انك كتبتها من غير قصد وتريد ان تجعل كل صنف لوحده

جزاك الله خيرا ياطالب العلم تعديل بسيط على الكود جرب لعله ينفع If Len(yourText)<> 24 Then MsgBox " رقم الآيبان المدخل لا يساوي 24 رقم ", vbExclamation, "إنتبه " Cancel = True end if والا كما ذكر لك ارفق المثال على صيغة mdb

قد اجبت في مشاركتي السابقة لا يتصور ادراج اسم ومعرف جديد في جدول الرواتب الا بعد تسجيله وتسجيل بياناته في جدول الموظفين بل يستحيل ذلك !! واذا كنت مصرا على رأيك فانظر هنا كود خاص بمنع التكرار وقد كتبته الساعة http://www.officena.net/ib/index.php?showtopic=62576#entry405609

تفضل اجعل الكود في حدث قبل تحديث حقل تاريخ الحجز Dim i As Integer i = DCount("ID", "data2", "ID =#" & [تاريخ الحجز ] & "#") If i > 0 Then MsgBox "التاريخ محجوز" Undo Exit Sub

تفضل هذا ما استطعت الوصول اليه 2015_up.rar

اخي امين تحية طيبة المعذرة لم استطع التشخيص واالوصول الى المشكلة

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

اخوي حسين ارفق مثالك واجعله على الصيغة mdb

بالنسبة للشق الاول ستكتب الكود هكذا : a=Abs(b-c) سيرجع القيمة موجبة حتى لوكانت النتيجة سالبة

نحن بانتظارك وفقك الله لكل خير

هل تريد اظهار جميع البنوك في التقرير ؟ ام بنك واحد حسب الاختيار من نموذج FrmTransfer_Trésorie ؟

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

انت لم توضح مكان الخطأ ؟ حدد ما تريد وبشرح وافي لعلنا نتمكن من مساعدتك

اعمل حقل غير منضم ولنفرض اسمه text1 اكتب هذا الكود في حدث التحميل Private Sub Form_Load() text1 = myName End Sub

خفض امان اكسس الى الحد الادنى

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

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

التكرار واساليبه قد قتل شرحا وتفصيلا في منتدانا العامر فقط قليلا من البحث وهذا واحد منها http://www.officena.net/ib/index.php?showtopic=62366

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

تفضل التعديل تم بنقل الكود خارج الخلية ووضعه داخل المحرر Database2.rar

اسم المستخدم ظاهر في الاعلى على الاطار الازرق

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

بعد اذن الاستاذ مصطفى تفضل : تم التطبيق على المثال المرفق mtm2.rar

هذه تخص امان اكسس قم بتخفيض امان اكسس الى الحد الادنى في الحاسوب الذي ستعمل عليه