اذهب الي المحتوي
أوفيسنا

أ / محمد صالح

أوفيسنا
  • Posts

    4,444
  • تاريخ الانضمام

  • Days Won

    192

كل منشورات العضو أ / محمد صالح

  1. اعرض الملف الفرق بين تاريخين بالميلادي والهجري بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم بخير وسعادة ورضا ============== استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم بالتواريخ في الأكسس مثل حساب العمر أو مدة بينتاريخين ------------------------------- سواء بالتقويم الميلادي أو الهجري ////////////////////////// سواء التاريخ منسق كتاريخ أو كنص ++++++++++++++++++ ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** الكود يعمل على كل إصدارات الأوفيس دمتم في رعاية الله وحفظه والقادم أفضل إن شاء الله صاحب الملف أ / محمد صالح تمت الاضافه 31 ماي, 2017 الاقسام قسم الأكسيس
  2. Version 2.0.0

    935 تنزيل

    بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم بخير وسعادة ورضا ============== استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم بالتواريخ في الأكسس مثل حساب العمر أو مدة بينتاريخين ------------------------------- سواء بالتقويم الميلادي أو الهجري ////////////////////////// سواء التاريخ منسق كتاريخ أو كنص ++++++++++++++++++ ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** الكود يعمل على كل إصدارات الأوفيس دمتم في رعاية الله وحفظه والقادم أفضل إن شاء الله
  3. قصدك لو (تاريخ الميلاد) التاريخ القديم هو اليوم والتاريخ الجديد هو اليوم أيضا سيكون الناتج 0 يوم 0 شهر 0 سنة ولا يوجد ناتج سالب إلا إذا كان التاريخ الجديد قبل التاريخ القديم راجع حساباتك الكمبيوتر لا يخطئ ابدا ما دام الكود صحيحا ربما يكون الخطأ من المستخدم
  4. أعتقد لا يلزمك تغيير شيء بالوحدة النمطية لأن أي تغيير سيغير ناتج الدالة
  5. يعني الدالة غير صحيحة؟!! أشك المدخلات غير متفقة مع المطلوب للدالة المدخلات المطلوب تمريرها للدالة التاريخ القديم كنص والتاريخ الجديد كنص
  6. وفقكم الله لكل خير في حالتك هذه تحتاج لجعل التاريخ الجديد هو تاريخ اليوم بالهجري منسق كنص لكن هل قامت الدالة بالمطلوب؟!
  7. بارك الله لك مشكور على حب الخير للغير وفقكم الله
  8. شكرا لك ده أبسط شرح وفيه الخطوات من الألف إلى الياء وفيه مثال عملي على العربي يمكّن الإنسان من التعلم بالمثال وفحص الكود وطريقة استدعاؤه ايه اللي مش واضخ لك في الخطوات ونعيد صياغتها بإذن الله يبدو أنك لم تقرأ هذا الجزء جيدا أخي الكريم
  9. هههههههههههه فعلا أخي الكريم الملف المرفق ليس به اي شيء يخص تنفيذ الفكرة فقط نموذج إضافة للاسم وتاريخ الميلاد وجدول به الرقم والاسم وتاريخ الميلاد (وبعض التواريخ بالميلادي وبعضها بالهجري) .................................... على العموم هذا مثال لطريقة استعمال الدالة في الاستعلام والنموذج والتقرير أرجو أن تستفيد منه الفرق بين تاريخين هجريين.rar
  10. بإذن الله كل شيء ممكن الفكرة كلها في تمرير الحقول التي تعتمد عليها في حسابك للحقل إلى دالة معرفة في الفيجوال بيسك تقوم بتصميمها فمثلا العربي تحتاج إلى نوع التعليم ودرجة النشاط ودرجة الاختبار (وذلك في الترم الأول (عربي11) والثاني (عربي22)) وتحتاج إلى نوع التعليم ودرجة الترم الأول ودرجة الترم الثاني (وذلك في الدرجة النهائية (عربي)) وتحتاج إلى نوع التعليم ودرجة درجة تحرير الترم الذاني والدرجة النهائية ودرجة الترم الثاني كله (وذلك في نتيجة عربي) وسنضيف متغير آخر للترم وهو في الحقيقة ليس للفصل الدراسي بقدر ما هو تحديد نوع المعادلة المطلوبة 1 للترم الأول 2 للترم الثاني 3 لدرجة النهائية 4 لنتيجة العربي ولذلك يمكنك تصميم دالة مثل الموجودة في المرفق ..................... وأنصح بتسمية الحقول في الاستعلام باللغة الانجليزية لتسهيل كتابتها ويمكنك استعمال الخاصية caption لتغيير ظهور الاسم بالعربي وبهذا نكون جمعنا بين الحسنيين سهولة كتابة المعادلة بالانجليزي وظهور أسماء الحقول بالعربي نفعنا الله وإياكم بما علمنا وعلمنا ما ينفعنا كل عام والجميع بخير رمضان مبارك mas_نتيجة عربي.rar
  11. إذا سمحت لي أخي الكريم أنت لست أكثر ضياعا وإنما أكثر رغبة في أن تضيع نفسك وتضيع جهودي معك هدانا الله جميعا لكل خير ........ هل جربت الدالة التي كتبتها لك ولم تؤد الغرض المصممة لأجله؟! وهو الفرق بين تاريخين هجريين منسقين كنص
  12. وفقنا الله جميعا لكل خير الرسالة تعني أن المتغير passDatabase لم يتم تعريفه فكيف يتم حساب عدد حروفه؟! يجب ان يتم الإعلان عن المتغير أولا ثم وضع قيمة له ثم استخدامه بعد ذلك بالتوفيق للجميع
  13. الشرف لي أستاذ @رمهان بارك الله لك فعلا إذا تم تغيير الخيارات للهجري يقبل ولكن لا تكون حسابات دالة datedif صحيحة وإذا كنت جربت الدالتين فأيهما يعطي نتائج أفضل؟! رمضان مبارك
  14. الدالة يمكن استخدامها في الاستعلام والنموذج والتقرير فقط تكتب تاريخ البداية في حقل وتاريخ النهاية في حقل آخر وفي الحقل الثالث تكتب =datedifh(field1,field2)
  15. ترجع مشكلة التاريخ الهجري في التعامل معه على أنه تاريخ ميلادي فلا يقبل مثلا التاريخ 29/02/1438 لذا أقترح التعامل معه على أنه نص وهذه دالة للفرق بين تاريخين هجريين على اعتبار أن الشهر 30 يوم Function datedifh(olddate As String, newdate As String) As String Dim d As Integer, m As Integer, y As Integer, nd As Integer, nm As Integer, ny As Integer nd = Left(newdate, 2): d = Left(olddate, 2) nm = Mid(newdate, 4, 2): m = Mid(olddate, 4, 2) ny = Right(newdate, 4): y = Right(olddate, 4) If nd < d Then nm = nm - 1: nd = nd + 30 If nm < m Then ny = ny - 1: nm = nm + 12 datedifh = nd - d & " يوم " & nm - m & " شهر " & ny - y & " سنة" End Function ويتم استدعاؤها هكذا MsgBox datedifh("29/02/1977", "05/05/2017") مع مراعاة اليوم من رقمين والشهر من رقمين
  16. الخطوة الرابعة هي عند الضغط على صورة السهم يتم تفريغ مربعات النص وإلغاء عامل التصفية وليس بها أي مشكلة
  17. السلام عليكم ورحمة الله وبركاته بارك الله لكم جميعا ربما يفيدك هذا المثال المصنوع على عجالة للتعرف على أكواد المفاتيح ascii & ceycode وفتح نموذج عند الضغط على مفتاح معين open form by keys.rar
  18. أعتقد أن هذا غير متاح حاليا المتاح التأكد من شكل البريد user@company.com
  19. الأكواد صحيحة ولكن يوجد مجموعة من الخطوات التي يجب عملها على الجهاز الذي سيتم إطفاؤه تسمح بتنفيذ هذه الأوامر من جهازك وكل هذه الخطوات حماية من المتطفلين فليس من المعقول أن يجد المستخدم جهازه يتوقف عن العمل لأن واحدا ممن يشاركونه في الشبكة يريد ذلك
  20. جرب هذا الأمر Shell "shutdown -m \\ip -s -c This computer will shutdown after 60 seconds. -t 60", vbHide Shell "shutdown -m \\ComputerName -s -c This computer will shutdown after 60 seconds. -t 60", vbHide ممكن استعمال رقم ip للجهاز أو اسم الجهاز على الشبكة
  21. وفقك الله وهداك وإيانا للصواب يتم معرفة اسم الملف الناقص ومساره بتحديد المرجع المطلوب (المكتوب بجواره missing) سيظهر بياناته في اسفل النافذة كما قلت سابقا ولكن جرب أخي الكريم الحل الأسهل وهو حذف علامة الصح بجوار المرجع الثالث missing: Microsoft office 12 authorization control وإذا استمر عمل البرنامج فالحمد لله وإذا تعطل فيه شيء فيجب للأسف تحميل ملف dll الخاص بالمرجع من الانترنت
  22. هل وجدت في نافذة المراجع شيئا مفقودا إذا حدث ذلك ستجد اسم ومسار ملف DLL المفقود في الجزء السفلي من النافذة بعدها تبحث عنه في جوجل وتقوم بتحميله ووضعه في المسار المطلوب وستنتهي المشكلة بإذنه تعالى
  23. هي عملية إرسال بريد عادية ولكن هي اختصار للوقت بدلا من فتح المستعرض والدخول في جي ميل وإرسال رسالة جديدة أو بدلا من فتح برنامج أوت لوك وإرسال رسالة جديدة يتم الإرسال من الأكسس مباشرة وطبعا يتم رفع المرفقات حسب سرعة الانترنت في الجهاز
  24. جرب هذا الحل وأخبرني بالنتيجة رمضان مبارك
  25. ربما يرجع البطء لحجم المرفقات هل جربت بدون مرفقات؟؟ أستاذ شيڤان
×
×
  • اضف...

Important Information