چطور اختلاف ساعت را در اکسس محاسبه کنیم؟
سوال :
چطوری دراکسس اختلاف دو تا ساعت را بدست بیاوریم؟ و فرمت را چه نوعی تنظیم کنیم و چه کدی بنویسیم که مثلا اختلاف ساعت بین 11 تا 12 محاسبه شود؟
پاسخ :
نوع فیلد زمان یا تاریخ باید Date/Time انتخاب شود و فرمت زمانی بصورت 00:00:00 و برای بدست آوردن اختلاف زمان از دستور DateDiff استفاده می گردد
بطور مثال در جدول دلخواه فیلدهایی با نام Time1 و Time2 با توع داده ای Date/Time ایجاد می کنیم و زمانهای مورد نیاز را ثبت می کنیم و سپس برای محاسبه اختلاف این زمان ها باید یک Query ایچاد نمائید و به جز فیلدهای اصلی فیلدهایی با نام DiffH به منظور ستون اختلاف ساعت و DiffM به منظور ستون اختلاف دقیقه و DiffS به منظور ستون اختلاف ثانیه ایجاد می کنید و تابع های زیر را به ترتیب ستون های ایجاد شده تایپ می کنیم
دستور اختلاف ساعت :
DiffH: DateDiff('h';[time1];[time2])
دستور اختلاف دقیقه :
DiffM: DateDiff('n';[time1];[time2])
دستور اختلاف ثانیه :
DiffS: DateDiff('s';[time1];[time2])
و برای درک بهتر مطلب می توانید مثال فوق را در قالب فایل اکسس البته قابل اجرا در نسخه 2013 از اینجا دانلود نمائید
پسورد فایل : www.farsimeeting.com
پسورد فایل : www.farsimeeting.com
نظرات و پاسخ ها
محمد عامری نوشته :
سلام به نظرم اين جواب راه حل مناسبي نيست چون اختلاف دقيق رو محاسبه نمي كنه بنده روش بسيار ساده اي رو خدمتتون با مثال عرض مي كنم كه ممكنه كار خيلي ها رو راه بندازه .
مرحله اول : فرض كنيد ما يك جدول داريم به اسم tbl و دو فيلد براي ذخير ساعت كه حتما بايد از نوع date/Time باشند و فرمتشون روي ShortTime ذخيره شده باشه اسم اين دو فيلد رو مي زاريم Enter و Exit حالا ما يك جدول داريم كه زمان رو در دو فيلد ذخيره مي كنه .
مرحله دوم : يك كوئري مي سازيم از جدول مورد نظرمون .
مرحله سوم : حالا ما در كوئري دو فيلد داريم با نام هاي Exit و Enter خب كاري كه ما بايد بكنيم اينه كه 3 تا فيلد جديد بسازيم كه يكي ساعت ورود رو كنترل كنه يكي ساعت خروج رو و يكي هم اختلاف رو محاسبه كنه .من اسم كنترل ساعت ورود رو ميزارم EnterCon اسم كنترل ساعت خروج رو ميزارم ExitCon و فيلد محاسبه اختلاف ميزارم Sum
مرحله چهارم : داخل قسمت فيلد كه همون اسم فيلد رو مي خوايم بنويسيم به اين شكل مي نويسيم :فيلد اول :EnterCon: IIf(Hour(tbl.Enter)<12;0;1)فيلد دوم :ExitCon: IIf(Hour(tbl.Exit)<12 And [EnterCon]=1;1;0)فيلد سوم :sum: IIf([ExitCon]=0;[Enter]-[Exit];([Enter]-CDate(12))-([Exit]+CDate(12)))حالا بعد از اجراي كوئري متوجه اعمال تغييرات خواهيم شد
شراره نوشته :
فرمول ها رو چطور پنهان کنم؟
محمد جواد نوشته :
ممنون از برنامه
صفحه 1 از 1
مطالب مرتبط
چگونه می توانم برای سند ورد حاشیه گذاری کنم؟ border in word ویرایش متن در سند ورد تنظیم حاشیه و چیدمان در ورد تب Page Layout Page Background گزینه Page Borders
2012, Wednesday, 28, Nov
من ویندوز xp داشتم که به ویندوز 7 تغییر دادم و از اون به بعد پرینترم کار نمی کنه در صورتی که دستگاه پرینتر رو چک کردم و سالم هست Windows 7 ویندوز XP ویندوز Seven درایور پرینتر نصب درایور
2013, Tuesday, 21, May
روش ترکیب کردن متن انگلیسی با ترجمه فارسی اجرای ماکر برنامه نویسی VBA فرمت دارای قابلیت اجرای Macro ایجاد Madual ماژول اجرای کد ترکیب سطرهای دو فایل ورد فایل اکسل comine rows in excell
2013, Wednesday, 24, Jul
کاربر گرامی سوالات خود را در زمینه نرم افزارهای ورد اکسل اکسس پاورپوینت اینترنت و سیستم عامل ویندوز از منوی تماس با ما ارسال نمائید، تا در اولین فرصت پاسخ داده شود pasokh be soalat
2012, Friday, 15, Jun
غیر فعال کردن رویداد کلیک بر روی اسلایدهای ارائه پاورپوینت On Mouse Click هایپرلینک باز کردن اسلایدها از منوی Transition و سپس تب Timing برای همه اسلاید ها یا اسلایدهای مورد نظر خود تیک گزینه On Mouse Click را بردارید
2015, Sunday, 13, Dec
