اختلاف ساعت در اکسس
سوال :
چطوری دراکسس اختلاف دو تا ساعت را بدست بیاوریم؟ و فرمت را چه نوعی تنظیم کنیم و چه کدی بنویسیم که مثلا اختلاف ساعت بین 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
مطالب مرتبط
شرط گذاری در سلول های اکسل با گزینه Conditional Formatting رنگی کردن سطر و سلول و ستون های اکسل با استفاده از منوی فرمتینگ تب Style پنجره Conditional formating rules manager آموزش اکسل Excel Learning
2016, Friday, 05, Feb
ذخیره فایل ورد به پی دی اف PDF سیو به پی دی اف Save to pdf تبدیل ورد به پی دی اف Convert Word To PDf چطور می توان فایل ورد را به پی دی اف ذخیره کنم تا بتوان با نرم افزار Adobe Acrobat Reader باز کرد؟ پلاگین SaveToPDF پی دی اف
2013, Friday, 07, Jun
پاس دادن مقدار یک فیلد از فرم اول به فیلدی در فرم دوم در اکسس دراکسس 2010 بر روی فرم" navigation "دو فرم را باز کرده ام میخواهم دکمه ای ایجاد کنم که با کلیک بر روی آن محتویات یک فیلد از فرم اول در فیلدی از فرم دوم درج شود
2013, Friday, 25, Oct
چگونه می توانم برای سند ورد حاشیه گذاری کنم؟ border in word ویرایش متن در سند ورد تنظیم حاشیه و چیدمان در ورد تب Page Layout Page Background گزینه Page Borders
2012, Wednesday, 28, Nov
غیر فعال کردن رویداد کلیک بر روی اسلایدهای ارائه پاورپوینت On Mouse Click هایپرلینک باز کردن اسلایدها از منوی Transition و سپس تب Timing برای همه اسلاید ها یا اسلایدهای مورد نظر خود تیک گزینه On Mouse Click را بردارید
2015, Sunday, 13, Dec
