다음은 VB에서 (불행히도) 끝내는 방법입니다. 물론 _UsernameIsMeaningfulInThisContext
및 _GetUsername
을 구현해야합니다. 호출 클래스에서 nlog 설정
<variable name="AppLogDir" value="C:\inetpub\ApplicationLogging\MyApplication" />
...
<targets>
...
<target name="UserSpecificLogfile"
xsi:type="File"
fileName="${AppLogDir}\Users\AppUser_${event-context:item=AppUsername}.txt"
createDirs="true" />
</targets>
<rules>
...
<logger name="*" minLevel="Trace" maxLevel="Fatal" writeTo="UserSpecificLogfile" />
</rules>
에서
Private Property _ClassLogger As Logger = LogManager.GetCurrentClassLogger()
...
Private Sub _LogMaybeUser(ByVal nLogLevel As NLog.LogLevel, ByVal nMsg As String)
{
Dim logfileUser As String = "Unknown"
If _UsernameIsMeaningfulInThisContext() { logfileUser = _GetUsername() }
Dim logInfo As New LogEventInfo(nLogLevel, "", nMsg)
logInfo.Properties("AppUsername") = logfileUser
ClassLogger.Log(logInfo)
}