用Servant實現文件上傳API的方法是什麼？ 我想處理「標準」multipart/form-data，但無法弄清楚如何在僕人中聲明它。 這顯然是行不通的，因爲它不能處理的multipart： type API = "file" :> ReqBody '[OctetStream] ByteString :> Post '[OctetStream]()
僕人是否支持文件上傳？
我有一種在Haskell僕人一個Hello World應用程序的，這裏是它的一部分： type API =
"my_items" :> Get '[JSON] [MyItem]
:<|> "my_items" :> Capture "id" Int :> Get '[JSON] MyItem
-- ...................
和網址是： localho
我想弄清楚如何在Servant中添加CORS響應頭（基本上，設置響應頭「Access-Control-Allow-Origin：*」）。我用addHeader函數編寫了一個小測試用例，但它出錯了。我將非常感謝幫忙解決下面的錯誤。 代碼： {-# LANGUAGE CPP #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveGeneriC#-
我有一個簡單的hello world Servant應用程序。我需要添加一些靜態或動態的HTML頁面。我怎樣才能做到這一點？在文檔中沒有提到。注意我不想在Haskell代碼中創建html佈局，我希望Haskell顯示已經創建的html頁面。 UPDATE： 我如何結合這一點： type MyApi = "/" :> Raw
server :: Server MyApi
server = se
我想在Servant中執行刪除操作並返回錯誤或（）。這裏是我的代碼： del :: Int -> ExceptT ServantErr IO()
del myId = liftIO $ do
cn <- getConnection
a <- execute cn "delete from table1 where id = ?" [myId]
case a of