You've already forked EventLogLoader
mirror of
https://github.com/romanlryji/EventLogLoader.git
synced 2025-07-09 00:45:54 +02:00
49 lines
2.2 KiB
C#
49 lines
2.2 KiB
C#
Imports System.ServiceProcess
|
|
|
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
Partial Class EventLogLoaderService
|
|
Inherits System.ServiceProcess.ServiceBase
|
|
|
|
'UserService переопределяет метод Dispose для очистки списка компонентов.
|
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
Try
|
|
If disposing AndAlso components IsNot Nothing Then
|
|
components.Dispose()
|
|
End If
|
|
Finally
|
|
MyBase.Dispose(disposing)
|
|
End Try
|
|
End Sub
|
|
|
|
' Главная точка входа процесса
|
|
<MTAThread()> _
|
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
|
Shared Sub Main()
|
|
Dim ServicesToRun() As System.ServiceProcess.ServiceBase
|
|
|
|
' В одном процессе может выполняться несколько служб NT. Для добавления
|
|
' службы в процесс измените следующую строку,
|
|
' чтобы создавался второй объект службы. Например,
|
|
'
|
|
' ServicesToRun = New System.ServiceProcess.ServiceBase () {New Service1, New MySecondUserService}
|
|
'
|
|
ServicesToRun = New System.ServiceProcess.ServiceBase() {New EventLogLoaderService}
|
|
|
|
System.ServiceProcess.ServiceBase.Run(ServicesToRun)
|
|
End Sub
|
|
|
|
'Является обязательной для конструктора компонентов
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
' Примечание: следующая процедура является обязательной для конструктора компонентов
|
|
' Для ее изменения используйте конструктор компонентов.
|
|
' Не изменяйте ее в редакторе исходного кода.
|
|
<System.Diagnostics.DebuggerStepThrough()> _
|
|
Private Sub InitializeComponent()
|
|
components = New System.ComponentModel.Container()
|
|
Me.ServiceName = "EventLog loader service"
|
|
End Sub
|
|
|
|
End Class
|