| <%@ Page Language="C#" %> <SCRIPT runat="server"> protected void Page_Load(object sender, System.EventArgs e) { Trace.TraceFinished += new TraceContextEventHandler(OnTraceFinished); Trace.Write("自定义类别", "自定义跟踪消息"); } private void OnTraceFinished(object sender, TraceContextEventArgs e) { foreach (TraceContextRecord tcr in e.TraceRecords) { Response.Write(string.Format(" <li>跟踪类别: 跟踪消息:", tcr.Category, tcr.Message)); } } </SCRIPT> |
| <%@ Page Language="VB"%> <SCRIPT runat="server"> Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) AddHandler Trace.TraceFinished, AddressOf OnTraceFinished Trace.Write("自定义类别", "自定义跟踪消息") End Sub Private Sub OnTraceFinished(ByVal sender As Object, ByVal e As TraceContextEventArgs) Dim tcr As TraceContextRecord For Each tcr In e.TraceRecords Response.Write(String.Format(" <li>跟踪类别: 跟踪消息:", tcr.Category, tcr.Message)) Next End Sub </SCRIPT> |
用户评论