al.sheen2000 قام بنشر ديسمبر 11, 2017 قام بنشر ديسمبر 11, 2017 السلام عليكم ورحمة الله وبركاته تحية مباركة للجميع اذكان عندي تاريخ معين واريد ان يعطيني التاريخ التاريخ المخزن التاريح المطلوب ايجاده 25/5/2017 28/5/2017 1/3/2017 28/3/2017 28/6/2017 28/7/2017 30/4/2017 28/4/2017 اشكر الجميع
Shivan Rekany قام بنشر ديسمبر 12, 2017 قام بنشر ديسمبر 12, 2017 19 ساعات مضت, al.sheen2000 said: السلام عليكم ورحمة الله وبركاته تحية مباركة للجميع اذكان عندي تاريخ معين واريد ان يعطيني التاريخ التاريخ المخزن التاريح المطلوب ايجاده 25/5/2017 28/5/2017 1/3/2017 28/3/2017 28/6/2017 28/7/2017 30/4/2017 28/4/2017 اشكر الجميع حسب ما ورد في مثالك انك تريد ان يعطيك يوم 28 من نفس الشهر ونفس السنة الا اذا كان يوم تاريخ المخزن بيكون 28 تريد ان يعطيك 28 للشهر بعده هل انا فهمت من طلبك ام تريد شيء اخر
Shivan Rekany قام بنشر ديسمبر 12, 2017 قام بنشر ديسمبر 12, 2017 11 ساعات مضت, al.sheen2000 said: نعم هذا اللذي اقصده اتفضل اليك هذا الكود Private Sub Text0_AfterUpdate() If Day(Me.Text0) = 28 Then Me.Text2 = DateAdd("m", 1, Me.Text0) Else Me.Text2 = 28 & Format(Me.Text0, "/MM/YYYY") End Sub 1
al.sheen2000 قام بنشر ديسمبر 12, 2017 الكاتب قام بنشر ديسمبر 12, 2017 اشكرك اخي الفاضل هل ممكن يصير هذا الكود ضمن الاستعلام
Shivan Rekany قام بنشر ديسمبر 12, 2017 قام بنشر ديسمبر 12, 2017 11 ساعات مضت, al.sheen2000 said: هل ممكن يصير هذا الكود ضمن الاستعلام بكل تأكيد لكن بتغير بسيط IIf(Day([Text0]) = 28 ; DateAdd("m"; 1; [Text0]) ; 28 & Format([Text0]; "/MM/YYYY")) Text0 هو اسم حقل اللي فيه تاريخ واذا ما عرفت ان تطبق ارفع نسخة من قاعدة بياناتك للتعديل عليه 1
al.sheen2000 قام بنشر ديسمبر 12, 2017 الكاتب قام بنشر ديسمبر 12, 2017 سوف احاول واذا صعب عليه رفعت الملف لك مني جزيل الشكر
al.sheen2000 قام بنشر ديسمبر 12, 2017 الكاتب قام بنشر ديسمبر 12, 2017 اخي الفاضل هذا القاعدة وهناك استدراك لموضوع اخر سجل في الجدول اذا كان التاريخ اكبر من يوم 28 في الشهر الحالي يعطيني 28 في الشهر التالي 30/4/2017 يعطي 28/5/2017 اشكككككككككككككككرك db1.rar
Shivan Rekany قام بنشر ديسمبر 14, 2017 قام بنشر ديسمبر 14, 2017 في 12/12/2017 at 13:17, al.sheen2000 said: وهناك استدراك لموضوع اخر سجل في الجدول اذا كان التاريخ اكبر من يوم 28 في الشهر الحالي يعطيني 28 في الشهر التالي 30/4/2017 يعطي 28/5/2017 الكود صار هكذ Expr1: IIf(Day([date1])>=28;28 & Format(DateAdd("m";1;[date1]);"/mm/yyyy");28 & Format([date1];"/mm/yyyy")) db1.rar 1
al.sheen2000 قام بنشر ديسمبر 14, 2017 الكاتب قام بنشر ديسمبر 14, 2017 (معدل) اخي الفاضل اشكرك على مجهودك معاي هنا في الملف المرفق معطيني شهر 12 وشهر 12 لم نوصل فيه الى بوم 28 معنى ذلك لا اريد يعطيني الشهر الذي يتجاوز تاريخ الجهاز اطلع على اخر سجل حيث اخر تاريخ 28/12/2017 وتاريخ الجهاز 15/12/2017 تحياتي db1.rar تم تعديل ديسمبر 14, 2017 بواسطه al.sheen2000
al.sheen2000 قام بنشر ديسمبر 18, 2017 الكاتب قام بنشر ديسمبر 18, 2017 (معدل) اخي الفاضل اشكرك على مجهودك معاي هنا في الملف المرفق معطيني شهر 12 وشهر 12 لم نوصل فيه الى بوم 28 معنى ذلك اريد لايعطيني الشهر الذي يتجاوز تاريخ الجهاز اطلع على اخر سجل تحياتي للرفع فضلا تم تعديل ديسمبر 18, 2017 بواسطه al.sheen2000
Shivan Rekany قام بنشر ديسمبر 19, 2017 قام بنشر ديسمبر 19, 2017 18 ساعات مضت, al.sheen2000 said: هنا في الملف المرفق معطيني شهر 12 وشهر 12 لم نوصل فيه الى بوم 28 معنى ذلك اريد لايعطيني الشهر الذي يتجاوز تاريخ الجهاز اذن غير الكود الى هذا IIf([date1]>=Date();[date1];IIf(Day([date1])>=28;28 & Format(DateAdd("m";1;[date1]);"/mm/yyyy");28 & Format([date1];"/mm/yyyy"))) db1 (1).rar 1
al.sheen2000 قام بنشر ديسمبر 19, 2017 الكاتب قام بنشر ديسمبر 19, 2017 اخي الفاضل لا اريد يعطيني شهر 12 لان شهر 12 لم نصل فيه الي يوم 28 امل منك التعديل اشكككككككككككككككككككرك
Shivan Rekany قام بنشر ديسمبر 20, 2017 قام بنشر ديسمبر 20, 2017 في 12/19/2017 at 14:04, al.sheen2000 said: لا اريد يعطيني شهر 12 لان شهر 12 لم نصل فيه الي يوم 28 امل منك التعديل اشكككككككككككككككككككرك اذا تريد ان يعطيك اي بدل شهر 12 ؟ هل تريد ان يعطيك تاريخ اليوم ؟ اذا نعم اليك هذا Expr1: IIf([date1]>=Date();[date1];IIf(Month([date1])=Month(Date());Format(Date();"dd/mm/") & Year([date1]);IIf(Day([date1])>=28;28 & Format(DateAdd("m";1;[date1]);"/mm/yyyy");28 & Format([date1];"/mm/yyyy")))) والا اشرح لي بالتفصيل ماذا تريد بالامثلة db1 (1).rar
al.sheen2000 قام بنشر ديسمبر 20, 2017 الكاتب قام بنشر ديسمبر 20, 2017 (معدل) اخي الفاضل اتعبتك معايه تحملني هذا مثال لتاريخ المخزن التاريح المطلوب ايجاده 25/5/2017 28/5/2017 1/3/2017 28/3/2017 28/6/2017 28/7/2017 30/4/2017 28/4/2017 21/12/2017 هو الان يعطيني 28/12/2017 واريده يعطي 28/11/2017 ----------------- ( هذا التاريخ اللذي يوجد فيه مشكلة ) ---------------------------------------------------------------------------- اذا لم يكتمل الشهر يوم 28 يعطني الشهر 28 من الشهر الماضي انظر الى اخر تاريخ تاريخ اليوم هو 21/12/2017 الواجب يعطي تاريخ 28/11/2017 علما ان معادلة الأربع تواريخ الاولي صحيحية المشكلة في اخر تاريخ . الف شكررر db1.rar تم تعديل ديسمبر 20, 2017 بواسطه al.sheen2000
Shivan Rekany قام بنشر ديسمبر 21, 2017 قام بنشر ديسمبر 21, 2017 (معدل) Expr1: IIf(Month([date1])=Month(Date());28 & "/" & Month([date1])-1 & "/" & Year([date1]);IIf(Day([date1])>=28;28 & Format(DateAdd("m";1;[date1]);"/mm/yyyy");28 & Format([date1];"/mm/yyyy"))) db1 (1).rar تم تعديل ديسمبر 21, 2017 بواسطه Shivan Rekany
al.sheen2000 قام بنشر ديسمبر 21, 2017 الكاتب قام بنشر ديسمبر 21, 2017 2 ساعات مضت, Shivan Rekany said: فضلا اكتب الكود في القاعدة مازال يعطيني تاريخ اليوم وليس 28/11/2017
al.sheen2000 قام بنشر ديسمبر 21, 2017 الكاتب قام بنشر ديسمبر 21, 2017 11 ساعات مضت, Shivan Rekany said: IIf([date1]>=Date();[date1];IIf(Month([date1])=Month(Date());28 & "/" & Month([date1])- اشكرك جزيل الشكر
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.