Public Sub New()
Dim stackframe As New Diagnostics.StackFrame
Dim LogConfig As Log.Configure = New Log.Configure(My.Application.Info.ProductName)
Log.EventLog.Write("Aplication Open")
If Process.GetProcessesByName(My.Application.Info.ProductName).Length > 1 Then
Log.ErrorLog.Write(stackframe.GetMethod.Name.ToString, "Application its running, can't duplicate it")
End
End If
' This call is required by the designer.
Log.EventLog.Write("InitializeComponent")
InitializeComponent()
' Add any initialization after the InitializeComponent() call.
Log.EventLog.Write("ReadINI")
If Not ReadINI(Application.StartupPath & "\" & Application.ProductName & ".ini") Then
MsgBox("Failed!! Read ini file, please contact administrator", MsgBoxStyle.OkOnly, "Error")
Log.ErrorLog.Write(stackframe.GetMethod.Name.ToString, "Read ini file failed")
End
End If
2020-02-06 11:38:03 [PCCLIENT] Приложение открыто
2020-02-06 11:38:03 [PCCLIENT] InitializeComponent
Я пытаюсь выполнить программу на клиенте P C с Windows 10 версии 1803 до 1909 года, но не могу запустить ее. Я проверил, журнал застрял в InitializeComponent (), но я не могу отследить его.