F#中的SignalR和SelfHost

时间:2014-03-28 01:31:15

标签: asp.net f# signalr owin

我认为这会很快回答,但我今天找不到合适的答案。我尝试创建F#SignalR自我主机应用程序(我遵循本教程http://www.asp.net/signalr/overview/signalr-20/getting-started-with-signalr-20/tutorial-signalr-20-self-host

结果是我的应用程序没有在我的localhost上映射signalr / hubs,没有错误消息(只有当它找不到客户端时才从JavaScript文件中获取)。

namespace Program

open Owin
open Dynamic
open Microsoft.AspNet.SignalR
open Microsoft.AspNet.SignalR.Hubs
open Microsoft.Owin.Hosting
open Microsoft.Owin.Cors
open System
open System.Diagnostics

type MyHub =
   inherit Hub
   member x.Send (name : string) (message : string) =
       base.Clients.All?addMessage name message

type MyWebStartUp() =
    member x.Configuration (app :IAppBuilder) =
       app.UseCors CorsOptions.AllowAll |> ignore
       app.MapSignalR() |> ignore
       ()

module Starter =

[<EntryPoint>]
let main argv = 
    let hostUrl = "http://localhost:8085"
    let disposable = WebApp.Start<MyWebStartUp>(hostUrl)
    Console.WriteLine("Server running on "+ hostUrl)
    Console.ReadLine() |> ignore
    disposable.Dispose() 
    0 // return an integer exit code

我首先创建了C#应用程序并且它确实工作正常,我认为我的F#代码不对,但是我找不到那个bug。这里参考的是整个项目:https://github.com/MartinBodocky/SignalRFSharp

1 个答案:

答案 0 :(得分:6)

使用Start的{​​{3}},您不必为启动配置制作完整类型。你也一定要使用use而不是手动处理。

    let startup (a:IAppBuilder) =
       a.UseCors(CorsOptions.AllowAll) |> ignore
       a.MapSignalR() |> ignore
    use app = WebApp.Start(hostUrl, startup)

但是,为了使代码更好,你的集线器代码存在问题,因为你带来的动态模块只能调用带有一个参数的方法,使用action overload(在nuget中)一个强大的DLR ?运营商。

open EkonBenefits.FSharp.Dynamic
type MyHub() =
    inherit Hub()
    member this.Send (name : string) (message : string) =
        this.Clients.All?addMessage(name,message) |> ignore