Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Beginner
Nov 22, 1999



Building the Right Environment to Support AI, Machine Learning and Deep Learning

Setting Daily Events

I want to kick off a function once a day (for examle, at midnight). The timer seems a very inefficient way to do this. Is there any way of raising an event once a day to do this?

The Timer control only supports an Interval property up to 65535, which is about 65 seconds. You can use this, in combination with some extra code to start a program at midnight, let's say. Here's an example, assuming you have a timer control named tmrDaily:

Private Sub tmrDaily_Timer()
   If Time >= #0:00# And datLastRun < Date Then
      ' run your code here
      datLastRun = Date
   End If
End Sub
You'll also need to maintain some sort of status, so that you only run the job once during the day. In this case, datLastRun is a variable defined outside this procedure as a Variant (for holding date/time values).
DevX Pro
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date