http - 无法触发在 Giraffe 中实现的 Web 请求

Question

我正在努力触发用 Giraffe 编写的 Web 服务。

代码如下:

let webApp : HttpContext -> HttpHandlerResult = 

    choose [
        GET >=>
            choose [ routef "/platforms/" fetchPlatforms ]

fetchPlatforms 实现如下:

let private fetchPlatforms () (context : HttpContext) =
    async { let response = getPlatforms()
            return! json response context
    }

我遇到的问题是，当我运行服务器代码然后尝试测试 Web 服务时，我收到以下消息:

这是整个 solution .

更新:

我只在 VS Code 中观察到这个问题。

因此，我可以使用 Visual Studio 2017 (3) 版本 15.4 观察到成功的 Web 请求和响应

这是 video演示了 VS2017 和 VS Code 之间的区别

Answer 1

我下载了您的源代码并尝试重现该问题，但首先我在启动过程中遇到错误，因为我没有在本地配置您的数据库，因此我进行了以下更改:

type TestObj =
    {
        Prop1 : string
        Prop2 : int
    }

let private fetchPlatforms  =
    let obj1 = { Prop1 = "test"; Prop2 = 100 }
    json obj1
    //  let response = getPlatforms()
    //  json response

...当我现在启动应用程序并向 /platforms 端点发出 Postman 调用时，它似乎对我来说工作正常...

也许你解决了你的问题？