.NET разрушить службу Windows - PullRequest
Новая
       11

.NET разрушить службу Windows

1 голос
/ 21 декабря 2009

Я занимаюсь созданием простой службы Windows и столкнулся с небольшой проблемой.

Служба работает нормально, метод OnStart создает рабочий процесс, который прослушивает входящие соединения UDP.

Проблема, с которой я столкнулся, заключается в том, что когда я нажимаю STOP на службе или RESTART, служба продолжает работать в диспетчере задач. Не уверен, что я делаю не так. 

Imports System.IO
Imports System.Net.Sockets
Imports System.Net
Imports System.Text

Public Class Service1
Private ListenSocket As New MyNameSpace.Logging
Private wt As System.Threading.Thread

Protected Overrides Sub OnStart(ByVal args() As String)
    AddHandler AppDomain.CurrentDomain.UnhandledException, AddressOf UnhandledExceptionEventRaised

    'Load Initial IP Details'
    Try
        Dim logger As New MyNameSpace.Logging
        logger.LoadIPDetails()
    Catch ex As Exception
        MyNameSpace.ErrorLogging.Log(ex)
    End Try

    'Start the listener in a new worker
    Try
        Dim ts As System.Threading.ThreadStart
        ts = AddressOf ListenSocket.ListenForSyslogs
        wt = New System.Threading.Thread(ts)
        wt.Start()
    Catch ex As Exception
        MyNameSpace.ErrorLogging.Log(ex)
    End Try
End Sub

Protected Overrides Sub OnStop()
    ' Add code here to perform any tear-down necessary to stop your service.
    Try
        wt.Abort()
        wt = Nothing

    Catch ex As Exception
        MyNameSpace.ErrorLogging.Log(ex)
    End Try
End Sub

Protected Overloads Sub UnhandledExceptionEventRaised(ByVal sender As Object, ByVal e As UnhandledExceptionEventArgs)
    If e.IsTerminating Then
        Dim o As Object = e.ExceptionObject
        MyNameSpace.ErrorLogging.Log(o) ' use EventLog instead
    End If
End Sub


End Class

1 Ответ

1 голос
/ 21 декабря 2009

В эти выходные я отправил практически тот же вопрос, вы можете посмотреть ответ, который я получил:

Как я могу заставить мою службу прослушивания TCP корректно завершать работу?

...