ابوخليل

ما شاء الله لا قوة الا بالله بقي لمسة لعلها تكون الاخيرة وهي عند الحفظ اذا كان المستخدم مستعيرا يجبره على كتابة تاريخ نهاية الاعارة عملتها لك فاستبدل كود الحفظ عندك بالكود التالي 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

تفضل فورم لاضافة الاهداف والمهارات والأنشطة برنامج التخاطب والمهارات 11.rar

اللغة في اكسس هي فيجوال بيسك مع اختلافات طفيفة ان اردت الخروج عن بيئة اكسس فالبحر واسع

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

جديد ورائع جدا استاذ موسى والأجمل هذا الأداء في الشرح والصوت الجميل كتب الله اجرك وبارك فيك وفي عملك

السلام عليكم معلومات قيمة عن استعلام التوحيد ، تستحق موضوعا مستقلا .. بارك الله فيك استاذنا وبارك في جهودك انا اعتقد ان السائل يمكنه اظهار الغياب والاضافي ابتداءً في استعلام واحد

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

الاهداف والانشطة بحاجة لفورم خاص لادخال ما يستجد وللتعديل ... ونحو ذلك

انا عملته طبقا للصيغة الموجودة فعلا في الجدول وهذه الصيغة هي السائدة ، واستخدم التنسيق ( من اليمين الى اليسار ) في الواجهات

مع ان الاولى تغيير حقل الهجري الى نص من اجل تجاوز التعارض مع الاشهر الشمسية الناقصة ولكن عند التحويل الى نص نفقد كثير من الخصائص التي تجرى على حقول التاريخ مشكلتك الحقيقة اخ عمر ان التاريخ الهجري يتم ادراجه في الجدول من اليسار الى اليمين والكود يقرأ من اليمين الى اليسار جرب لا تغير الحقل الى نصي بل اتركه كما هو واستبدل الكود بهذا Me.date_m = Um2Greg(Left(date_h, 2), Mid(date_h, 4, 2), Right(date_h, 4))

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

تم عمل نموذج الجلسات من فورم اعداد الخطة انقر نقرا مزدوجا على رقم الخطة المراد تقييم الجلسة فيه سيفتح لك فورم الجلسات يتم فيه عرض الهدف والنشاطات التابعة له . بعد اختيار نوع الجلسة ، والتقييم ، والمختص يتم الحفظ بالنقر على زر حفظ عند الحفظ ستختفي هذه المهارة من فورم الخطة اضفت ايضا بعض الكائنات التي سوف تحتاج اليها مستقبلا .. ستلاحظها داخل مشروعك الآن وبعد تجربة العمل من خلال النموذجين سيتبقى المخرجات التي هي التقارير حاول ان تبني التقارير بنفسك ... اتمنى لك التوفيق .. برنامج التخاطب والمهارات 10.rar

الف مبروك ابا جودي اهلا وسهلا اخونا وحبيبنا الغالي

لا لن يعيق ، وكنت اظن ان درجة التقييم شرط في الانتقال اذا هو سينتقل بناء على تاريخ بدء الخطة سأحاول تطبيق الفكرة حسب فهمي

سؤال : ما دام فورم الخطة لتسجيل الخطة فقط ما فائدة وجود حقلي : التقييم /تاريخ الاتقان ؟ اليس مكانهما الصحيح في فورم الجلسات؟

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

تفضل 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

بارك الله فيكم اخوتي واحبتي ، واحسن اليكم . لمدكم يد العون لأخيكم في شرحك الاخير اخ عمر اتضحت الصورة تماما .

تصوري لعملية لاعارة : 1- نضيف كلمة اعارة لجدول نوع الوظيفة ، من اجل تظهر ضمن مربع التحرير 2- نظيف اسم المستعير وبياناته ضمن جدول الاسماء 3- تجرى على المستعير عملية تسليم الجهاز كغيره من الموظفين والمدارس 4- عند اختيار اعارة واختيار اسم المستعير يتم اظهار حقلين للتاريخ من / الى 5- نضيف في جدول العمليات الحقلين المشار اليهما هذا كل شيء بحيث تكون جميع عملياتك ضمن مكان واحد تصور تم استلام جهاز من مستعير ونريد تسليمه لجهة اخرى سواء كانت ضمن الدائرة او اعارة اخرى .. ستتم العملية حسب طريقتنا بكل يسر

يجب ان يكون السطر الاول هكذا If IsNull(Me.receiveDate) And Not IsNull(Me.users) Then

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

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

بقي شيء يجب ضبطه .. بعد اضافة الصفر في عمود الرقم سيبقى اسم المكتب خالي وحين تنقر على مربع التحرير (المكتب ) في النموذج الفرعي لتختار المكتب سيظهر لك في اسفل القائمة سجل خالي .. وطبعا يجب الا يظهر ومعالجته هو ان تضع معيارا في الاستعلام الذي هو مصدر الصف تحت عمود الاسم العبارة التالية : Not Is Null ارفقت لك المثال بعد التعديل للاطلاع devicesdb4_0.rar

تفضل مثالك بعد التمحيص عدلت على الحقل المذكور بحيث يظهر افتراضيا تاريخ اليوم ومع ذلك يمكنك التعديل عليه لتواريخ سابقة جرب حضور وانصراف موظفينV2011_v030.rar

يمكن اني وجدت ثغرة دعني اتأكد منها شوف لما تعمل تحضير وتظهر مشكلة التاريخ اعد النقر مرة اخرى وشوف هل تختفي المشكلة ؟