اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

ابو جودي

أوفيسنا
  • Posts

    7124
  • تاريخ الانضمام

  • Days Won

    208

كل منشورات العضو ابو جودي

  1. كودات برمجية غير مهمة هل يمكنك اطلاعى على القاعدة بعد التعديل ان تكرمت
  2. انا مش فاهم ازاى اشتغلت 100% وقبل كدة كنت تشتكى من وجود مشكله هههههههههههههه يبدو انها بركات شهر رمضان
  3. ممكن مرفق
  4. اخى الحبيب وبعد اذن استاذنا الجميل الاستاذ المبجل استاذ @صالح حمادي ممكن قاعدة بيانات حضرتك ولو مش حاببها تكون على العام فى المنتدى قم بتحميلها على موقع https://www.mediafire.com/ ورجاء ارسل لى رسالة برابط تحميلها للعلم انا طلبت هذا منك من قبل فى الموضوع ولكن لم اتلقى اى ردود من اصحاب المشكلة وكنت انت منهم استاذى الفاضل
  5. انا مش فاهم بصراحة ممكن مرفق وتوضح المطلوب تفصيلا ارجوك
  6. من اى نموذج هذه الرسالة هل تقصد نموذج اغلاق القاعدة
  7. السلام عليكم ورحمة الله وبركاته بناء على موضوع لأستاذنا الجليل الاستاذ @SEMO.Pa3x وبعد اذن استاذنا الجميل المبجل بعض التعديلات التى تضفى مرونة فى تشغيل الملفات الصوتية المميزات - عند ازالة ملف محدد او جميع ملفات الصوت من المجلد sound files يتم ازالته تلقائيا من الجدول داخل قاعدة البيانات وكذلك من نموذج التشغيل - نفس الموضوع عن اضافة اى ملف صوتى الى نفس المجلد يتم اضافته تلقئيا للقاعدة دون اى تدخل من المستخدم بمجرد اختيار ملف صوتى من النموذج يتم تشغيل الصوت وعند التنقل الى اخر يتم ايقاف الصوت السابق وتشغيل الجديد طبعا انا صايم وعلى عجلة من امرى قد يكون هناك اخطاء فإن وجدت ارجو ان تغفروا لى api_Play_Music_SEMO.zip
  8. بسيطة استبدل الكود الاتى If URL Like "about:id101" Then Debug.Print URL DoCmd.OpenForm "FM_2", , , "cstr(ID)=" & CStr(Mid(URL, 9)), , acDialog Cancel = True End If If URL Like "about:id102" Then Debug.Print URL DoCmd.OpenForm "FM_2", , , "cstr(ID)=" & CStr(Mid(URL, 9)), , acDialog Cancel = True End If If URL Like "about:id103" Then Debug.Print URL DoCmd.OpenForm "FM_2", , , "cstr(ID)=" & CStr(Mid(URL, 9)), , acDialog Cancel = True End If بهذا If URL Like "about:id101" Then Debug.Print URL DoCmd.OpenForm "FM_2", , , "cstr(ID)=" & CStr(Mid(URL, 9)) Cancel = True End If If URL Like "about:id102" Then Debug.Print URL DoCmd.OpenForm "FM_2", , , "cstr(ID)=" & CStr(Mid(URL, 9)) Cancel = True End If If URL Like "about:id103" Then Debug.Print URL DoCmd.OpenForm "FM_2", , , "cstr(ID)=" & CStr(Mid(URL, 9)) Cancel = True End If , , acDialog هذا الجزء من الكود هو السبب وهنا احس فى هذا المرفق اننى اتعامل مع الاكسس بطريقة الاستاذ @أبو إبراهيم الغامدي الحمد لله ان سؤالك ما كان يخص شئ من الدمج بين الاكسس والويب والا ما عرفت اجاوبك بعد التعديل at.accdb
  9. اتفضل  حذف سجلات(3).accdb
  10. جزاكم الله خيرا استاذى الجميل الفاضل ومعلمى استاذ @SEMO.Pa3x كل عام وانتم الى الله اقرب
  11. انا أجبتك بمشاركة قبل مشاركتك لا ادرى هل لاحظت مشاركتى ام لا ولا افهم مقصدك فى هذه الجملة
  12. اتغضل بس ارجوك ركز معى جيدا لابد من وجود جدول tblAdjustHjriDate لاننى قمت ببعض التعديلات على الموديول لضبط التاريخ الهجرى بزيادة او نفصان يوم كل شهر لابد من التأكد من قيمة الحقل AdjustDay فى هذا الجدول اما -1 فى حالة نقصان يوم او 0 او +1 دى فكرة لم تخطر على بالى الا الان وقمت بتنفيذها انظر الى الاستعلام والنموذج 2 لترى كيف يتم استدعاء الاكواد من الموديول حسب رغبتك بالطريقة التى طلبتها انت التاريخ (2).mdb
  13. طيب جرب هاد المرفق للعلم هذا من مكتبتى ولا ادرى اواتذكر من اين حصلته بصراحة المرفق تبعك لم يعمل معى اوفيس 2019 32 بيت Compact.accdb
  14. تم التعديل على النموذج " سقف " طبعا هذا حسب تصميمك انت للقاعدة والجداول بداخلها والعلاقات التى تربطهم مرتبط.accdb
  15. هذه الهدية القيمة شفرة الكود المستخدمة فى استخلاص اسماء الشهور والايام اهدانى اياها ذات يوم استاذى الجليل ومعلمى القدير الاستاذ الجليل @ابوخليل ههههههه حتى ايضا الشفرة المستخدمة لعمل الاستبدال ( دالة Replace) ايضا يرجع الفضل فيها الى الله اولا ثم الى استاذى المبجل الاستاذ @ابوخليل نعم لم تكن بنفس الهيئة كانت للاستبدال رموز خاصة وعلامات وانا قمت بالتعديل الطفيف عليها لتحويل الارقام الى عربي عن طريق ال Unicode Chart ولكن لولا الله سبحانه وتعالى ثم استاذى ووالدى لما توصلت الى هذه الفكرة مميزات المرفق - موديول به كل ما يخص التاريخ وكذلك تحويل الارقام الى العربية بدون التدخل فى اعدادات النظام وبدون اى خطوط خارجية ولتكون الهدية كاملة مكملة هذا هو الموقع الذى استخدمة عندما اريد الحصول على ارقام رمز او حرف ما  https://www.ssec.wisc.edu/~tomw/java/unicode.html التاريخ.mdb
  16. السلام عليكم ورحمة الله تعالى وبركاته ولانها المشاركة الاولى فى هذا الشهر الكريم كل عام وانتم الى الله اقرب طبعا اساتذتى الكرام اجابوا وافوا جزاهم الله عنا كل الخير ان شاء الله واستاذن اساتذتى الكرام على استحياء ان اشارك معكم بهذه الهدية البسيطة للعلم حتى يأخذ كل ذى حق حقه شفرة الكود المستخدمة فى استخلاص اسماء الشهور والايام اهدانى اياها ذات يوم استاذى الجليل ومعلمى القدير الاستاذ الجليل @ابوخليل ههههههه حتى ايضا الشفرة المستخدمة لعمل الاستبدال ( دالة replace) ايضا يرجع الفضل فيها الى الله اولا ثم الى استاذى المبجل الاستاذ @ابوخليل نعم لم تكن بنفس الهيئة كانت للاستبدال رموز خاصة وعلامات وانا قمت بالتعديل الطفيف عليها لتحويل الارقام الى عربي عن طريق ال Unicode Chart ولكن لولا الله سبحانه وتعالى ثم استاذى ووالدى لما توصلت الى هذه الفكرة مميزات المرفق - موديول به كل ما يخص التاريخ وكذلك تحويل الارقام الى العربية بدون التدخل فى اعدادات النظام وبدون اى خطوط خارجية ولتكون الهدية كاملة مكملة هذا هو الموقع الذى استخدمة عندما اريد الحصول على ارقام رمز او حرف ما https://www.ssec.wisc.edu/~tomw/java/unicode.html التاريخ.mdb
  17. السلام عليكم ورحمة الله تعالى وبركاته حتى لا اطيل عليكم المرفق الاتى يمكن من خلاله تشغيل اى ملف طالما انه موجود داخل المجلد بجوار قاعدة البيانات ويتم جلب المسار باسم وامتداد الملف اليا لاى ملف يتم اصافته ضمن هذا المجلد .... طبعا ده على حسب فكرتى انا وخيالى الى الان كل شئ تمام التمام وى الفل عند تحديد سجل محدد يتم تشغيل ملف الصوت وهنا تكمن المشكلة محتاج اوقف الصوت لا ادرى كيف هههههههههه حتى اننى اغلق القاعدة ويستمر الصوت فى العمل للعلم ممكن استعراض اى شئ ليس ملفات صوتية فقط ولكن سوف اجعلها تقتصر على التعامل مع ملفات الصوت api_play_sound.zip
  18. جزاكم الله خيرا والله الحمد لله رب العالمين الدكتور مد لى الاجازة تانى شهر لسه تعبان الحمد لله على كل حال وبعدين العملية كبيرة مش صغيرة هههههههههههه العصفورة قالت لى لا تبحث ولا تتعب نفسك انت بس لما تريد اى شئ تأمر يا دكتور البرنامج ده رااااااااااااااااااااائع اتفضل https://formatfactory.ar.uptodown.com/windows وحزاكم الله خيرا على دعواتكم الطيبة
  19. حتى اكون قدمت الهدية كاملة مكملة اليكم ملف الفوتوشوب الذى قمت بتصميم الزر به حتى تستطيعون تغيير الالون كما يحلو لكم تم ارفاق صور للون احمر ليكون محتلفا عن اللون اللبنى كما تم تعديل المثال مرة اخرى ليجمع بيمن اللونين Buttons.zip
×
×
  • اضف...

Important Information