ایجاد گزارش خطای ورود به سیستم در ASP.Net با استفاده از سی شارپ و VB.Net

خطای ورود به سیستم در برنامه های ASP.Net اتفاق می افتد که در صورت امکان دریافت فایل های متنی کار برای پیدا کردن علت آن آسان تر می شود زیرا به راحتی با استفاده از برنامه ساده Notepad ویندوز میتوان آن را باز کرد و خطایابی کرد.

خطای ورود به سیستم

HTML Markup

کد زیر شامل دکمه کنترل ASP.Net می باشد.

<asp:Button Text="Click to Raise Exception" runat="server" OnClick="RaiseException"/>

Namespaces

باید Namespaces زیر را وارد کنید.

سی شارپ

using System.IO;

VB.Net

Imports System.IO

ایجاد فایل متنی خطای ورود به سیستم در ASP.Net

کنترل کننده رخداد های زیر زمانی که روی دکمه کلیک شود برجسته می شود. درون عملکرد LogError، جزئیات استثنا (ارور) در یک Error Log Text file نوشته شده است با زمان و تاریخ فعلی.

سی شارپ

protected void RaiseException(object sender, EventArgs e)
{
    try
    {
        int i = int.Parse("Mudassar");
    }
    catch (Exception ex)
    {
        this.LogError(ex);
    }
}
 
private void LogError(Exception ex)
{
    string message = string.Format("Time: {0}", DateTime.Now.ToString("dd/MM/yyyy hh:mm:ss tt"));
    message += Environment.NewLine;
    message += "-----------------------------------------------------------";
    message += Environment.NewLine;
    message += string.Format("Message: {0}", ex.Message);
    message += Environment.NewLine;
    message += string.Format("StackTrace: {0}", ex.StackTrace);
    message += Environment.NewLine;
    message += string.Format("Source: {0}", ex.Source);
    message += Environment.NewLine;
    message += string.Format("TargetSite: {0}", ex.TargetSite.ToString());
    message += Environment.NewLine;
    message += "-----------------------------------------------------------";
    message += Environment.NewLine;
    string path = Server.MapPath("~/ErrorLog/ErrorLog.txt");
    using (StreamWriter writer = new StreamWriter(path, true))
    {
        writer.WriteLine(message);
        writer.Close();
    }
}

VB.Net

Protected Sub RaiseException(sender As Object, e As EventArgs)
    Try
        Dim i As Integer = Integer.Parse("Mudassar")
    Catch ex As Exception
        Me.LogError(ex)
    End Try
End Sub
 
Private Sub LogError(ex As Exception)
    Dim message As String = String.Format("Time: {0}", DateTime.Now.ToString("dd/MM/yyyy hh:mm:ss tt"))
    message += Environment.NewLine
    message += "-----------------------------------------------------------"
    message += Environment.NewLine
    message += String.Format("Message: {0}", ex.Message)
    message += Environment.NewLine
    message += String.Format("StackTrace: {0}", ex.StackTrace)
    message += Environment.NewLine
    message += String.Format("Source: {0}", ex.Source)
    message += Environment.NewLine
    message += String.Format("TargetSite: {0}", ex.TargetSite.ToString())
    message += Environment.NewLine
    message += "-----------------------------------------------------------"
    message += Environment.NewLine
    Dim path As String = Server.MapPath("~/ErrorLog/ErrorLog.txt")
    Using writer As New StreamWriter(path, True)
        writer.WriteLine(message)
        writer.Close()
    End Using
End Sub

اسکرین شات

موفق باشید !