使用 WMI 型別提供程式

WMI 型別提供程式允許你使用強型別查詢 WMI 服務。

要將 WMI 查詢的結果輸出為 JSON，

open FSharp.Management
open Newtonsoft.Json

// `Local` is based off of the WMI available at localhost. 
type Local = WmiProvider<"localhost">

let data = 
    [for d in Local.GetDataContext().Win32_DiskDrive -> d.Name, d.Size]

printfn "%A" (JsonConvert.SerializeObject data)