如何在 F# Fable 中登录到 Application Insights？

Question

我正在用 F#开发一个SAFE应用程序，其中一部分是将一些日志发送到 Azure 中的 Application Insights。服务器端日志记录有点简单：

open Microsoft.ApplicationInsights
open Microsoft.ApplicationInsights.Extensibility

let getTelemetryClient() =
    let key = <key>
    TelemetryConfiguration.Active.InstrumentationKey <- key
    TelemetryClient()

let log (message : string) =
    let logger = (lazy getTelemetryClient()).Value
    logger.TrackTrace message
    logger.Flush()

现在我想在客户端做一些类似的事情，在寓言中。我有一个 AI 密钥，我需要将数据发送到 Azure。相同的代码不会转换为 JS。

Answer 1

这可以通过寓言中的动态编程来实现。

1. 在 中添加 AI JS 依赖package.json：

{
    ...
    "devDependencies": {
        ...
        "applicationinsights-js": "^1.0.20"
    }
}

2. 反映在webpack.config.js：

fsharpEntry: {
    "app": [
         ...
        "applicationinsights-js"
    ]
}

3. 设置日志记录（在应用程序的初始化阶段调用）：

open Fable.Core.JsInterop
open Fable.Import.Browser

let setup() = 
    let key = <key>
    let config = createObj [ "instrumentationKey" ==> key ]
    window?appInsights?downloadAndSetup config

4. 像这样记录：

let log message = window?appInsights?trackTrace message

也许有更合适和/或类型安全的方法，但这是有效的。