أسف على تأخرى فى الرد
جزاك الله خيرا أستاذ يوسف لقد توصلت للحل الموضح بالصور - أعتذر عن عدم قدرتى على ارفاق ملف-
ولعل هذه الصور تفى بالغرض
يسعدنى سماع رأي حضرتك والأستاذ على أيضا
جزاك الله خيرا أستاذ يوسف ونفع الله بك أينما حللت
الشرح واضح جدا
لى طلب أخير اطلبه على استحياء
كنت أحاول تغير الزوم أثناء فتح التقرير أى التقرير مفتوح بالفعل ثم أفتح الفورم الذى أنشئته ووضعت به الدالة التى أفدتها من شرح أستاذ يوسف
فتعطينى رسالة خطأ
حاولت التعديل بالوحدة النمطية وأزلت منها أمر with docmd فلم يفلح اﻷمر كذلك وأعطانى رسالة خطأ أيضا مفادها أن المرجع معطل للخاصية zoomcontrol
أرجو توجيهى للتعديل الصحيح بدون أمثلة جاهزة ولا اريد ألاثقال على حضراتكم
جزاك الله خيرا أستاذ على عمل الكود بشكل جيد ولكن تمت الفائدة بما تفضل به اﻷستاذ يوسف
جزاك الله خيرا أستاذ يوسف جعله الله فى موازين حسناتكم والاستاذ على وسائر الاخوة فى المنتدى
أرجو من أستاذ يوسف لو سمح وقت حضرتك بشرح الكود بالوحدة النمطية لتعم الفائدة
وأكرر شكرى للجميع
جزاك الله خيرا أستاذ يوسف على الاهتمام
ولكن لم يعمل اختصار لوحة المفاتيح z معى
مع العلم أنى استخدم اصدار افس 2010
وكذلك الكود الذى تفضلت به اعطانى رسالة أن الأمر غير متاح اﻵن
فهل من حل آخر
علما أن البرنامج يعمل مع تصغير واجهة اﻷكسس
وعليكم السلام ورحمة الله وبركاته
فى حدث بعد التحديث فى حقل الوظيفة ضع هذا الكود
If (ضع الشرط الذى تريد) then
Me.detail.backcolor = vbred
End if
انتهى
تمنياتى بالتوفيق
يبدو أخى أنك وضعت كلمة السر بعد عملية الربط بين القاعدتين
أولا أزل الارتباط - ثم أنشئ كلمة السر - ثم قم بعمل الارتباط مجددا - ستلاحظ عند انشاء الارتباط سيطالبك اﻷكسس بادخال كلمة السر
أرجوا أن ينجح هذا معك قدجربته من قبل وعمل بنجاح معى
تمنياتى بالتوفيق
حاول أن تجعل تاريخ البداية حقل أيضا فى نفس النموذج formxxx
ثم اكتب الكود كما يلى:
>=forms!formxxx!datexxx1
And
<=forms!formxxx!datexxx2
جرب ووافنى بالنتيجة تمنياتى بالتوفيق
أخوتى واساتذتى الكرام السلام عليكم ورحمة الله وبركاته
أستخدمت جملة الاستعلام بطريقة openDynaset للاسعلام باسم العميل
ولدى فى جدول العملاء أسماء مكررة - عميل واحد له أكثر من حساب -
أستخدمت كود movenext للتنقل بين سجلات الاستعلام فلم يعرض سوى
سجلين فحسب هل من وسيلة للتنقل بين كافة سجلات الاستعلام
وجزاكم الله خيرا
السلام عليكم أخى
هل الفورم user3 بيكون مفتوح مع النموذج entry1_user فى وقت واحد أم لا؟
هل الفورم entry1_user مرتبط بجدول أم لا؟
وعموما:
لنقل بينات بين forms يجيب أن تكون كل الفورمات مفتوحة فى آن واحد فانه ليس من الممكن التحكم بفورم غير مفتوح
ثاتيا البينات تنمحى من الفورم عند اغلاق الفورم فلابد من ربط الفزرم بجدول لحفظ البيانات فيه
أرجو أن أكون وفقت لحل جزء من المشكلة تمنياتى بتوفيق
السلام عليكم ورحمة الله وبركاته
أما عن فتح النموذج بكامل الشاشة فضع هذا الكود فى حدث عند الفتح:
Docmd.maximize
أما عن تغير حجم العناصر على الفرم لتتناسب مع الحجم الجديد فبإمكانك صنع مديول لتضع فيه بعض المعادلات الرياضية البسيطة
التى تحتاج فيها لمعرفة الحجم الحالى لكل عنصر (العرض * الارتفاع) ووضعه الحالى على الفورم (اليسار والأعلى)
وتجعل هذا يزداد بنسبة زيادة الفرم لأبعاد الشاشة الحالية لديك وينقص كذلك
ثم تستدعى الموديل فى حدث عند تغير الحجم (resize).
أسف ليس لدى نموذج جاهز لارفقه
تمنياتى بالتوفيق
جزاك الله خيرا استاذى الفاضل
للخطأ الاملائى حدث فى كتابة الموضوع فقط وليس فى كود البرنامج فكما تعلم حضرتك أنه بعد وضع النقطة بعد docmd يكمل المحرر ماتبقى
فليست المشكلة خطأ املائيا والا كما تفضلت لارسل اابرنامج رسالة خطأ
شكرا لاهتمامكم
أرجو ان يكون قد اتضح الأمر
السلام عليكم ورحمة الله وبركاته
وضعت زر أمر على الفورم الرئيسى لتصغير البرنامج ولكن عند ضغط الزر لا يحدث شىء أرجو توضيح السبب
الكود هو:
Docmd.runcommend acCmdAppMinimize
وجزاكم الله خيرا
السلام عليكم ورحمة الله وبركاته
مرحبا بك فى مدرستنا أوفيسنا
مبدئيا أخى لا يمكن التحكم بفورم دون فتحه وكذلك اذا لم يكن الفورم مرتبط بجدول ستفقد البيانات عند غلق الفورم
ثانيا - رجاءا توضيح مطلوبك بدقة أكثر حتى يتسنا لاخوتك فى المنتدى المساعدة
ومرحبا بك مرة أخرى
أخى اعذرنى لتأخرى فى الرد
قمت بفتح ملف حضرتك
1- الفورم الثانى مرتبط بالفورم اﻷول بالفعل كل ما تحتاج اليه هو كود فتح الفورم الثانى عند حدث دبل كليك لمربع اسم المستأجر بالفورم الأول بلا عمل تصفية
2- الكود هو
Docmd.openform "استعلام حسابات المستأجرين"
أو من خلال اضافة ماكرو وهو اسهل
اعذرنى لعدم التطبيق على قاعدة حضرتك فانا عندى مشكلة فى رفع الملفات
تمنيتى بالتوفيق