Hamdi Edlbi-khalf

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

جزاك الله كل خير و فضلك على رأسي و الشكر ألف شكر لكم لقد تم الأمر بحمد لله بالنسبة للطلب الأول و ذلك بإضافة إشارة # قبل حقل الربط .. لا أعرف كيف أعبر عما تم .. و سأرفع النموذج بعد أن أستكمل العمل إن شاء الله و الشكر لك أستاذي و أعتذر عن غموض العبارة ، توقعت أني لم أوضح السؤال و يبدو أن النموذج المرفق فيه نفس المشكلة . فكم المشاهدات كان كبيراً و أعلم مدى اهتمامكم أخوتي بتقديم المساعدة لا تسألون الأجر إلا من الله سبحانه و تعالى .

الكود ينفع و لكن عليك استبدال الأسماء

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

هل من طريقة تجعل زر الإضافة ينفذ الأمر لمرة واحدة .

مرحباً لأجل معرفة تكرار قيمة في حقل استخدم Dcount IF DCOUNT( الشروط ، اسم الجدول ، اسم الحقل) > 0 THEN النتيجة الذي ترغب بها END IF و اعتذر فلست ضليعا. كفاية و لكن هذه الفكرة

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

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

بالنسبة للتكرار استخدم الدالة Dcount . IF DCOUNT( , , ) >1 THEN **** end if

شكراً لكم أخوتي و أي طلب تيسرت إجابته فهو جهد و فضل لا ينسى . بارك الله بكم .

يبدو أني لم أوفق لعرض السؤال بصورة مناسبة ، فهل هناك حاجة إلى إعادة رفع النموذج المرفق بعد تعديله مرة أخرى ؟

بانتظار عونكم كما عودتمونا

بما أن السؤال لم يحظٓ بعد بالإجابة أضيف هل يمكن منع الإضافة في النموذج الفرعي و جعلها محصورة بالزر المذكور حيث تتم الإضافة بناءعلى رقم موجود في حقل ضمن النموذج الأساسي . و شكراً سلفاً

السبب في عدم عمل زر الإضافة على ما اعتقد هو العلاقات بين الجدولين

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

Me.text = me.listbox.column(x)0 لقد تمكنت ن إيجاد الطريقة المناسبة شكرًا لكل من تفضل بزيارة السؤال و لكل من أراد المساعدة و لم تتح له الإمكانية .

السلام عليكم كيف أستطيع التعبير بأوامر الفيجوال عن عمود من أعمدة مربع القائمة ؟ مثلاً ، لدي مربع قائمة غير منضم يخزن أسماء العملاء و أرقام هواتفهم . أرغب بأن أجعل حقلين منضمين في النموذج يأخذ أحدهما الاسم و الآخر الهاتف من مربع القائمة . كنت سابقاً أستمد قيمة الحقل بالطريقة الآتية : Me.text1= me.listbox و لكن هذا لا يجدي إلا مع قيمة العمود الأول في مربع القائمة . أحتاج إلى طريقة كتابة الأمر دون أن يكون في مثال محدد ، نظراً لعدم وجود حاسب متصل بالشبكة . شكراً لكم و بارك الله بجهودكم الطيبة .

صدقة جارية بصحيفتك إن شاء الله

بارك الله بك ... ماشاء الله عمل احترافي

أسأل الله العظيم أن يجزيكم خير الجزاء و يحقق مناكم في الدنيا و الآخرة فيما يرضيه عنكم . أخوتي و أحبتي و أساتذتي في هذا المنتدى المبارك و خاصة من شرفني و تفضل علي بالإجابة أو التفاعل . @kaser906 @ابا جودى @jjafferr أشكركم على وقتكم الثمين و جهدكم الكبير و كرمكم الجم فمن المعلوم مشقة الرفع و التنزيل مع مخاطرة إصابة الجهاز بالفيروسات و قبلها ما بذلتموه حتى اكتسبتم هذا العلم و هذه الخبرة تجودون بها لمجاهيل و عابري سبيل. و إن كنتم ثابتين في قلوبنا و أذهاننا بأسمائكم معلمين نذكركم و نشير إليكم ما شاء الله . شكراً لكم و ألف شكر . فمنكم ومن وحيكم خطرت في بالي هذه الأبيات : فتهدوننا علماً و تفريج كربة وليس لكم منا سوى المدح و الثنا و أين الذي قدمتموه من الذي أتيناها بعداً بين أرض و من سما

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

بانتظاركم... دام فضلكم

و عليكم السلام أستاذي الفاضل ما أبحث عنه هو أمر فيجوال يمكنني من جعل استعلام التحديث يعمل على كامل الجدول دفعة واحدة و ليس على سجل التركيز فقط . في المثال المرفق أرغب بتحديث حقل منضم بناء على حقل غير منضم . و لكن ما أبحث عنه هو أمر فيجوال يمكنني من تحديث حقل بناء على حقل آخر و لكن على كامل الجدول و دفعة واحدة سواء أكان الحقل منضماً أم لا . في الوقت الراهن ليس لدي مثال محدد و لكن واجهتني هذه المسألة قبلاً ،و اضطرت وقتها لعمل العديد من الخطوات ووصلت بالنهاية إلى حيث بدأت حيث احتجت إلى طريقة تمكنني من نسخ الحقل الغير منضم إلى آخر منضم و قدم الأستاذ @AlwaZeeR حلاً سحرياً بجعل المؤشر ينتقل عبر كامل النموذج من سجل إلى آخر عند تنفيذ الأمر دفعة واحدة لينسخ قيمة الحقل الغير منضم إلى الحقل المنضم . لكن بقي السؤال ملحاً في ذهني هل يمكن التحديث باستعلام لكامل الجدول و دون الحاجة إلى جعل المؤشر يتحرك عبر كامل النموذج ... عندما شاهدت مشاركات - حضرتكم- توسمت بكم حب المساعدة و القدرة عليها و هاقد شرفتني بالتجاوب مع سؤالي . و الشكر كل الشكر للأخ الفاضل @kaser906 على ما يقدمه و لا زلت بانتظاره مشكوراً على أياديه البيضاء التي لا تمحى . كل عام و أنت بخير أستاذي @jjafferr و @kaser906 و بانتظار ما تجودون به مشكورين غير مأمورين و من الله عز وجل خير الجزاء و من العباد الدعاء و الثناء .

بانتظارأفكار هذه الطرق .. شكراً

شكراً لك أستاذ @kaser906 Database8.accdb