Windows服务启动导致Windows错误

Question

我们编写了一个自定义Windows服务(VB.NET,.NET Framework 2.0),需要一段时间才能启动,因为它上传了销售.

Protected Overrides Sub OnStart(ByVal args() As String)
  -- upload sales here
End Sub

启动它需要很长时间的事实很好,但是在Windows中会产生超时错误,并且启动的另一个程序不会添加到系统托盘中.

我们可以延迟销售上传,但宁愿让Windows忽略这个服务需要很长时间才能启动而不会产生错误的事实.有任何想法吗？

Answer 1

在另一个线程上启动上传销售代码,该代码将在后台运行上传代码并让服务响应它已启动并且您不会收到超时消息

例如

Protected Overrides Sub OnStart(ByVal args() As String)

    Dim start as new ThreadStart(UploadSalesMethod)
    Dim t as new Thread(start)
    t.Start()

End Sub