استفسار بخصوص التاريخ

[ازهر عبد العزيز]

السلام عليكم ......

لو كانت الدالة 

date()-20

تمثل تاريخ اليوم قبل عشرون يوما فكيف  لو اردنا اظهار التاريخ من بداية السنة الحالية 

تم تعديل مايو 18, 2020 بواسطه ازهر عبد العزيز

[kanory]

جرب كده ربما هو المطلوب

= DateSerial(Year(Date), 1, 1)

 

[jjafferr]

 

وعليكم السلام 🙂

 

اخذت لك هذا الكود من مساعد الاكسس ، ممكن تفيدك في امور اخرى :

How to: Calculate and Display Specific Date Values 

Because a Date value is stored as a double-precision number, 
you may receive incorrect formatting results when you try to manipulate Date values in an expression. 
This topic illustrates how to create expressions and custom functions 
for displaying specific dates and calculating time intervals. 

Displaying Specific Dates
  
The current month: 
DateSerial(Year(Date()), Month(Date()), 1) 

The next month: 
DateSerial(Year(Date()), Month(Date()) + 1, 1) 

The last day of the current month: 
DateSerial(Year(Date()), Month(Date()) + 1, 0) 

The last day of the next month: 
DateSerial(Year(Date()), Month(Date()) + 2, 0) 

The first day of the previous month: 
DateSerial(Year(Date()), Month(Date())-1,1) 

The last day of the previous month: 
DateSerial(Year(Date()), Month(Date()),0) 

The first day of the current quarter: 
DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 1, 1) 

The last day of the current quarter: 
DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 4, 0) 

The first day of the current week (assuming Sunday = day 1):
Date() - WeekDay(Date()) + 1 

The last day of the current week: 
Date() - WeekDay(Date()) + 7 

 

جعفر

[kha9009lid]

هل تقصد انك تريد حساب عدد الايام من بداية العام حتى تاريخ اليوم

اذا كان فهمي صحيح جرب التالي

=Date()-DateSerial(Year(Date());1;1)

 

اعتذر اساتذتي

@kanory و @jjafferr

لم اشاهد ردودكم كنت اكتب اوف لاين 🌹

[kanory]

12 دقائق مضت, kha9009lid said:

هل تقصد انك تريد حساب عدد الايام من بداية العام حتى تاريخ اليوم

اذا كان فهمي صحيح جرب التالي

=Date()-DateSerial(Year(Date());1;1)

 

اعتذر اساتذتي

@kanory و @jjafferr

لم اشاهد ردودكم كنت اكتب اوف لاين 🌹

بالعكس اخي خالد .... بارك الله فيك رمضان كريم أستاذ @jjafferr و أستاذ @kha9009lid

[jjafferr]

بمناسبة كلامك اخوي خالد ، بوضع اكثر من مشاركة في الموضوع ،

كنت افكر اعمل موضوع ، ونطلب من كل عضو يحل الموضوع بطريقة تختلف 🙂

 

فأنا اعتبر البرمجة مثل الطبخ (مع اني ما اعرف اطبخ 🙂 ) ، ممكن تعمله بعدة طرق 🙂

 

ايش رأيك ؟

شوف لنا موضوع ، والميدان يا حميدان 🙂

 

وللعلم ، اذكر في احد المنتديات الاجنبية لما كنت اشارك فيها ،

صاحب السؤال شرح طلبه بعدة اسطر ، وواحدة من الاعضاء المحترفات ردت على سؤاله بسطر واحد ،

وانا من باب المزاح ، قمت بحل المسألة بعدة خطوات ، وقلت لها حرام عليك ، صاحب السؤال حط سؤاله بعدة اسطر ، بينما جوابك سطر واحد !!

واذا بصاحب السؤال ينقر على مشاركتي كأفضل جواب !!

قلت له يا رجال انا جوابي كان مزاح ، والجواب الافضل هو للعضوه ، فرد عليّ: انا احصل اجرتي بعدد الاسطر اللي ابرمجها ، فكلما زادت الاسطر ، زاد اجري 

لهذا السبب دائما اقول :

اقتباس

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

 

رمضان كريم علينا جميعا ان شاء الله ، ولا تنسونا في دعائكم في هذه الليالي المباركة 🙂

 

جعفر

[kha9009lid]

اخي واستاذي @jjafferr

اولا العين لا تعلى على الحاجب وانت الاستاذ ونحن تلاميذكم

ندخل للموضوع الفكرة جميلة و تستحق التجربة

الحقيقة بعض الردود تبهرني والبعض منها يدفعني للسؤال ليش مافكرت بهذا الحل مع انه بديهي

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

اقتباس

 

وايضا رد لاستاذنا الفاضل @أبو إبراهيم الغامدي اضحكني كثيرا واختصر عدة مشاركات في الموضوع والحل ايضا بسيط وبديهي

اقتباس

 

وغيرها الكثير مما لا يتسع المجال لذكره

بالنسبة لي غالبا افضل استخدام مربعات النص غير المنضمة على كتابة كود طالما يؤدي للنتيجة المطلوبة وربما يعود الامر الى ان بداياتي كانت مع نظام التشغيل دوس وقاعدة داتابيس 2

تعدد الحلول امر ايجابي ويخضع لنظرة المبرمج للمشكلة ودائما هناك حل وحل افضل

وللعلم انا اجيد الطبخ وظهرت المواهب بشكل جلي في زمن الكورونا بسبب العزوف عن اكل المطاعم

في النهاية كل عام وانتم بخير تقبل الله منا ومنكم صالح الاعمال

 

[kha9009lid]

1 ساعه مضت, kanory said:

بالعكس اخي خالد .... بارك الله فيك رمضان كريم

علينا وعليك اخي الحبيب وكل عام وانتم بخير تقبل الله منا ومنكم صالح الاعمال

[ازهر عبد العزيز]

ماشاء الله .... اساتذتي المبدعين @kanory   , @jjafferr    ,   @kha9009lid حفظكم الله من كل مكروه وزادكم خير وبركة