Ahmed_J

السلام عليكم برنامج اكثرمن رائع هل يمكن : يكون الشهر30 يوم دائما في كل الاشهر عند :- إضافة خدمة (سنوات/اشهر/ايام) الى تاريخ التوظيف ، خصم مدة (سنوات/اشهر/ايام) من تاريخ التوظيف ، تحياتي

up

up

السلام عليكم لدي ملف لاحتساب الخدمة المضافة للموظف (خدمة عقد او اجر يومي) ... الخ فيه جدولين الجدول الاول معلومات عن الموظف والجدول الثاني فيه فترة المكوث (البقاء) بالسنوات لكل درجة وظيفية يتم مقارنتها بالدرجة الوظيفية في النموذج لاحتساب فترة المكوث. المطلوب: 1- احتساب تاريخ الاستحقاق الجديد : انقاص الخدمة المضافة شهر والخدمة المضافة يوم من تاريخ الاستحقاق السابق بشرط الشهر يكون 30 يوم 2- احتساب الدرجة الجديدة والمرحلة الجديدة: يتم توزيع الخدمة المضافة سنة مثلا (7) سنوات يتم مقارنتها بالدرجة الوظيفية بالنموذج مع الجدول tp2 (اي لوكان الموظف في الدرجة الثامنة نضيف له درجة واحدة وثلاث مراحل وظيفية ) لان فترة مكوثه 4 سنوات فتصبح الدرجة الوظيفية الجديدة = 7 والمرحلة الوظيفية الجديدة =3 (اي يتم توزيعها) تحياتي Test-2.accdb

السلام عليكم كل شيء تمام 100% استاذي العزيز @Foksh شكرا لك على مجهودك الكبير الله يجعلها في ميزان حسناتك استاذي العزيز @ناقل الله يبارك فيك والله يجعلها في ميزان حسناتك استاذ العزيز والكبير @ابوخليل تحية اعتزاز وامتنان لك الله يجعلها في ميزان حسناتك بارك الله فيكم جميعا اخوكم احمد

استاذ @Foksh الله يبارك فيك ويحفظك من كل مكروه والله تعبتك معي كتير لايوجد C فقط A و B الكود تبع استاذ @ابوخليل شغال تمام لكن لايمكن تكرار الدالة DLOOKUP لعشرين مرة اطلع عليه لو احببت ذلك تحياتي Test-1.accdb ابو خليل.accdb

استاذي العزيز نعم هذا هو المطلوب مثلا (A) في النموذج = 3 في الجدزل (TP2) يكون (GradeNO) = 3 والتطابق يكون في (رئيس مهندسين) و (مدير) فقط ااتمنى وصلت الفكرة

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

السلام عليكم استاذ @Foksh تظهر رسالة على كل الاختيارات ان البيانات غير متطابقة Test-1.accdb

السلام عليكم استاذ @Foksh شكرا للمتابعة تظهر رسالة خطا كما في الصورة

السلام عليكم استاذ @ابوخليل شكرا لك الكود شغال تمام ولكن المشكلة هي ان رؤوس الاعمدة كثيرة بحدود 20 وليس فقط txt_h و txt_e هل نكرر الدالة DLookup عشرون مرة ؟ ام هنالك حل آخر ؟ تحياتي

السلام علكم استاذ قاسم @Eng.Qassim ان شاء الله تكون بخير انا اعرف كل هذا وخصوصا انا موظف قديم انا بالاصل في ملف عملي عامل حقل نصي وادخل العنوان الوظيفي بصورة يدوية وادققه مع جدول ورقي للعناوين لكن لدي فكرة هي ان اقوم بعمل جدول في الاكسس لكل العناوين الوظيفية حسب الدرجة والعنوان الوظيفي المعتمد وعندما ادخل اي عنوان وظيفي لاي موظف بصورة يدوية بالنموذج بقوم بالتدقيق مع الجدول الاصلي للعناوين وتظهر رسالة هل العنوان يقع في نفس الدرجة ام لا (يعني مطابق او غير مطابق) هل فهمت قصدي وفكرتي تحياتي

السلام عليكم شكرا لك كثيرا استاذ @ناقل لقد تعبتك معي كثيرا السبب ان هذه الطريقة لاتناسب عملي هو ان بعض الموظفين عندنا يمكن ان تكون درجته بالراتب اعلى من عنوانه الوظيفي هذا ملفي بنفس طريقتك والله فكرة جديدة لسه ماعندي تحياتي Test-1.accdb

UP

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

اساتذتي الاعزاء شكرا لكم استاذ @Foksh يوجد الكثير من العناوين الوظيفية انا اخترت القليل منها لسهولة الامر الكود تبعك يعمل بصورة جيدة على الوظائف الهندسية ولايعمل على الوظائف الادارية استاذ @ناقل يتم تميز ذلك من خلال كتاب التعيين والشهادة الحاصل عليها علما بان لاتهمني العناوين سواء ارقام كانت ام حروف او اي عنوان اخر للحقل تحياتي

السلام عليكم استاذ @ناقل شكرا لك للمتابعة نعم بالضبط (cradeno) هي تساوي الدرجة الوظيفية بالنموذج يعني مثلا يوجد بالدرجة (2) عنوان رئيس مهندسين اقدم و مدير اقدم وهكذا استاذ @Foksh شكرا للمتابعة الملف يعمل فقط على الوظائف الهندسية انا لدي بالاصل عناوين كثيرة والجدول كبير جدا ولا مانع من تغيير طريقة تصميم الجدول لو وجد الحل تحياتي

السلام عليم استاذي العزيز فيه اخطاء لم يجد الا عنوان وظيفي واحد صحيح فقط والكود لايوجد فيه بحث في الجدول tp2 اريد المقارنة بين حقل العنوان الوظيفي في النموج والعناوين الوظيفية في الجدول tp2 تحياتي

السلام عليكم لدي ملف لوصف الوظائف يحتوي على جدولين (الاول) tp1 وفيه معلومات الموظف (الاسم والدرجة) والجدول (الثاني) tp2 فيه الدرجة الوظيفية والعتوان الوظيفي المطلوب: عند تغيير الدرجة الوظيفية في النموذج واختيار عنوان وظيفي جديد من القائمة المنسدلة يجب ان يكون مطابق للعنوان الوظيفي والدرجة الموجودة في الجدول tp2 واظهار رسالة بذلك اما في حالة عدم التطابق اظهار رسالة بوجود خطا (العنوان الوظيفي لايتطابق مع الدرجة) وشكرا Test-1.accdb

السلام عليكم تفضل ويعمل لدي على وندوز 7 Call Shell("osk.exe", 1) keyboard.accdb

السلام عليكم اخي العزيز استبدل كلمة (true) بـ (false) في الكود DoCmd.OutputTo acOutputTable, "Aracestbl", acFormatXLS, filePath, False, , , acExportQualityPrint تحياتي

السلام عليكم بالاضافة لمثال للاستاذ @Foksh ضع الكود التالي بعد التحديث Private Sub Text0_AfterUpdate() Me.Text2 = Year([Text0]) End Sub test.accdb

السلام عليكم اخي @زياد الحسناوي لاحظت انك غير مستقر على برنامج معين؟ اتمنى ان تضع ملفك الخاص هنا ونعمل عليه بالنسبة للارشفة الالكترونية انا اعمل عليها منذ سنوات وطريقتي بالعمل سابقا كالاتي: اقوم بحفظ الملف بالحاسوب ومن ثم اقوم بنقله لقاعدة البيانات - اذا كان الملف المراد ارشفته كتاب واحد اقوم بحفظه صورة jpg - اذا كان الملف به مرفقات اقوم بحفظه pdf علما اني احفظ الكتاب رقم الكتاب+ تاريخه+ موضوع الكتاب+وصف للكتاب حتى لايتكرر عندي استخدمت حاليا برنامج وسيط (irfanview)) ليقوم بعمل سكانر مباشرة لقاعدة البيانات بمساعدة الاستاذ الفاضل @ابوخليل جزاه الله خير الجزاء انتظر ردك تحياتي

السلام عليكم اخي زياد انا ماعندي سكنر حاليا 1- لانشاء فولدر انا وضعته عند فتح الموذج pdf Dim xFolder Set xFolder = CreateObject("Scripting.FileSystemObject") If xFolder.FolderExists(CurrentProject.Path & "\archives") = True Then Me.Undo Else 'انشاء مجلد MkDir CurrentProject.Path & "\archives\" End If 2- هذا الكود شغال عندي تمام لاضافة صور او صورة واحدة من الماسح الضوئي اضفت اليه المسار ورقم وتاريخ الكتاب اللي عندك Shell ("c:\Program Files\irfanview\i_view32.exe /batchscan=(" & ID & "_" & Date_Boolk & ",,,,," & temp_scan_path & " ,pdf,1) /scanhidden") جربه واخبرني بالنتيجة

السلام عليكم شكلرا لك استاذ @ابوخليل تعبتك معي كثيرا ان شاء الله لو وصلت لحل ساضعه هنا الفكرة جدا عجبتني ببرنامج الارشفة الالكترونية (exe) لكن لااعرف باي لغة معمول هو برنامج تنصيب المهم لسه عند طلبي عمل نموذج كما في الصورة لضبط اعدادات الماسح الضوئي تحياتي