ابوخليل

On Error GoTo ErrHandler Me.total = Nz(DLookup("total", "QryExtraMoney", "ID_R=" & [ID_R]), 0) Me.Massarif = Nz(DLookup("total2", "QryExtraMoney", "ID_R=" & [ID_R]), 0) ErrHandler: If Err.Number = 3075 Then Me.total = "" Me.Massarif = "" End If جمعية20.rar

ابن تقريرك على الجدول main

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

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

امامك اربع طرق للترقيم داخل الاستعلام myoutonum: (Select Count(1) FROM tbl1 A WHERE A.Code1 <=tbl1.Code1) ' sql myoutonum: DCount("ID";"tbl1";"ID <='" & [ID] & "'") ' نصي myoutonum: DCount("ID";"tbl1";"ID <=" & [ID]) ' رقمي myoutonum: DCount("ID";"tbl1";"ID <=#" & [ID] & "#") ' تاريخ

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

تفضل لاحظ انك مخير بالادخال في هذه الحقول الذي تدخل فيه البيانات هو الذي سيظهر معك في الجدول ملحوظة : عند اجراء تعديل على جدول اسبوعي سابق حتى لو تعديل حصة واحدة .. يجب ان تقوم بالحفظ ثم التحديث التحديث : هو عملية حذف للجدول بالكامل ثم اعادة الحاقه times23.rar

لم افهم !! كيف مثبتة ؟ لم اغير شيئا ... في النموذج حقول يتم تعبئتها وكل حقل مرتبط بعنصر تحكم في الجدول

1- جدول للمخازن 2- جدول للرفوف يشتمل على معرف للمخازن من اجل الربط 3- جدول الاصناف يشتمل على معرف للرفوف من اجل الربط

تفضل عمل احترافي لا يخطر على بالك .. تم ازالة جميع الاكواد في محرر الفيجوال طريقة العمل : 1- اختر الدرجة 2- ادخل بيانات جميع الحقول ( جميع الاسبوع ) 3- حفظ ثم انقر على زر تحديث وانظر النتيجة . times22.rar

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

ما رأيك بهذا مثال بسيط وجدته عندي ، علما اني لا استخدم هذا النهج في اعمالي ، وإنما استخدم طريقة قريبة من عمل الاخ بسام دخول.rar

جزيت خيرا يا استاذنا العزيز انا لم اغير في اكواد الأخ السائل وانما بعض الاضافات والتعديلات لاظهار اسم المستخدم في النموذج ، وتخصيص نموذج المستخدمين للمسؤول يمكننا تحويل الثغرة الى ثغر

بما انك مستجد على اكسس فانصحك باتباع الطرق الصحيحة عند كتابة العناصر وكافة الكائنات بحروف انجليزية حتى لو ان المعنى عربي من اجل يسهل عليك قراءة وفهم الاكواد ايضا من الاشياء الجميلة تمييز كائنات قاعدة البيانات عن بعضها بحيث انك حين ترى الاسم داخل الأكواد تعرف انه جدول او استعلام او نموذج او تقرير بحيث نكتب بادئة الاسم على النحو التالي : tbl للجداول qry للاستعلامات frm للنماذج reb للتقارير تم التعديل وعمل اللازم لا حظ انك لن تتمكن من فتح والدخول الى نموذج المستخدمين الا اذا دخلت باسم Bassam تجريب2.rar

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

اخوي طلبك غير منطقي .. واكرر غير منطقي لأن حقل C منفصل وليس له علاقة بالجدول فقط عناوين الاعمدة وحين نحرك سجلات النموذج يتم التحرك بمعلومية الــــ id فافضل حل لك والطريقة التي تطلع فيها على البيانات المدخلة هو ان تخصص العمود للادخال فقط وتعمل حقول اخرى للعرض وهذا ما صنعته لك في مثالك BASE_3.rar

Me.text31 = Nz(DSum("total", "conform_mdfo", "fatora=" & Me.fato)) sum2.rar

اكتب الرقم القومي ثم انتر

الرقم القومي يجب ان يكون نوع الحقل نصي فائدة : اي ارقام لا يتم اجراء عمليات حسابية عليها مثل الرقم القومي او ارقام العناوين او الهاتف الافضل يكون نوع الحقل نصي

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

انظر الى التعديل اتمنى يحقق حاجتك ............................. كلمة خارج النص : انا غير مقتنع بهذه الكمية من استعلامات الحذف والالحاق بصراحة وبدون زعل ولا تشيل بخاطرك مني ( آلية التنفيذ هذه) لا تسمى برمجة ، وانا على يقين ان استعلام (واحد للحذف) (وآخر للالحاق) يقومان بالمهمة لجميع الاجراءات ولو سلمنا بطريقتك انها صحيحة فلديك تكرار بالاجراءات بعدد الاستعلامات الموجودة ، ، فعند اختيار المادة يتم الحذف والإلحاق ثم عند اختيار المعلم يتم الحذف والإلحاق ايضا على السجل نفسه والمفترض ان عند اختيار المادة لا يحدث شيء ثم اذا اخترنا المعلم ينظر هل تم اختيار المادة ام لا ، ولا ينفذ الكود الا اذا تم اختيار المادة . BASE_2.rar

البحث يعمل 100% البحث على مستوى النموذج ... فالحقل يبحت في نموذج family

الكود هكذا افضل #If Win64 Then Private Declare PtrSafe Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As LongPtr, ByVal Flag As Long) As LongPtr #Else Private Declare Function ActivateKeyboardLayout Lib "user32.dll" (ByVal HKL As Long, Flag As Long) As Long #End If Public Const AR = 1025 Public Const EN = 1033 Public Function changeToAr() Call ActivateKeyboardLayout(AR, True) End Function Public Function changeToEn() Call ActivateKeyboardLayout(EN, True) End Function تغييير اللغة.mdb

تفضل جمعية18.rar

اي صورة ؟ هل تقصد صور المستفيدين ؟