动态设置web服务日志中的log4net文件名

我在web服务中使用log4net，我想根据请求本身发送的用户参数设置每个请求的日志文件名。

我在配置

中定义了一个属性

<configuration>
  <configSections>
    <section name="log4net" type="log4net.Config.Log4NetConfigurationSectionHandler, log4net"/>
  </configSections>
  <log4net>
    <appender name="ClaimLog" type="log4net.Appender.RollingFileAppender">
      <file type="log4net.Util.PatternString" value="C:'projects'reports'ClaimRpt'Log'ClaimLog_%property{UserNameWCF}.txt" />

并将其设置在我的web方法

的开头

type ClaimServiceF() = 

    let log = LogManager.GetLogger("ClaimServiceF")

…

member this.BeginReport(sel: Model.Selection) : Model.RptResponse =
    GlobalContext.Properties.Item("UserNameWCF") <- sel.User
    let rptResp = new Model.RptResponse()
    log.Info("Started")
    match sel with
    | null -> 

我将f#库(SrvImplF.dll)包装在c# WCF项目中(为什么?)并使用Visual Studio的WCF测试客户端进行测试。

但是日志文件名仍然保持其初始值ClaimLog_(null).txt，即使我可以设置一个断点并看到sel.User被正确填充

我也尝试了从AppSettings

的AppSettings类型提供程序

  <appSettings>
    <add key="my_service_log" value="C:'projects'reports'ClaimRpt'Log'ClaimLog_{UserNameWCF}.txt" />
  </appSettings>

由编码

open FSharp.Configuration
type Settings = AppSettings<"app.config">

…

let appender = LogManager.GetRepository().GetAppenders() |> Seq.find(fun x -> x.Name.Equals("ClaimLog") ) :?> log4net.Appender.RollingFileAppender

…

appender.File <- Settings.MyServiceLog.Replace("{UserNameWCF}",sel.User)

但是-除了我需要在dll下创建一个虚构的app.config并在那里复制app键的事实之外，因为类型提供程序没有看到包装项目的app.config -它抛出异常

抛出异常:'System. '在SrvImplF.dll中的TypeInitializationException类型为"System"的异常。TypeInitializationException'发生在SrvImplF.dll，但未在用户代码中处理。的类型初始化项"FSharp.Configuration。AppSettingsTypeProvider'抛出异常。

我认为最后这只是我的类型提供程序配置中的一个小错误，无论如何也直接输入值

        let configFile = "C:'reports'ClaimRpt'Log'ClaimLog_{UserNameWCF}.txt" //Settings.MyServiceLog
        appender.File <- configFile.Replace("{UserNameWCF}",sel.User)

没有例外，但日志文件名保持不变ClaimLog_(null).txt

// incoming request A
GlobalContext.Properties.Item("UserNameWCF") <- sel.User
// incoming request B
GlobalContext.Properties.Item("UserNameWCF") <- sel.User
// request A
var logger = LogManager.GetLogger("ClaimServiceF")
// logger has 'UserNameWCF' set to 'sel.User' of request B