أبو مالك1

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

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

للرفع ياحبايبي ........

لدي ميزانية مرصودة بمبلغ 100000 ريال للمساعدات. أحتاج كل شهر أقوم بإدخال بيانات الراتب لكل أسرة(يعني 1000 مرة لو كان عندي 1000 أسرة). الشيء الثاني والأهم أن جميع الأسر المسجلة نقوم بتحديث بياناتها المالية شهرياً ، بمعنى احتمال إيقاف المساعدة الشهرية أو زيادة ا…

شكرا كثييييييييييييييييييييييير ً ياعم إيهاب .....

المثال مرفق ... emp.zip

السلام عليكم ورحمة الله وبركاته ... طبعاً عندي جدول وفيه حقل التاريخ وكل يوم بتنضاف بيانات بالجدول ..... ماشي ..... لو أنا عايز أعمل استعلام تجميع البيانات حسب التاريخ مافيش مشكلة الأمر جداً بسيط .... بيعطيني طبعاً تجميع للتاريخ حسب اليوم. لكن اللي أنا عايزه ه…

حل موفق ---- والدعاء لك سلـفـــاً عزيزي .....

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

شاكر مرورك أخي العزيز ..... والمعذرة على سؤالي إن لم يكن واضح بما فيه الكفاية .... أريد إنشاء استعلام إضافة لجدول (sal) لثلاث حقول وهي:- *- رقم الموظف : ويتم أخذه من جدول الموظفين. *- راتب الموظف: ويتم أخذه من جدول الموظفين. *- الشــــــــــــهر: ويتم تحديده ع…

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

أخي الكريم والحبيب نجحت العملية معي وهي تعمل بشكل أكثر من رائع ..... لك مني جزيل الشكر والاحترام .... جُزيت خيراً وزوجت بكراً بكراً بكراً .... هههههههها

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

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

يبدو أني أغضبتك كثيراً بترددي أشكرك من خالص قلبي ولقد عملت ما أخبرتني به والنتيجة كانت 100% جزاك الله خيرا وكثر الله من أمثالك

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

مرفق مثال أخي الفاضل ما أريده هو تغيير عنوان (الفرق) إلى عجز في حالة كان الفرق بالسالب وفائض في حالة كان الفرق بالموجب وسلامتكم db10.zip

هذا هو الكود الذي وضعته في حدث بعد تحديث الحقل Private Sub finish_date_AfterUpdate() Application.SetOption "Use Hijri Calendar", True Dim dd1, dd2 As Date Dim Msg dd1 = Format(date, "dd,mm,yyyy") dd2 = Format(Me.finish_date, "dd,mm,yyyy") If DateDiff("d", dd2,…

أحبابي الافاضل الكود التالي لايعمل في التقرير .... ما أريده هو عندما تكون قيمة المجموع أصغر من الصفر يقوم بكتابة عنوان الحقل إلى عجز وعند الزيادة يقوم بكتابة فائض وعند المساواة يقوم بكتابة لايوجد عجز أو فائض .... Private Sub Report_Open(Cancel As Integer) If f…

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