محمد طاهر

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

يمكنك استخدم الدالة dcount و لا يشترط أن يكون للجدول علاقة بالفورم بل يمكن عد سجلات أي جدول و يمكن وضع شروط علي العد Me.SumFieldname = Dcount("[FieldName]", "TableName") و في حالة و ضع شرط علي الجمع ============================= Me.SumFieldname = Dcount("[Fiel…

و للتصدير استبدل acImport ب acExport

الاستيراد On Error GoTo MYIMPORT_Err 'لاستيراد جدول بالبيانات DoCmd.TransferDatabase acImport, "Microsoft Access", "C:MM.MDB", acTable, "M", "MM", False 'لاستيراد جدول بدون البيانات DoCmd.TransferDatabase acImport, "Microsoft Access", "C:MM.MDB", acTable, "M",…

شكرا للأخ محسن علي المساعدة فى تذكير الاخوة بقواعد طرح الاسئلة المتفق عليها أخ سعودي نشكرك علي المثال و اوصي بالغاء السطر الاول لأن معناه تجاهل أي اخطاء قد تحدث اثناء تنفيذ الكود و اوصي ايضاباضافة رسالة فى حالة كلمة السر الخطأ If InputBox("أدخل الكلمة السرية :…

*فورم* حفظ اضافة تحرير بنموذج واحد بدون DAO و لا SQL http://www.arabteam2000.com/vb/showthread....&threadid=13229 *فورم* كيف اجعل نموذج يحسب اجمالى عدد السجلات http://www.arabteam2000.com/vb/showthread....=&threadid=8347 *فورم* الحصول علي عدد السجلات في نموذج …

ادوات خيارات ورقة البيانات الخط الافتراضي tools options datasheet deafult font

اذا طان المقصود أكثر من قاعدة فالحالة مثل حالة الوورد تماما بشرط الا تكون الفورم الفعالة ففففى البرنامج مفعل لها خاصية modal أو Popup و أعتقد أن ترجمة الاولي مشروط و الثانية هي منبثق اما داخل نفس البرنامج فيمكن التنقل بين الفورم المفتوحة بشرط عدم تفعيل الخاصيت…

الحل الاسهل باستخدام docmd.movesize DoCmd.MoveSize 50,70,11500, 7500 فيكون بذلك الطرف الايسر العلوي علي مسافة 50 من اليسار 70 من أعلي و عرض الفورم 11500 و ارتفاعها 7500 و أفضل استخدام الحل الاتي مع اختيار خاصية autocenter للفورم DoCmd.MoveSize ,,11500, 7500 و …

علي حد علمي لا بد من تنفيذ الحل السابق ، حيث أنه للتعديل فى قيمة مربع نص و الاحتفاظ بقيمته لابد أن يكون مصدره حقل و أيضا لا يمكن التعديل فى حقل محسوب فى استعلام ( علي حد ما أعرف ) و الحل هو حقل جديد يتم تحديثه عن طريق الكود و مصدره جقل و الله أعلم

الموضوع طرح كثيرا سابقا وطرح له أكثر من حل بالكود و لكن أعتقد أن لكل مقام مقال فبتحديد الحالة المطلوب ترقيمها يمكن مناقشة الموضوع بتحديد أكثر فكثير من الحالات يفي فيها احد الحلين الآتيين بالغرض 1 - الترقيم التلقائي 2- استخدام الدالة dmax لاضافة 1 الي آخر رقم F…

اجعل حقل المجموع مصدره حقل فى جدول و اجعل تحديث قيمته بالكود فى حدث بعد التحديث لكل من الكمية و السعر ضع الكود التالي me.mysum = me.qty * me.rate حيث qty هو اسم مربع نص الكمية و rate الفئة mysum المجموع و بعد التحديث للقيمة أو الفئة يحسب حاصل الضرب تلقائيا فى …

فهمت من أنك تريد اظهارهم فى فورم واحد أن هناك حقول قى فى الجداول الثلاثة تخص نفس السجل ، اذا هناك علاقة رجاء التوضيح

السؤال غير واضح لي هل القيمة المحسوبة تخزن فى حقل أم محسوبة فقط فاذا كانت محسوبة فقط فلماذا تريد تغيييرها

افتح الفورم و أغلقها بالكود قبل فتح التقرير وان لم يكن فانشر المثال

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

دروس فى الاكسس الموسوعة العربية http://www.c4arab.com/showasection.php?lssid=25 دروس فى الاكسس منتديات الرحيل الدرس الاول http://www.alraheel.com/vb/showthread.php?...=&threadid=2275 الدرس الثاني http://www.alraheel.com/vb/showthread.php?...=3681#post11348 الث…

بالنسبة للمشكلة فقد وضع اخونا الهاجري الحل ثانيا : مرحبا بك فى المنتدي و كالعادة ألفت نظرك الي قواعد طرح الاسئلة المثبتة اعلا المنتدي ، و منها عدم توجيه السؤال الي شخص و مرحبا بك ثانية (f) (f) (f)

اجعل مصدر بيانات ال text box حقل فى جدول

لنفرض أن مربع النص اسمه text5 لاظهار القيمة الموجودة فيه في رسالة بالنقر المذدوج عليه Private Sub Text5_DblClick(Cancel As Integer) Dim m As String m = Trim(Me.Text5.Text) MsgBox m, 64, "test" End Sub و لفوائد حول مربع النص *كود* : توضيحات وفوائد في رسالة Msgb…