Showing posts with label Time. Show all posts
Showing posts with label Time. Show all posts

Thursday, November 7, 2019

เรียกดูข้อมูลทุก 15 นาที

ต้องการเรียกข้อมูลที่ลงท้ายด้วยนาที ที่ 0, 15,30 และ 45


แบบเดิม

SELECT Distinct TagDateTime, Column2, Column3
FROM YourTable
WHERE TagDateTime >=@D1 AND TagDateTime <=@D2
       and (DATEPART(minute,tagdatetime) % 15) = 0
        ORDER BY TagDateTime


อีกแบบ

SELECT TagDateTime, Column2, Column3
FROM YourTable
WHERE TagDateTime IN ( SELECT MIN(TagDateTime)
                              FROM YourTable
                              WHERE TagDatetime between @D1 and @D2
                              GROUP BY CONVERT(VARCHAR(8), TagDateTime, 112), DATEPART(HOUR ,TagDateTime),(DATEPART(MINUTE ,TagDateTime)/15)
                      )  

และถ้าต้องการเรียกทุกชั่วโมง

SELECT TagDateTime, Column2, Column3
FROM YourTable
WHERE TagDateTime IN ( SELECT MIN(TagDateTime)
                              FROM YourTable
                              WHERE TagDatetime between @D1 and @D2
                              GROUP BY CONVERT(VARCHAR(8), TagDateTime, 112), DATEPART(HOUR ,TagDateTime)
                      )


Wednesday, April 20, 2011

การหาระยะเวลาที่แตกต่างกัน Time Diff

Dim d1 As Date = Now
Dim d2 As Date = Now.AddMinutes(60)
Dim Tdiff As Double = DateDiff(DateInterval.Minute, d1, d2)


หมายเหตุ
d2 เป็นตัวตั้งและ d1 เป็นตัวลบ
DateInterval.xxx : xxx นี้เลือกได้ว่าต้องการเป็นหน่วยนาทีหรือชั่วโมงหรือวินาทีหรือวันหรือ... ลองเลือกดู


หรือจะใช้ Timespan ก็ได้

Dim TdiffHour as Decimal
Dim TimeDiff As TimeSpan
TimeDiff = d2 - d1
TdiffHour = TimeDiff.TotalHours