Lines Matching refs:currDate
235 Dim currDate As Date variable
242 currDate = Now()
243 If (val(DateDiff("s", lastDate, currDate)) > MAX_WAIT_TIME) Then
250 currDate = statFile.DateLastModified
251 If (currDate > lastDate) Then
252 lastDate = currDate
255 currDate = Now()
256 … If (lastDate >= currDate) Then ' There might be some inaccuracies in file and system dates
258 ElseIf (val(DateDiff("s", lastDate, currDate)) > MAX_WAIT_TIME) Then
288 Dim currDate As Date variable
291 currDate = Now()
307 If Not CheckAliveStatus(statFileName, curApplication, currDate, fso) Then