控制台应用计时器每 x 分钟调用一次 Web 方法

Question

我在 VB.Net，VS 2008 中编码。 我编写了一个控制台应用程序，它使用来自网站应用程序的 2 个 Web 方法。我需要增强此控制台应用程序，以便它连续启动 Web 方法，可能每 x 分钟（在营业时间内），但绝不会在最后一次调用终止之前，其持续时间可能会有所不同，具体取决于要处理的帐户数量。

最初，我使用任务计划程序安排应用程序，但我认为这不会阻止同时进行两次调用。

虽然我看过很多关于使用计时器的帖子，但我还没有找到我真正需要的东西。

到目前为止，我有：

Dim aTimer As New System.Timers.Timer()
    AddHandler aTimer.Elapsed, AddressOf TriggerWebMethods

' Set the Interval to 10 minutes:
aTimer.Interval = 1000 * 60 * 10            '(1 second * 60 = 1 minute * 10 = 10 minutes)
aTimer.Enabled = True
aTimer.AutoReset = True

1. 什么时候应该使用Timer.Elapsed 和Timer.Tick？
2. Timer.Enabled 与 Timer.Start 之间有什么区别，我应该只选择一个吗？
3. 我希望在第一个网络方法完成后启动第二个网络方法。

我想让这个尽可能简单。谢谢大家的帮助。

Answer 1

如果您正在处理System.Timers.Timer，那么您将只有Elapsed 事件可用。如果是System.Windows.Forms.Timer，那么您将使用Tick 事件。您不是在编写 WinForms 应用程序，因此您将使用 System.Timers.Timer。

就个人而言，我只会使用Enabled 属性来查看计时器是否已启动。我不会用它来启动或停止它。使用Start() 或Stop() 方法可以非常清楚地知道计时器发生了什么。

如果您的 Web 方法同步执行，您可以在 TriggerWebMethods() 方法中一个接一个地调用它们。在第一个完成之前，第二个不会被调用。

Sub TriggerWebMethods(source As Object, e As ElapsedEventArgs)
    FirstWebMethod()
    SecondWebMethod()
End Sub

如果是异步的，您必须在第一个 Web 方法上注册一个回调，以便在第二个 Web 方法完成时执行它。在VB中，我相信你可以直接使用第二个作为回调，这取决于你如何进行异步调用。 （抱歉，我的 VB 现在很生锈，所以可能不是 100% 正确的语法）

Sub FirstWebMethod()
    ' ...
End Sub

Sub SecondWebMethod()
    ' ...
End Sub

Sub TriggerWebMethods(source As Object, e As ElapsedEventArgs)
    Dim first As Action = AddressOf FirstWebMethod
    first.BeginInvoke(AddressOf SecondWebMethod, first)
End Sub

Answer 2

只是为 Jeff M 的回答添加一点内容。 Timer.Elapsed Event 有以下注释。

如果 SynchronizingObject 属性为 null，则 Elapsed 事件为 在 ThreadPool 线程上引发。如果 Elapsed 事件持续的处理 长于间隔，事件可能 在另一个 ThreadPool 上再次引发 线。在这种情况下，事件 处理程序应该是可重入的。

由于您在控制台应用程序中，您可以手动滚动您自己的 SynchronizingObject，也可以将 AutoReset 设置为 False，然后将 TriggerWebMethods 更改为在结尾处开始。您甚至可能希望抵消时间间隔以考虑处理时间。

例如

    Dim start As Date = Now


    'do stuff


    Dim ts As TimeSpan = Now - start

    Dim i As Integer = (1000 * 60 * 10) - ts.TotalMilliseconds

    Dim aTimer As Timers
    aTimer.Interval = i