如何在事件日志中获得更具描述性的错误消息？

Question

我是日志记录的新手。我在事件日志中得到这个乱码。 无法找到源（xyAMP）中事件ID（0）的说明。本地计算机可能没有必要的注册表信息或消息DLL文件来显示来自远程计算机的消息。您可以使用/ AUXSOURCE =标志来检索此说明;详细信息请参阅帮助和支持。以下信息是事件的一部分：消息来源：System.Web

如何在诊断错误时使这更有用。 这是我的日志代码。

子的Application_Error（BYVAL发件人为对象，BYVALË作为EventArgs的） 昏暗CTX作为HttpContext的= HttpContext.Current

Dim ex As Exception = ctx.Server.GetLastError() 

    Dim data As String = String.Empty 
    Dim referer As String = IIf(ctx.Request.ServerVariables("HTTP_REFERER") IsNot Nothing, ctx.Request.ServerVariables("HTTP_REFERER").ToString(), String.Empty) 
    Dim sForm As String = IIf(ctx.Request.Form IsNot Nothing, ctx.Request.Form.ToString(), String.Empty) 
    Dim sQuery As String = IIf(ctx.Request.QueryString IsNot Nothing, ctx.Request.QueryString.ToString(), String.Empty) 

    data = "SOURCE: " + ex.Source + vbCrLf 
    data += "MESSAGE: " + ex.Message + vbCrLf 
    data += "FORM: " + sForm + vbCrLf 
    data += "QUERYSTRING: " + sQuery + vbCrLf 
    data += "TARGETSITE: " + ex.TargetSite.ToString() + vbCrLf 
    data += "STACKTRACE: " + ex.StackTrace + vbCrLf 
    data += "REFERRER: " + referer 

    Dim eventLogName As String = "xyAMPLog" 
    Dim sourceName As String = "xyAMP" 

    Dim xyAMPLog As New EventLog() 
    xyAMPLog.Log = eventLogName 
    xyAMPLog.Source = sourceName 


    Try 
     xyAMPLog.WriteEntry(data, EventLogEntryType.Error) 

    Catch exc As Exception 
     Console.WriteLine(exc.Message) 
    End Try 

    'ctx.Server.ClearError() 


End Sub 

清理它任何建议？

感谢，在圣地亚哥 〜CK

Answer 1

我认为你需要使用Message Compiler (MC.exe)。

Answer 2

您需要使用ex.ToString()才能获得完整的异常以及所有内部异常实例。一般来说，这会告诉你所有的例外都希望你知道。

您唯一能做的其他事情就是编写代码来显示每个具有此类细节的异常的详细信息。例如，WebException职业有一个Response财产，它会给你所有关于回应的信息，以及一个Status财产，它会告诉你Response是否有用。 SqlException有很多细节，包括查询生成的所有错误列表。您可以编写将这些细节转换为文本的特殊代码。

而且，顺便说一句，当你使用这么多的时候，你真的应该使用StringBuilder类来进行字符串连接。它效率更高。