أبو هادي

السلام عليكم أخي الوارث .. الملف بعد التعديل .. آمل أن يكون موافق للمطلوب . تحياتي . library_97.zip

السلام عليكم إذن أخي الوارث يبقى الوضع على ما هو عليه ولا داعي لإرفاق ملف جديد فقط أزل السطر الثاني من هذا الكود : m = DCount("[Acc_No]", "Payment", "[Member_ID]=" & Me.MemberName.Column(0) & " and " & _ "[Acc_No]=" & Me.AccNo & " and " & _ "[Paid]=0") تحياتي …

السلام عليكم أخي فهد الدوسري .. فكرة ممتازة وتحتاج مواصلة في تطويرها , ودع الكود طويلا كان أم قصيرا ، لا يهم . ولا يكن طول الكود سببا في ترددك أو تخليك عن هذه الأمثلة الجميلة . تحياتي .

السلام عليكم أخي الوارث .. أنا آسف لم أفهم جيدا المطلوب ولكني قمت بتعديل في دالة DCount آمل أن تشرح لي بأكثر تفصيلا . تحياتي . library_97.zip

السلام عليكم أخي الوارث .. أعتقد أنك أرفقت نسخة قديمة . :) عموما قمت بالتعديل للفقرة (أ) وتركت الفقرة (ب) حتى ترفق النسخة الأخيرة . تحياتي . library_97.zip

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

السلام عليكم أخي الفاضل .. أراك تبدل أسماء كائنات النماذج وهذا يسبب كثير من المشاكل وخصوصا لو تم بناء كود يستخدم أسماء هذه الكائنات . نموذج الإقراض في صندوق Book Number لا يعرض الكتب التي لم تعاد وأعتقد هذا يكفي . نموذج الإرجاع تم تعديلات بسيطة عليه . جدول الإ…

السلام عليكم Sub Test() Dim mm As Byte Dim yy As Integer Dim mmDays As Long mm = 12 yy = 1424 '************** للهجري والميلادي ************************** '-- للحصول على تاريخ نهاية الشهر mmDays = IIf(Day(DateSerial(yy, mm + 1, 0)) = 1, _ DateSerial(yy, mm + 1,…

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

يبدو أنك استعنت بصديق :) وكلٌ يميلُ إلى شكلهِ *** كميلِ الخنافسِ للعقربِ وكم مرةٍ أتبعتكم بنصيحتي *** وقد يستفيد البغضةَ المتنصَّحُ ويأبى الذي في القلبِ إلا تبيُّنا *** وكل إناء بالذي فيه ينضحُ لا يسكن المرءُ في أرضٍ يهان بها *** إلا من العجز أو من قلة الحِيَل…

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

وما هو الجزء الذي حذفت من أجله المشاركة ؟ يبدو أننا سنصل .

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

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

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

:mad:

السلام عليكم مرفق المثال بعد التعديل تحياتي . library_97.zip

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

السلام عليكم الأخ سحاب .. البرنامج يخص أخونا الوارث وهو مصمم بالإنجليزي فلابد أن تكون الإضافة أو التعديل يتناسبان مع الأصل . تحياتي .

السلام عليكم الأخ samir_samir .. بارك الله فيك "كود" مفيد وفكرة رائعة . تحياتي .