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

Foksh

أوفيسنا
  • Posts

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

  • تاريخ اخر زياره

  • Days Won

    167

كل منشورات العضو Foksh

  1. 🤔 ، غريب ( وما غريب إلا الشيطان ) مع العلم انه تمت التجربة على أكثر من إصدار أوفيس 🥺 على العموم ستتم المتابعة والإصلاح إن كان هناك أخطاء في عدم التوافق مع إصدارات معينة. ولا يهمك 🥰
  2. تم التحديث للنسخة 32 ، تفضل أستاذي @الحلبي
  3. الخطأ مني أستاذي ومعلمي الجليل ، يمكن ذوقي بعدم ظهور الأزرار كأزرار هو المشكلة . رغم إني في تطبيقاتي أتعمد ان الأزرار يكون لها شكل اليد بدل سهم الماوس الإفتراضي 🤗 وسماع النغمة قبل التطبيق موجودة لحرية الاختيار 😅 يسعدني ملاحظاتك
  4. من المفترض انه عند تشغيل البرنامج لأول مرة يفتح نافذة لوحة تحكم الاعدادات ، ومن صورة الجرس تختار النغمة من المجلد واختيار الثيم ثم يتم تطبيقهم اعتذر اذا لم يتم التلميح لهذه النقطة ، تم إضافة الملاحظة . 😬
  5. هذه مساهمة اخي الكريم ، تفضل 🤗 HAA.accdb
  6. أستاذي ومعلمي @ابوخليل ، وجوب ان يكون الملف الصوتي في مجلد Notification ، سأعمل على تصحيح هذه الجزئية بحيث عند اختيار ملف صوتي خارج المجلد ان يتم نقله اليه واعتماده . أشكرك للفت انتباهي لهذه النقطة 🤗
  7. حتى يستفيد من المشاركات أكبر عدد من الأخوة المنتسبين و زوار المنتدى ، قم بفتح موضوع جديد لهذا الطلب. وإن شاء الله متابعين معك ، رغم أنني قمت تقريباً بتأسيس الفكرة لفاتورة البيع انظر سهولة تتبع العلاقات عندما يكون لديك جدول حركة واحد :- وعندما يكون لديك جدولين حركة ( واحد لحركة الصنف ، و آخر للحركة المالية إن صح التعبير ) ونصيحة لك أخي العزيز ، حاول استخدام مسميات داخل الجداول والنماذج باللغة الإنجليزية
  8. بناءً على الأفكار اللامعة للأستاذ @Moosak :- تم إضافة تشغيل البرنامج عند تشغيل الويندوز ( تمت التجربة على الإصدارات Windows 10 & Windows 7 & Windows XP ) . تم إضافة زر التصغير Minimize . تم تحديث شكل بعض الأزرار . تحديث بعض الأخطاء البرمجية . ⏱️ ملاحظة ، عند تشغيل البرنامج لأول مرة ، يجب اختيار الثيم ، ونغمة التنبيه من مجلد Notification من خلال الضغط على صورة الجرس . جاري العمل على إضافة عرض درجة الحرارة لواجهة المنبه حسب البلد أو المدينة ( يلزم إتصال إنترنت )
  9. أختنا الفاضلة @ايناس ، هذه المشاركة الـ 24 لك . وللأسف في معظم مشاركاتك تكون التفاصيل في طلبك غير واضحة 🙄 ، بالإضافة لعدم إرفاق أي ملف حتى يتم تطبيق طلباتك عليه. للحصول على أفضل نتيجة ولتلقي الرد المناسب لطلبك ، عليكِ بما ذكرته لك 😊 ، متمنياً لك الحصول على طلبك
  10. بعد الاطلاع على المرفق أعتقد المشكلة في استعلام التوحيد. سبب كلامي هذا هو انني انشأت استعلام للجدول Cridi مشتق من استعلامك التوحيدي وقد تم جلب السجلات ، أما من الاستعلام فلم يتم جلب اي سجلات من اي جدول . وهذه صورة من نتيجة استعلام التوحيد بعد بعض التعديلات ، وأنا ( أعوذ بالله من كلمة أنا ) أعرف قدراتي في استعلامات التوحيد 😅 قد يكون لأحد الأخوة معلومة تفيدك وتفيدني معك 🥰
  11. تريد فتح التقرير على الفلترة حسب السنة ؟؟
  12. في هذا التعديل ، قمت بتحديث القيمة في النموذج مباشرةً بدلاً من عرضها في رسالة ، باستخدام السطر :- Me.FieldChangedFrom = rs.Fields(1).Value بدلاً من السطرين السابقين :- Beep MsgBox rs.Fields(1) لتحديث القيمة في النموذج مباشرةً بالقيمة الموجودة في السجل الحالي. وأما بالنسبة للجزئية المتعلقة بالحدث عند فتح النموذج المتعقب للتغييرات فهي فقط لتحديث الحقل ، فبدونها سيتوجب على المستخدم ان يقف على مربع النص FieldChangedFrom ليتم تطبيق التحديث ، كون الحدث يعمل في الحالي . فاستبدلت الفكرة لفتح النموذج والذهاب الى آخر سجل وعمل تحديث له . DoCmd.GoToRecord , , acLast [Forms]![frmAudit]![FieldChangedFrom].SetFocus [Forms]![frmAudit]![FieldChangedFrom].Requery
  13. استخدم الدالة Dmax أخي الكريم ، وارسل مرفق لمساعدة
  14. النسخة الجديدة مع التعديلات والتحديثات ، ولكني كنت منشغلاً في تحدي بيني وبين نفسي في موضوع آخر
  15. وهذه مشاركتي بطريقة أخرى تم إجراء تعديلات على الكود الذي يظهر النتيجة برسالة عند النقر المزدوج على الحقل FieldChangedFrom . واستخدامه في حدث ( في الحالي ) للنموذج FrmAudit ، على النحو التالي :- Private Sub Form_Current() On Error GoTo flderr Dim tbl As String Dim fld As String tbl = Me.tblNm fld = FieldChangedFrom Dim rs As Recordset Set rs = CurrentDb.OpenRecordset(tbl) rs.MoveFirst Do While Not rs.EOF If rs.Fields(0) = fld Then Me.FieldChangedFrom = rs.Fields(1).Value Exit Sub End If rs.MoveNext Loop flderr: Exit Sub End Sub وفي حدث زر تتبع التغييرات ، قمت بإضافة سطرين ليصبح الكود كالتالي :- Me.Refresh DoCmd.OpenForm "frmAudit", acNormal DoCmd.GoToRecord , , acLast [Forms]![frmAudit]![FieldChangedFrom].SetFocus [Forms]![frmAudit]![FieldChangedFrom].Requery Database4.accdb
  16. اخي الكريم هناك الكثير من المواضيع ضمن نفس الطلب ، تفضل هذا أحدثها تفضل
  17. تفضل اخي الكريم ، هذه محاولتي مع اجراء بعض التغييرات والتعديلات . مخازن.zip المشكلة كانت في ربط العلاقات بين الجداول
×
×
  • اضف...

Important Information