想要統計每小時下單的數量 ，所以可以直接下在SQL，將這些時間點按照每一小時統計出來，例如印表機的使用量，讓我可以觀察到列印高峰跟低峰的時段
SELECT DATEPART(hour, PrintTime) AS OnHour, COUNT(*) AS Total
FROM PrintingList
WHERE (PrintTime >= '2020/07/08 00:00:00') AND (PrintTime <= '2020/07/08 23:59:59')
GROUP BY DATEPART(hour, PrintTime)
ORDER BY OnHour
我的C 槽空間，就算都不放資料也常常因為國外的派送，會默默地成長，不知不覺電腦C槽又呈現了紅色的一條橫線，看了不解決就是很難過(幸好不是兩條線 呼~)
我的習慣重要資料是絕對不放在C 槽的，通常只做暫存使用，定期會去清空
但依舊成長到紅色一條槓 實在很惱人
所以使用TreeSize Free來找出到底偷吃空間的怪獸是誰
因為C 槽有些需要最高權限才能查看，所以建議使用Administrator全掃過，這樣比較清楚
下載連結: Treesize_free
目前有一個測試用資料庫實際檔案太大，但需要保留DB名稱在裡面卡位，也想保留相關TABLE
所以決定把內容一次清除就好
可以看到檔案原本有7G
 |
Dim Ds As New DataSet
Conn = New SqlConnection(connStr)
Dim records As New List(Of GUIDO)
Dim SqlTxt As String = ""
SqlTxt += " SELECT * "
SqlTxt += " FROM TESTTABLE "
Dim Cmmd As New SqlCommand(SqlTxt, Conn)
Conn.Open()
Dim Da As New SqlDataAdapter(Cmmd)
Da.Fill(Ds)
後來發現Timeout 的原因為預設30秒，剛好這一段SQL 真的屬於比較複雜，所以我就針對這一段SQL加長timeout的預設值到120
就快速解決問題了
Dim Ds As New DataSet
Conn = New SqlConnection(connStr)
Dim records As New List(Of GUIDO)
Dim SqlTxt As String = ""
SqlTxt += " SELECT * "
SqlTxt += " FROM TESTTABLE "
Dim Cmmd As New SqlCommand(SqlTxt, Conn)
Conn.Open()
Dim Da As New SqlDataAdapter(Cmmd)Da.SelectCommand.CommandTimeout = 120Da.Fill(Ds)-後續追蹤-發現DB 因為最近都沒有執行rebulid index ,所以開始造成查詢緩慢的現象緊急先將幾個重要的table 執行rebulid後隔天狀況有改善了,不過最好還是在每天備份的時候順便排程執行rebulid index 會比較好後續再來分享立即rebulid 的方式 跟 排程rebulid