غرّام العقول

وعليكم السلام ورحمة الله تفضل التعديل invoice-amountMsg.rar

على الرحب والسعة

هذا المثال بعد التعديل بدلاً من تكرار الكود لعشرات المرات , قمت بعمل إجراء يتم استدعاءه بعد تحديث مربعات النص ايداع الايرادات الحكومية_غرام .rar

استخدم في جمع الحسميات أسماء أخرى للمتغيرات مثلاً R2 , H2 , C2 بحيث يكون كود الحسميات هكذا: R2 = [حسم] + [حسم1] + [حسم2] + [حسم3] + [حسم4] + [حسم5] + [حسم6] H2 = ([هـ6] + [هـ1] + [هـ2] + [هتـ3] + [هـ4] + [هـ5] + [هـ]) / 100 C2 = R2 + H2 R2 = Int(C2) H2 = (C2 -…

كما أخبرتك إذا كان سعر موديل ما يعتمد على أكثر من جدول فأنت بين خيارين: إما أن تعمل جدول خاص وتسميه مثلاً تفاصيل الموديلات أو جدول الأسعار ويحتوي على كل التفاصيل المطلوبة من الجداول الثلاثة أو الأربعة مثل: حقل ترقيم تلقائي مفتاح أساسي , حقل الموديل من جدول الم…

وعليكم السلام ورحمة الله أهلاً بك يا إيهاب عندما أخبرك أستاذك عن الحقل متعدد القيم , فقد كان يقصد بذلك تكرر قيمة معينة في جدول ما لأكثر من مرة واحدة. وهذه القيمة ليست السعر أو العدد بل هي الحقل الأساسي أو الفرعي في الجدول مثل الموديل مثلاً فإذا كان الموديل فري…

هذا لأن طريقة العرض الافتراضية للنموذج هي "نماذج مستمرة" الحل: 1- إما وضع المؤشر في حقل الموظف صاحب المعاملة أو تحديد السجل الذي يحتوي على المعيار المراد. 2- أو تغيير طريقة العرض إلى "نموذج مفرد"

الله عليك يا أستاذ القحم .. هذه هي البلاغة في كتابة الكود البرمجي لذا سوف يكون الحل كما يلي: Private Sub Report_Load() FSH.Visible = Me.FSH LH.Visible = Me.LH Prolactin.Visible = Me.Prolactin End Sub أما إذا أردت الإسهاب وتجنب البلاغة الرائعة , فيمكنك أيضاً كت…

أخي malak157 لاحقة الملف هي accdb. وليست mdb. بمعنى أنه لاينفتح إلا بواسطة أوفيس 2007 وما فوق قم بحفظ الملف عن طريق حفظ باسم ثم اختر صيغة mdb.

لدي اوفيس 2003 ولم أستطع فتح قاعدة البيانات المرفقة في مثالك , لأنني أريد أن أرى أين تقوم بإدخال البيانات , هل في نموذج؟ وما هي القيمة الافتراضية لحقول الإدخال؟ وهل الخاصية "مرئي" معينة ألى "نعم" أم "لا"؟ وهل يستقي التقرير بياناته من جدول أم من استعلام؟ وأشياء…

اكتب ما يشبه الكود التالي في حدث "الحالي للنموذج الذي تريد قم باستبدال Txt1 باسم الكائن الذي تريد تأمينه , كرر السطر الثاني والرابع بعدد الكائنات الموجودة لديك If Me.NewRecord Then Me.Txt1.Locked = False Else Me.Txt1.Locked = True End If

بعد إذن أستاذي محمد فؤاد اكتب الكود التالي بدون أن تغير قيمة أي حقل Private Sub Report_Load() If Me.FSH.Text < = 0 OR Me.LH.Text < = 0 OR Me.Prolactin.Text < = 0 Then FSH.Visible = False تسمية19.Visible = False تسمية18.Visible = False End If End Sub

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

وعليكم السلام ورحمة الله 1- افتح النموذج في عرض التصميم. 2- من شريط الأدوات انقر زر خصائص النموذج , ومنه اختر بيانات. 3- غير قيمة الخاصية "إدخال بيانات" من "لا" إلى "نعم"

بالرغم من أنك لم تقم بإضافة الوحدة النمطية التي تحتوي على الدالة ()ReStr وهي الدالة التي لايعمل نموذج البحث بدونها, وبالرغم من أنني لا أعرف -بالضبط- كيف يكتسب مربع النص المسمى Ts قيمته, فإن الخلل المذكور في الموضوع أعلاه ستجده في هذه الأسطر: If Me.Ts = 2 Then …

وعليكم السلام ورحمة الله وبركاته تفضل التعديل invoice-amount1.rar

هذا بسبب أنك نقلت مربع النص المسمى Txt11 من تذييل التقرير إلى تذييل الصفحة. قم بإرجاعه إلى تذييل التقرير.

ضع قبله أمراً بتحديث بيانات النموذج , ليصبح هكذا Me.Refresh Forms![Editholltawed]![counter] = DCount("[id]", "WorkEndHolly", "([Dattewad] is NULL and [Pcdigit] =forms![Editholltawed].[PcDigit])")

وهذه طريق أخرى , أضعها لتعم الفائدة أيضاً قمت بتغيير اسم الجدول واسم الحقل -كما فعل أستاذنا أبو يوسف- لأنهما من الأسماء المحجوزة التي يجب عدم تسمية الكائنات بها انظر التقرير المرفق في المثال بعد التعديل russ1.rar

أخي الكريم قاعدة البيانات تقوم بتنظيم وخزن جميع البيانات التي يقوم المستخدم بإدخالها فيها, من هذا المنطلق فالمسؤول عن المخازن سيقوم بتسجيل ما يدخل إلى المخزن من مواد سواء كانت ألواحاً خشبية (مواد التصنيع الأولية) , أو كانت على شكل كراسي جاهزة بعد تصنيعها , وعل…