編輯爲清楚起見 不知何故這個工程: path "/" >=> warbler (fun _ -> OK (string DateTime.Now))
但是這一次沒有: let txnAccA =
let sqlStr = "select JSON from Store.Txn"
let result = Db.execute sqlStr Config.oConnStr
我一直在玩第一次Suave,顯然有一些我不明白。 我試圖做到的,是實現一個簡單的REST API: 用戶可以獲得有關金融工具的信息 此外,每個儀器具有 價格的列表現在簡單我只關注GET方法。 我非常的代碼基礎件是在這裏: [<AutoOpen>]
module RestFul =
let JSON v =
let jsonSerializerSettings = ne
使用非拉丁字符我想在Suave使用非拉丁字符,例如,西里爾文,但得到怪異的結果 MCVE open Suave
open Suave.Filters
open Suave.Operators
open Suave.Successful
let app =
choose [
GET >=> OK "Привет, Мир!"
]
startWebServ