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

ابوخليل

أوفيسنا
  • Posts

    12,476
  • تاريخ الانضمام

  • Days Won

    232

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

  1. اجعل حقلي الصف والشعبة غير منضمين
  2. اولا .. في اول مشاركة لك ذكرت انك لم تستفد من هذا الموقع .. وهذا من الجحود .. من منا لم يبحث في هذا المنتدى عن موضوع يهمه .. عن نفسي بحثت كثيرا ومازلت ابحث عند احتياجي لمعلومة محددة . ثانيا : تمن على اخوانك بانك طرحت قاعدة بيانات لفئة خاصة قد لا يحتاجها الكثير وفيها الكثير من العيوب ، وتسميها هدية . نصيحة : ان اردت المساعدة الحقيقة والسريعة .. اطرح عيوب برنامجك واحدة واحدة واطلب اصلاحها ، لان موضوعك هذا مخالف لقواعد المشاركة ويستحق الاغلاق ولكننا نتغاضى ونتجاوز بل نتكاسل عن بعض المخالفات وغلق الموضوع من شروط قواعد المشاركات عدم طرح اكثر من سؤال واحد في الموضوع الواحد
  3. اخي الكريم يجب ان تهتم بقواعد المشاركة وعدم مخالفتها ، فانت سببت لنفسك غلق الموضوع اختيار عنوان مناسب الاكتفاء بطرح سؤال واحد تم تعديل العنوان
  4. اخي الكريم يجب ان تهتم باختيار العنوان المناسب للموضوع تم التعديل ،،
  5. اخي الكريم يجب ان تهتم في مواضيعك القادمة باختيار العنوان المناسب للموضوع تم التعديل ،،
  6. تمام .. احسنت في عملك حدث الاغلاق يمكننا تنفيذ امر معين قبل الاغلاق ، ولكن الاغلاق سوف يتم بمعنى سيتم الاغلاق سواء تحقق الشرط ام لا ولا نكتفي عند زر الاغلاق بشرط واحد وانما نطبق جميع الشروط عليه وهي الموجودة في زر الحفظ تم التعديل واليك المرفق ‏‏‏‏devicesdb10.rar
  7. ما شاء الله لا قوة الا بالله بقي لمسة لعلها تكون الاخيرة وهي عند الحفظ اذا كان المستخدم مستعيرا يجبره على كتابة تاريخ نهاية الاعارة عملتها لك فاستبدل كود الحفظ عندك بالكود التالي If IsNull(Forms!frmDevDetails!frmDetails!receiveDate) And Not IsNull(Forms!frmDevDetails!frmDetails!users) Then MsgBox "لطفاً أدخل تاريخ التسليم" ElseIf Forms!frmDevDetails!frmDetails!userType = 4 And IsNull(Forms!frmDevDetails!frmDetails!dateHireEnd) Then MsgBox "لطفاً أدخل تاريخ نهاية الإعارة" Exit Sub End If Dim i As Integer i = Me.id Me.Requery Me![coSearch] = i Call coSearch_AfterUpdate
  8. تفضل فورم لاضافة الاهداف والمهارات والأنشطة برنامج التخاطب والمهارات 11.rar
  9. اللغة في اكسس هي فيجوال بيسك مع اختلافات طفيفة ان اردت الخروج عن بيئة اكسس فالبحر واسع
  10. ايضا اضم صوتي لمن سبقني ، حتى المرفق لا يظهر فيه ان المطلوب شيء خاص ، وما دمت تبحث عن الاب وعائلته ضمن النموذج الرئيس ، فهذا حل يسير وبسيط ويعمله اكسس بنفسه عادة .. وانا استخدمه في كثير من النماذج . مربع تحرير يبحث بالحرف الواحد ويكمل البقية .. اذا ظهر الاسم الذي تريد انقر انتر test3.accdb
  11. جديد ورائع جدا استاذ موسى والأجمل هذا الأداء في الشرح والصوت الجميل كتب الله اجرك وبارك فيك وفي عملك
  12. السلام عليكم معلومات قيمة عن استعلام التوحيد ، تستحق موضوعا مستقلا .. بارك الله فيك استاذنا وبارك في جهودك انا اعتقد ان السائل يمكنه اظهار الغياب والاضافي ابتداءً في استعلام واحد
  13. تم التعديل على الملف احيي فيك محاولاتك لصنع الكود بنفسك الاكواد تبنى على الفكرة واحدة واحدة ، قد تجد صعوبة في تشغيل بعض الجزئيات خاصة في النماذج المرتبطة فهنا انت بحاجة الى مساعدة صديق بالنسبة لفورم الاعارة فاتركه كما هو ، حيث وجدتك طبقت فكرة الحذف تماما تم حذف حقل بداية الاعارة من الجدول ومن الفورم لانه تحصيل حاصل حيث ان حقل الاستلام يقوم مقامه تم نقل زر الحفظ الى الفورم الرئيسي من اجل سهولة التحديث وضمان عمل الكود على اكمل وجه تم صياغة الاحداث واكوادها من جديد تم عمل لمسات على واجهة الفورم .. لاني رأيت البيانات الثابتة تشد الانتباه وليس بينها وبين الحقول المحررة فرق فأحببت تمييزها وخفض الضوء الآن فورم حركة العهدة يعمل على اكمل وجه جرب جميع الطرق ووافني بالنتيجة ‏‏devicesdb7.rar
  14. الاهداف والانشطة بحاجة لفورم خاص لادخال ما يستجد وللتعديل ... ونحو ذلك
  15. انا عملته طبقا للصيغة الموجودة فعلا في الجدول وهذه الصيغة هي السائدة ، واستخدم التنسيق ( من اليمين الى اليسار ) في الواجهات
  16. مع ان الاولى تغيير حقل الهجري الى نص من اجل تجاوز التعارض مع الاشهر الشمسية الناقصة ولكن عند التحويل الى نص نفقد كثير من الخصائص التي تجرى على حقول التاريخ مشكلتك الحقيقة اخ عمر ان التاريخ الهجري يتم ادراجه في الجدول من اليسار الى اليمين والكود يقرأ من اليمين الى اليسار جرب لا تغير الحقل الى نصي بل اتركه كما هو واستبدل الكود بهذا Me.date_m = Um2Greg(Left(date_h, 2), Mid(date_h, 4, 2), Right(date_h, 4))
  17. نعم كلامك صح .. يكونوا مع الموظفين بشرط اضافة نوع الوظيفة ولو جعلتهم في فورم خاص يكون ابعد عن احتمال الخطأ كما ذكرت انت انهم موظفون ولكن الفرق في ان الاعارة محددة بزمن دعني اطلع على الملف .. وقد اقوم ببعض التعديلات .. ولكن كما اتفقنا ، العمل فقط على ملف واحد عندما انتهي منه اسلمه لك .. وانت كذلك ... وهكذا
  18. تم عمل نموذج الجلسات من فورم اعداد الخطة انقر نقرا مزدوجا على رقم الخطة المراد تقييم الجلسة فيه سيفتح لك فورم الجلسات يتم فيه عرض الهدف والنشاطات التابعة له . بعد اختيار نوع الجلسة ، والتقييم ، والمختص يتم الحفظ بالنقر على زر حفظ عند الحفظ ستختفي هذه المهارة من فورم الخطة اضفت ايضا بعض الكائنات التي سوف تحتاج اليها مستقبلا .. ستلاحظها داخل مشروعك الآن وبعد تجربة العمل من خلال النموذجين سيتبقى المخرجات التي هي التقارير حاول ان تبني التقارير بنفسك ... اتمنى لك التوفيق .. برنامج التخاطب والمهارات 10.rar
  19. الف مبروك ابا جودي اهلا وسهلا اخونا وحبيبنا الغالي
  20. لا لن يعيق ، وكنت اظن ان درجة التقييم شرط في الانتقال اذا هو سينتقل بناء على تاريخ بدء الخطة سأحاول تطبيق الفكرة حسب فهمي
  21. سؤال : ما دام فورم الخطة لتسجيل الخطة فقط ما فائدة وجود حقلي : التقييم /تاريخ الاتقان ؟ اليس مكانهما الصحيح في فورم الجلسات؟
  22. هذا المطلب قد تطرق له من قبل اخي الاستاذ جعفر اطلب من اخواني واحبتي الاعزاء تكرما وتفضلا ان لا تكون الاجابة ضمن المرفق فقط مثلا بأن يقوم بالتعديل على المرفق ثم يرفعه فضرر هذه الطريقة فادح ويتضح في قادم الايام فيما لو تم حذف المرفق لاي سبب من الاسباب ومن المعلوم ان النصوص اكثر ثباتا وبقاء ايضا يصعب على من يعمل من هاتفه ويطلب المعلومة السريعة واعجبه السؤال ويحب الاطلاع على الحل فالمطلوب هو وجوب عرض الحل كنص سواء كان كود او شرح مبسط لما تم عمله الايضاح والشرح قد لا يتعدى سطرا واحدا .. ولكنه يجب ان يعطي تصورا صحيحا لطريقة الحل . بارك الله في اعمالكم وجهودكم وكتبها في موازين اعمالكم .
  23. تفضل Dim i As Integer, R As Integer Dim x As String, xx As String Dim rs As Recordset Set rs = Me.frm_T1.Form.RecordsetClone rs.MoveFirst R = rs.RecordCount For i = 1 To R If rs!newline = True Then x = rs!nots & " " & rs!TEXTT xx = " " & xx & " " & x End If rs.MoveNext Next Me.tsmya.Caption = xx test2.accdb
  24. بارك الله فيكم اخوتي واحبتي ، واحسن اليكم . لمدكم يد العون لأخيكم في شرحك الاخير اخ عمر اتضحت الصورة تماما .
  25. تصوري لعملية لاعارة : 1- نضيف كلمة اعارة لجدول نوع الوظيفة ، من اجل تظهر ضمن مربع التحرير 2- نظيف اسم المستعير وبياناته ضمن جدول الاسماء 3- تجرى على المستعير عملية تسليم الجهاز كغيره من الموظفين والمدارس 4- عند اختيار اعارة واختيار اسم المستعير يتم اظهار حقلين للتاريخ من / الى 5- نضيف في جدول العمليات الحقلين المشار اليهما هذا كل شيء بحيث تكون جميع عملياتك ضمن مكان واحد تصور تم استلام جهاز من مستعير ونريد تسليمه لجهة اخرى سواء كانت ضمن الدائرة او اعارة اخرى .. ستتم العملية حسب طريقتنا بكل يسر
×
×
  • اضف...

Important Information