ابوخليل

ظننت العشوائية من خلال كود مصنوع الآن اتضح السؤال المعذرة اخوي احمد لانتظارك وتأخيرك حقيقة لا اعرف الحل

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

الكود شغال 100% و (yourText) يعني اسم حقل الايبان الذي عندك للمعلومية يمكنك دائما حفظ المثال علي اي اصدار 2003 او 2007 ... من : ملف / حفظ ونشر وهذا مثالك بعد التعديل Wz.rar

ما فيه شي اسمه يترحل ليوم ثاني ! 1- الحركة مستمرة في الفرع (وارد وصادر ) 2- طباعة التقرير يوميا 3- في نهاية الشهر يكون عندك 30 تقرير ( يعني كشف حساب ) 4- في نهاية الشهر يتم اصدار تقرير مجاميع حسب الصنف 5- عند الجرد يتم اخراج تقرير مجاميع حتى ساعته لالحاق بيانات الفروع الى الرئيس يفضل الالحاق يكون على هيئة مجاميع وليس تفاصيل يتم اعداد جدول كخلاصة في كل فرع ثم يرسل الى الرئيس هذه اخي رؤية مجردة والافضل ان تستشير من هم قائمين فعلا على مثل هذه النشاطات

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

اكتب الايعاز التالي : 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

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