AspLog 类

定义

public ref class AspLog : Microsoft::VisualBasic::Logging::Log

public class AspLog : Microsoft.VisualBasic.Logging.Log

type AspLog = class
    inherit Log

Public Class AspLog
Inherits Log

继承

Object

Log

AspLog

示例

此示例演示如何使用 My.Application.Log.WriteEntry 该方法记录跟踪信息。 有关详细信息，请参阅 “如何：写入日志消息”。

Private Sub GetOpenFormTitles()
    Dim formTitles As New Collection

    Try
        For Each f As Form In My.Application.OpenForms
            ' Use a thread-safe method to get all form titles.
            formTitles.Add(GetFormTitle(f))
        Next
    Catch ex As Exception
        formTitles.Add("Error: " & ex.Message)
    End Try

    Form1.ListBox1.DataSource = formTitles
End Sub

Private Delegate Function GetFormTitleDelegate(f As Form) As String
Private Function GetFormTitle(f As Form) As String
    ' Check if the form can be accessed from the current thread.
    If Not f.InvokeRequired Then
        ' Access the form directly.
        Return f.Text
    Else
        ' Marshal to the thread that owns the form. 
        Dim del As GetFormTitleDelegate = AddressOf GetFormTitle
        Dim param As Object() = {f}
        Dim result As System.IAsyncResult = f.BeginInvoke(del, param)
        ' Give the form's thread a chance process function.
        System.Threading.Thread.Sleep(10)
        ' Check the result.
        If result.IsCompleted Then
            ' Get the function's return value.
            Return "Different thread: " & f.EndInvoke(result).ToString
        Else
            Return "Unresponsive thread"
        End If
    End If
End Function

注解

My.Application.Log 对象提供了一个直接的入口点，可从中访问 .NET Framework 的日志记录服务。 这些 WriteEntry 消息和 WriteException 方法将消息写入应用程序的日志侦听器。 侦听器可由应用程序的配置文件配置。 有关详细信息，请参阅演练：更改 My.Application.Log 写入信息和使用应用程序日志的位置。

该 My.Application.Log 对象仅适用于客户端应用程序。 对于 Web 应用程序，请使用 My.Log。 有关详细信息，请参阅 Microsoft.VisualBasic.Logging.Log。

下表列出了涉及 My.Application.Log 该对象的任务的示例。

另请参阅

• Log
• ApplicationBase
• 对象 （Visual Basic）