Dream_Works

أخي الكريم للأسف لم أجد الحقول التي تكلمت عنها في الملف لذلك ك تجربة . جربت نقل البيانات من حقل Status في النموذج الرئيسي إلى حقل Epression في النموذج الفرعي Me.reword.Controls("Epression") = Me.Status Me هو متغير يشير إلى النموذج الحالى ( الذي تم تشغيل الكود منه ) و اعتقد أنك ستضع الكود في حدث داخل النموذج الرئيسي reword هو اسم النموذج الفرعي الموجود داخل النموذج الرئيسي ... و هو يختلف عن الاسم المستقل للنموذج الفرعي الذي تجده في شاشة النماذج الرئيسية ... و لكنك وضعت الاسمين متشابهين في ملفك و هما ... اسم العنصر الذي يحتوي على للنموذج الفرعي داخل النموذج الرئيسي = الاسم المستقل للنموذج الفرعي Controls هي خاصية تشير إلى جميع العناصر ( مربعات نصوص , أزرار ... الخ ) الموجودة في النموذج ( و هو الفرعي حسب كلمة reword السابقة ) ("Epression") هو اسم العنصر الموجود في النموذج الفرعي و المراد نقل البيانات إليه أرجو أن يكون مفهوماً ... لأنني استفدت جداً من هذه المعلومات عندما عرفتها سابقاً ... و هي كيفية التحكم بجميع النماذج و التقارير و غيرها من داخل نموذج واحد

جرب ادخال سطر الكود التالي عند النقر ... أو عند الحدث الذي تعتبره مناسباً Me.recalc

يمكن عمل ذلك أرجو إرفاق قاعدة بياناتك لعمل اللازم

أرجو أن يفيدك الرابط التالي : ارتباط أكسس بالأوفيس وغيره من البرامج, المرجع لمواضيع الارتباط

أرجو أن يفيدك الرابط التالي: توصيل مشروع Access ‏(ADP) بقاعدة بيانات SQL, دروس متقدمه

جرب الملف المرفق ... تم مسح الكود القديم Private Sub Form_AfterDelConfirm(Status As Integer) If Status = Access.acDeleteOK Then Call Form_Activate End If End Sub تغيير الكود في الحدث Form Activate الموجود في النموذج LL إلى Public مناداة الكود السابق من نموذج Confirmation عند الضغط على زر نعم بالتوفيق ______________.zip

أرجو أن مسح الكود التالي من عندك Private Sub Form_Error(DataErr As Integer, Response As Integer) If DataErr = 3022 Then MsgBox "Policy Number is Duplicated" Response = 0 End If End Sub ووضع الكود التالي في الحدث BeforeUpdate لحقل رقم الشحنة (PI) INS.zip

احتمال يوجد لديك ماكرو Autoexe أرجو إرفاق قاعدة بياناتك لتحديد سبب المشكلة

تفضل أخوي شغال ______________.zip

أرجو أن تجد ما تريد في الرابط التالي ربط الأكسيس بالانترنت

أرجو تجربة هذا الحل في الحدث AfterDelConfirm للنموذج الرجاء وضع الكود التالي Private Sub Form_AfterDelConfirm(Status As Integer) If Status = Access.acDeleteOK Then Call Form_Activate End If End Sub

للأسف أخي الكريم أعتقد أنني لم أفهم طلبك بشكل جيد و لكني سأحاول كتابة رد وفقاً لفهمي المتواضع يمكنك كتابة الكود المطلوب في الحدث BeforeUpdate لعمل ذلك تقوم بعمل requery و تراجع على رقم السند .... بعدئذ يمكنك التراجع عن الحفظ باستخدام الأمر Me.undo

تفضل أخي الكريم لقد أرفقت ملفين للفلترة ... يمكنك الاختيار Filter.zip

تفضل أخي الكريم المثال المطلوب يمكنك رؤية الاستعلام No-Meeting و الكود الموجود في Module 1 في الملف

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

تفضل أخي الكريم لم أستكمل هذه النقطة . ... أرجو التأكد من باقي الطلبات INS.zip

يجب التعديل في الجدول الذي يحتوي حقل التكامل المرجعي ( كمفتاح رئيسي ) Primary Key يمكنك إرفاق قاعدة بياناتك لتحديد المشكلة بشكل دقيق

أرجو تجربة برنامج Users Maker 2 للأستاذ مهند عبادي Users Maker 2

أخي الكريم للأسف حالياً ليس لدي وقت للشرح المفصل ... فمن باب شيء أفضل من لاشيء يمكنك تغيير أبعاد الصوره بالكود أو يمكنك نسخها إلى Unbound Object Frame و التحكم في كيفية عرضها على النموذج الرجاء الضغط على هذه الجملة الموجودة في المشاركة السابقة

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

جر ب إزالة الأمر Me.requery من الكود

أخي الكريم يمكنك تحويل قيمة Null تلقائياُ إلى أي قيمة أخرى باستخدام الدالة Nz يمكنك وضعها في كل بمربع نص للتأكد من أن جميع القيم لا تحتوي قيم فارغة NZ ([FieldName] , Value If Null)

السلام عليكم بالنسبة لموضوع التفقيط .. الرجاء النظر في الرابط التالي تفقيط الأرقام بالنسبة للشهر الحالي بالعربي ... فقد كتبت كود بسيط مؤخراً لهذا الغرض ... يمكنك وضعه في داله أو أي مكان Dim MonthName as String MonthName = Choose(Month(Date), _ "يناير", _ "فبراير", _ "مارس", _ "أبريل", _ "مايو", _ "يونيو", _ "يوليو", _ "أغسطس", _ "سبتمبر", _ "أكتوبر", _ "نوفمبر", _ "ديسمبر")

أخي الكريم برنامج الأستاذ مهند عبادي قوي جداً و متعوب عليه بالفعل ... الله يعطيه العافيه و تسلم ايده على هالبرنامج المهم ... الأخ مهند عبادي وضع بيانات المستخدم الحالي في Public Variable موجود في الوحده النمطية Defs اسمه MyUser ... و نوعه CUser يمكنك استرجاع بيانات المستخدم الحالي بهذا الكود من أي نموذج في برنامجك MyUser.UserName

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