ローカルマシンのHDD容量確認

ASP.NET + Ajax による対象サーバの容量確認ページを作りたいので、.NET Framework の API の使い方実験コードを書いてみました。

実験的なコードは fsi.exe を利用するのが非常に楽です。
すぐ確認出来るのが素晴らしい！

open System
open System.IO

DriveInfo.GetDrives()
|> Array.filter (fun d -> d.DriveType = DriveType.Fixed)
|> Array.iter (fun d ->
    printfn "%s" (new String('=', 50))
    printfn "Drive Letter: %A" d.Name
    printfn "Size: %A" d.TotalSize
    printfn "TotalSize: %A" (d.TotalSize - d.TotalFreeSpace)
    printfn "TotalFreeSpace: %A" d.TotalFreeSpace)
;;