PDA

View Full Version : مبتدی: کمک در جمع ساعت در اکسس



elham8406
پنج شنبه 03 دی 1388, 22:46 عصر
دوستان سلام ايام محرم بر همه تسليت باد و اميدوارم عزاداري هاي شما مورد قبول حق باشد.
من يه جدول دارم مي خوام از اين جدول گزارش تهيه کنم توي اين جدول يه فيلد دارم با اسن tidf که اختلاف زمان ورود و زمان خروج شخص را نشان مي دهد حالا براي گزارش ماهانه مي خواهم جمع ساعات حضور (tidf) را به من نشان دهد يعني اين فيلد را جمع بزند اگه ممکنه کمکم کنيد در ضمن فرمت اون به صورت شورت تايم (00:00) است.
با تشکر.

elham8406
جمعه 04 دی 1388, 07:16 صبح
سلام کسي نبود کمک کنه؟
خيلي نياز دارم.

elham8406
جمعه 04 دی 1388, 09:16 صبح
سلام اگه کسي پيدا شد کمک کنه لطفا يه فايل معرفي کنه که توابع اکسس مثل iif,count,sum و .... را نيز توضيح داده باشد.
با تشکر

mehdi_fiz
جمعه 04 دی 1388, 09:28 صبح
سلام دوست عزیز

اگه جستجو می کردید زودتر به نتیجه می رسیدید

این هم لینک پاسخ سوال اول شما

http://barnamenevis.org/forum/showpost.php?p=438057&postcount=20

برای سوال دوم هم از راهنمای خود اکسس کمک بگیرد

موفق باشید

elham8406
جمعه 04 دی 1388, 13:10 عصر
راهنماي فارسي مي خوام
مثلا توضيح داده باشه آيا توي هر تابعي ميشه از کوئري استفاده کرد يا حتما بايد جدول باشه مثلا در تابع Dcount دومين آن مي تونه کوئري هم باشه؟

elham8406
جمعه 04 دی 1388, 13:14 عصر
در مورد اون مسيري که داديد کار نميکنه
من مي خواهم در يک گزارش که بين دو تاريخ و از ساعت معين تا ساعت معيني نمايش داده ميشه (سورس اون کوئري هست) يه فيلد که اختلاف دو ساعت رو در خودش ذخيره کرده و به صورت 00:00 هست را جمع بزنه وقتي من اين تابع رو توي يه تکست باکس ذخيره ميکنم و توي کنترل سوروس اون تکست باکس اين تاع رو ميارم برايم جمع نمي زنه چرا؟



Function GetTimeRoozanehTotal()
Dim db As Database, rs As Recordset
Dim totalhours As Long, totalminutes As Long
Dim days As Long, Hours As Long, Minutes As Long
Dim interval As Variant, j As Integer

Set db = DBEngine.Workspaces(0).Databases(0)
Set rs = db.OpenRecordset("TimeRoozaneh")
interval = #12:00:00 AM#
'
While Not rs.EOF
interval = interval + rs![Roozaneh]
rs.MoveNext
Wend
totalhours = Int(CSng(interval * 24))
totalminutes = Int(CSng(interval * 1440))
Hours = totalhours Mod 24
Minutes = totalminutes Mod 60
' در صورتیکه مایل به استفاده عبارات ساعت و دقیقه هستید خط زیر رو فعال کنید
' GetTimeRoozanehTotal = totalhours & " ساعت و " & Minutes & " دقیقه"
GetTimeRoozanehTotal = totalhours & ":" & Minutes
End Function

مهدی قربانی
جمعه 04 دی 1388, 13:36 عصر
سلام
نمونه فایل رو اینجا بذارید .

elham8406
شنبه 05 دی 1388, 16:41 عصر
ببخشيد خودم يه کارهايي کرده ام ولي اين فيلد من از نوع تکست هست من با تابع لفت و رايت دو عدد را برمي گردانم و بعد جمع مي کنم حالا يه مشکل دارم بعضي از فيلدها ساعت اونه سه رقمي است مثلا 117:20 اين رو چه کار کنم چون با تابع لفت که بر مي گردونم فقط 11 اون مياد و اگر بخوام 117 بياد براي بقيه فيلها اينطوري ميشه :10 که اين هم به مشکل مي خورم چون نميشه جمعشون کرد تابعي که بتونم اين فيلد تکست رو به فيلد زمان تبديل کنم يعني 11:10 که از نوع تکست ميشناسه توي يه فيلد ديگه با نوع زمان بشناسه کسي بلد هست اين نوع تابع رو؟

elham8406
شنبه 05 دی 1388, 18:14 عصر
سلام دوستان فعلا مشکلم حل با تابع val و right حلش کردم. اگه باز مشکل داشتم از شما دوستان مي پرسم.

elham8406
سه شنبه 08 دی 1388, 07:29 صبح
سلام دوستان ببخشيد دوباره مزاحم مي شوم يه سوال ديگه دارم از خدمت دوستانو اون اينکه
فرض کنيد من يک گزارش بر پايه يک کوئري درست کردم حالا مي خواهم طوري چک باکس درست کنم که با جدولي که گروههاي من در آن قرار دارند همخواني داشته باشد يعني اگر من 5 گروه داشته باشم فقط 5 چک باکس داشته باشم که بتونم هر کدوم که تيک داشت در کوئري من بيايد و موقع باز شدن فرم هم همه تيک هاي چک باکس ها برداشته شده باشه.يا يه دستوري که بتونم موقع باز شدن فرم همه تيک هاي چک باکس هاي يک جدول را بردارم.
انشاالله که متوجه شده باشيد.

mehdi_fiz
سه شنبه 08 دی 1388, 08:13 صبح
سلام دوست عزیز

اگه ممکنه یه نمونه فایل اینجا بذارید تا دوستان بتونن کمکتون کنند

موفق باشید

elham8406
پنج شنبه 10 دی 1388, 19:40 عصر
سلام دوستان سوال قبل من رو هم اگه ممکنه جواب بدهيد.
حالا يه سوال ديگه دارم . اون اينکه که:
من يه فيلد تاريخ دارم و يک فيلد ساعت فرمت آنها به اين صورته :10/10/88 و 12:25
حالا من مي خواهم يه دستوري بنويسم که بتونه تاريخ هارو به اين صورت ک.ئري بگيره مثلا از ساعت 22:00 مورخه 08/10/88 تا ساعت 06:00 مورخه 10/10/88 .
البته بگم از تابع between استفاده کردم و جواب نداد لطفا کمک کنيد .

elham8406
جمعه 11 دی 1388, 08:24 صبح
ببخشيد حجم فايل من حدود 350 مگ است و نمي تونم اينجا بزارم در ضمن تيبل هاي اون هم از اس کيو ال لينک شده اند.حالا اگه ممکنه هميجوري کمک کنيد هم سوالات قبل رو جواب بدهيد و هم اگه ممکنه اين سوال من رو که :من دو تاريخ دارم هم به صورت 10/08/88 ، 21:45 (تاريخ توي يه فيلد جدا و ساعت هم توي يه فيلد جداگانه) و هم به اين صورت 8808102145 حالا مي خواهم براي من اختلاف دو تاريخ و ساعت اونها رو در بياره و به دقيقه به من بدهد يا به ساعت چه کار بايد بکنم؟مثلا اختلاف اين دو تاريخ (08/10/88، 00:00 و 09/10/88 ، 00:00) رو به من به اين صورت بدهد مثلا 24 ساعت يا 1440 دقيقهاميدوارم منظورم رو رسونده باشم با تشکر.

elham8406
جمعه 11 دی 1388, 17:44 عصر
تو رو خدا کممممممممک کنيد.

مهدی قربانی
جمعه 11 دی 1388, 20:21 عصر
سلام
لزومی نداره کل بانک رو بذارید ، یک کپی از برنامه تهیه کنید اطلاعات و آبجکتهای غیر ضروری رو حذف کنید و بعد فایل رو Compact & Repair کنید .