ابوخليل

عليكم السلام =Nz(DLast("[رصيد نهائي]","[t1]"),0) test2.accdb

اخي الكريم .. نبارك لك التميز ومن باب اولى ان تكون مرفقاتك متميزة لا يوجد في مثالك حفظ ولا تعديل !!

اساس المشكلة هو انتقال التركيز عن تفصيل النموذج عندما تنقر على الأزرار حاولت اروض الأزرار بحيث يبقى التركيز داخل التفصيل ولم اتمكن .. يوجد خصيصة في الازرار يجب تعطيلها .. ولكني لم اهتد اليها لذا سرحت هذه الأزرار واستبدلتها بمربع تسمية ورتبت هذه التسميات بحيث تظهر مشابهة للازرار الآن اي مفتاح يمكنك ارساله الى تفصيل النموذج لاحظ ان التحرك يمينا ويسارا سيعمل بطريقتين وعليك ان تختار ما يناسبك Private Sub Command6_Click() SendKeys "{PGUP}" End Sub Private Sub Command7_Click() SendKeys "{PGDN}" End Sub Private Sub Command8_Click() SendKeys "{RIGHT}" 'SendKeys "+{tab}" 'وهذه ايضا تعمل End Sub Private Sub Command9_Click() 'SendKeys "{tab}" ' وهذه ايضا تعمل SendKeys "{LEFT}" End Sub التحرك داخل النموذج بالأزرار.accdb

ما شاء الله عليك .. مقاتل .. لم تيأس لك من اسمك نصيب ابشر .. الحل _ان شاء الله_ يسير فقط امهلني .. ارتب لك الحل ..

يبدوا انك لم تفهمني مع اعطائي للحلول انا معلم انبه واوجه تفضل استبدل الكود بهذا DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70 Child0.SetFocus DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70 DoCmd.SetWarnings True

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

يجب ان يكون هناك علاقة بين الجدولين .. رئيسي لفرعي ومن خصائص العلاقة تحدد : تتالي التحديث والحذف جرب المرفق الآن Test 2.accdb

جربي : Me.account.Undo

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

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

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

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

عليكم السلام ضع اسئلتك هنا ستحصل على حلول عديدة وسريعة ان شاء الله

مشاركة مع اخي وحبيبي الاستاذ خليفة على اعتبار الشهر 30 يوما Me.DateY = Me.Text1 \ 360 Me.DateM = (Me.Text1 Mod 360) \ 30 Me.DateD = Me.Text1 Mod 360 Mod 30 توزيع الايام الى تاريخ.rar

نعم تفضل Dim ctl As Control For Each ctl In Me.Child0.Controls If ctl.ControlType = 109 or ctl.ControlType = 111 Then ctl.Enabled = True End If Next ctl 109 مربعات النص 111 مربعات التحرير وهنا مرجع لأرقام عناصر النموذج بتفصيل اكثر Test.accdb

Forms!main!Child0!text0.Enabled = True Test.accdb

هذا الحل نموذجي ويحقق المطلوب 100% يجب ان تتأكد انا جربت الكود يعمل على احسن وجه اذا الايام 30 يجعلها صفر ويزيد 1 للشهور واذا كانت اقل يبقيها كما هي واليك التطبيق db1.accdb

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

اتبع التالي : 1- يتم ادخال يوزر المستخدم في كل سجل يتم ادخاله 2- اجعل مصدر بيانات النماذج والتقارير استعلامات تشتمل على معيار : يوزر المستخدم

لمن يستخدم برامج التحزيم لتنصيب البرنامج يكفي فقط تعيين اختصار مع ملفات البرنامج .. وبرنامج التحزيم يتكفل بالأمر

وجدتها يا شباب الخاصية هذه تتأكد فقط ( ويختفي الاطار كليا ) عندما نعمل اختصار لقاعدة البيانات سواء على سطح المكتب او غيره نفتح على خصائص الاختصار : لسان التبويب اختصار او shortCut ثم حقل تشغيل او run نغير الى تصغير النتيجة : الاطار يظهر فقط عند تشغيل قاعدة البيانات مباشرة

عليكم السلام لست بحاجة لمرفقات اجعل معيار البحث بين تاريخين يشبه هذا Between Nz([forms]![frmSearch]![txtStartDate],"01/01/1300") And Nz([forms]![frmSearch]![txtEndDate],"01/01/2100") ومعيار مربع التحرير يشبه هذا Like "*" & [forms]![frmSearch]![combo1] & "*"

السلام عليكم بعد ادراج دالة اخفاء اطارات اكسس في نموذج بدء التشغيل ، يتبقى ظهور واجهة اكسس ثانية واحدة لحظة التشغيل في الاصدار 2003 كنت اعالجها بوضع صورة BMP بجوار قاعدة البيانات تحمل اسم قاعدة البيانات نفسها في الاصدار 2010 لا تعمل الصورة عندي ، ويستمر ظهور الواجهة لثانية او اقل عند بدء التشغيل هل يوجد في ادوات اكسس خصيصة تمنع الظهور ام ان هناك اجراء آخر الشكر مقدما لمن يفيدني

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

ليس أمامك الا التجربة نعم غالبا تكون السبب ..