محمد التميمي قام بنشر أغسطس 13, 2021 مشاركة قام بنشر أغسطس 13, 2021 (معدل) السلام عليكم محتاج كود يعمل كالاتي في النموذج مربعين نص الاول باسم (العنوان الوظيفي الحالي) الثاني باسم (العنوان الوضيفي السابق) المطلوب عند ادراج عنوان في مربع النص الاول يقوم الكود بحذف العنوان الموجود في مربع النص الثاني New.accdb تم تعديل أغسطس 13, 2021 بواسطه محمد التميمي رابط هذا التعليق شارك More sharing options...
أفضل إجابة د.كاف يار قام بنشر أغسطس 13, 2021 أفضل إجابة مشاركة قام بنشر أغسطس 13, 2021 تفضل التعديل في حدث بعد التحديث ضع التالي [TexBox1]=Null New.accdb 2 رابط هذا التعليق شارك More sharing options...
محمد التميمي قام بنشر أغسطس 13, 2021 الكاتب مشاركة قام بنشر أغسطس 13, 2021 14 دقائق مضت, د.كاف يار said: تفضل التعديل في حدث بعد التحديث ضع التالي [TexBox1]=Null احسنت اخي الغالي سلمت يداك من كل مكروه ما خطرت على بالى ولاكن كتبت هذا الكود ولم يعمل If [Firstwork] = Value Then Me.Lastwork = Null End If رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر أغسطس 13, 2021 مشاركة قام بنشر أغسطس 13, 2021 1 hour ago, محمد التميمي said: احسنت اخي الغالي سلمت يداك من كل مكروه ما خطرت على بالى ولاكن كتبت هذا الكود ولم يعمل If [Firstwork] = Value Then Me.Lastwork = Null End If ضعه في حدث الحالي للنموذج وجربه رابط هذا التعليق شارك More sharing options...
محمد التميمي قام بنشر أغسطس 13, 2021 الكاتب مشاركة قام بنشر أغسطس 13, 2021 السلام عليكم ممكن تعديل على الكود في نموذج Form في حدث في الحالي بحيث يصبح الكود (اذا كان مربع النص Firstwork يحتوي على قيمة ، فمربع النص Lastwork يكون فارغ ) شكراً New.accdb رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر أغسطس 13, 2021 مشاركة قام بنشر أغسطس 13, 2021 1 hour ago, محمد التميمي said: السلام عليكم ممكن تعديل على الكود في نموذج Form في حدث في الحالي بحيث يصبح الكود (اذا كان مربع النص Firstwork يحتوي على قيمة ، فمربع النص Lastwork يكون فارغ ) شكراً New.accdb 704 kB · 0 downloads افضل طريقة ..طريقة د.كاف يار فقد جربتها بعدة طرق لم تنجح Private Sub Firstwork_AfterUpdate() Me.Lastwork = Null End Sub 1 رابط هذا التعليق شارك More sharing options...
محمد التميمي قام بنشر أغسطس 13, 2021 الكاتب مشاركة قام بنشر أغسطس 13, 2021 (معدل) 1 ساعه مضت, Eng.Qassim said: افضل طريقة ..طريقة د.كاف يار فقد جربتها بعدة طرق لم تنجح Private Sub Firstwork_AfterUpdate() Me.Lastwork = Null End Sub طريقة د.كاف يار نجحت في المثال المرفق ولاكن لم تنجح في قاعدة البيانات لدي ولا اعرف ما السبب ( نصف العلم لا اعلم ) ولاكن توصلت الى حل والحمد لله وضعت Me.Lastwork = Null مع كود زر حفظ وتحديث ومشي الحال وعملت بامتياز شكراً جزيلاَ للمرور والمتابعة تم تعديل أغسطس 13, 2021 بواسطه محمد التميمي رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر أغسطس 13, 2021 مشاركة قام بنشر أغسطس 13, 2021 22 minutes ago, محمد التميمي said: طريقة د.كاف يار نجحت في المثال المرفق ولاكن لم تنجح في قاعدة البيانات لدي ولا اعرف ما السبب ( نصف العلم لا اعلم ) اخي العزيز .. الكود يعمل بشكل جيد .. لكن اسمح لي ان اعترض على تفاصيل نموذجك .. ولنناقش الموضوع سوية المفروض ان النموذج يخص الدرجة الوظيفية للموظفين .. ولكل موظف صفحة خاصة بدرجاته الوظيفية .. لناخذ مثلا جدول المهندسين .. ..يبدأ العنوان الوظيفي عند التعيين (م.مهندس) اي ان عنوانه الحالي والسابق (م.مهندس).. وبعد 5 سنوات يصبح عنوانه الوظيفي (مهندس) والعنوان السابق (م.مهندس).. وبعد 5 سنوات يصبح عنوانه الوظيفي (م.اقدم) والعنوان السابق (مهندس ) الخ وهذا موضوع مهم في تسجيل تواريخ منح الترفيع للموظف .. بينما انت تريد ان تمسح وظيفته السابقة وتضع وظيفته الحالية .. وهذا خطأ ياريت تعرض مطلبك الحقيقي .. فاحيانا المبرمج لايفهم بالامور الادارية لشؤون الموظفين رابط هذا التعليق شارك More sharing options...
محمد التميمي قام بنشر أغسطس 13, 2021 الكاتب مشاركة قام بنشر أغسطس 13, 2021 8 دقائق مضت, Eng.Qassim said: ياريت تعرض مطلبك الحقيقي .. اولاً اعتقد ان شكرتك لاكن انت لم ترد علية كلمة الشكر ثانياً ليس من الصواب ان تعرض اسرار الدولة على الانترنيت ثالثاً انا رفعت ملف افتراضي يعني المعلومات فيه غير صحيحة مجرد كلام بخلاف ما موجود لدي انتهى يرجى عدم الرد رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر أغسطس 13, 2021 مشاركة قام بنشر أغسطس 13, 2021 16 minutes ago, محمد التميمي said: اولاً اعتقد ان شكرتك لاكن انت لم ترد علية كلمة الشكر ثانياً ليس من الصواب ان تعرض اسرار الدولة على الانترنيت ثالثاً انا رفعت ملف افتراضي يعني المعلومات فيه غير صحيحة مجرد كلام بخلاف ما موجود لدي انتهى يرجى عدم الرد هههههههههه... احاول مساعدته فيقول لي اسرار مالي ومال اسرارك .. انا جئتك بمثال وهذا موجود في كل العالم وليس سرا بس مو صوجك مع احترامي للمنتدى رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر أغسطس 13, 2021 مشاركة قام بنشر أغسطس 13, 2021 بشرفك انت مو بشرفك رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان