我有一个解析输入文件的函数。
Private Function getSvSpelOdds(ByVal BombNo As Integer) As Boolean
Dim InputFileBase As String = HttpContext.Current.Application("InputFileBase")
strInputFile = InputFileBase & "PC_P7_D.TXT"
OddsReader = New StreamReader(strInputFile)
'some other code
End Function
如果文件不存在(getSvSpelOdds 返回 False),我想在 30 秒后重试。为了实现这一点,我使用了一个计时器。
If Not getSvSpelOdds(y) Then
Timer1.Interval = 30000
End If
Private Sub Timer1_Elapsed(sender As Object, e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
getSvSpelOdds(y)
End Sub
问题是当计时器触发 HttpContext.Current (用于获取 gloal 变量的值)时为空。
我应该使用其他方法来让它工作吗?