Windows服务自动启动然后自动停止

Question

我有一个包含三个项目的解决方案。其中一个是服务，一个是表单，还有一个是类库。

我使用表单进行调试，现在我的逻辑已经完成，我只想进行调用。

Protected Overrides Sub OnStart(ByVal args() As String)
    Dim Logic As New ProcessMail
    workTimer = New Timer(New TimerCallback(AddressOf Logic.ProcessMessages), Nothing, (1000 * 60 * 10), (1000 * 60 * 10))
    MyBase.OnStart(args) 
End Sub

所以它每10分钟就会触发我的代码。为什么这不起作用？

服务已安装，我看到了它，但它启动和停止，有人可以帮我解决我做错了什么吗？

- Keith Beard

---

哇，这个问题真的那么糟糕吗，会被踩得这么惨？如果你要为了语法而编辑它，至少把工作做完整。 - Keith Beard

对我来说，这似乎是一个合理的问题。我希望那些点踩的人能留下原因。 - Eric J.

Answer 1

检查事件日志。经常情况下，Windows服务会因为抛出异常而停止。

- Eric J.

---

你是指事件查看器中的服务事件日志还是其他地方？ - Keith Beard

@kcbeard：在控制面板/管理工具中可以找到事件查看器。在Windows日志下，异常应该在应用程序节点中。 - Eric J.

这将创建一个新的问题，而那是一个明确的答案。谢谢Eric。 - Keith Beard

是的，谢谢。我的.dll文件只是被错误地引用了，谢谢。 - Keith Beard