Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 259
  • Last Modified:

Help with sleep

hello-

i want my application to call a certain function every 10 minutes. while it is not doing anything i want it to sleep.

do i need to import the system32 sleep function? and will this keep it from using any resources while its idle? i mean, i just dont wanna keep running thru a loop.
any code would be great.

thanks - js
0
jeremiahscott
Asked:
jeremiahscott
1 Solution
 
TimCotteeCommented:
Use a timer control and set the interval to 60000 (MSec)

Check for elapsed time >= 10 minutes and there you go:

Dim dteLastRun As Date

Private Sub Timer1_Timer()
  If DateDiff("s",dteLastRun,Now()) > 600 Then
    'Run my routine
    dteLastRun = Now()
  End If
End Sub
0
 
COAtheGREATCommented:
Use Timer control and on timer event calculate if the time is come to do something.
Sleep is also good.
0
 
COAtheGREATCommented:
Tim alredy explain :)
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
rspahitzCommented:
FYI--any use of the timer will create a thread that runs in the background, so it's still taking up processor time, but is minimal.  The only way to really overcome this is to have a hook into the Windows O/S that checks some flag every cycle through its processing, then "calls back" to the application at the proper time.  This is not worth the effort for something as simple as a timed event.
0
 
DanielBlaisCommented:
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
0
 
deightonCommented:
sleep is ok, but is seems to render your application 'not responding' on the task list if you sleep for a long peiod

sleep 600000   'for example (10 mins)
0
 
amebaCommented:
Sleep = Not good
Timer = vbOK And vbYes
0
 
trkcorpCommented:
If the sole purpose of your program is to execute this function periodically, and it need not do anything else, Sleep is fine and I suspect would use no more, perhaps less resource than the timer, if other actions need to take place then use the timer control.
0
 
rspahitzCommented:
>Timer = vbOK And vbYes

Ameba, you're funny, but...
vbOK=1
vbYes=6
vbOK And vbYes=0=False=Not True

So, if True=Good and False=Bad:
Sleep=Not good
Timer=Bad

-----
I'd use the timer control whenever feasible, and this seems feasible, but (from help):

The maximum, 65,535 milliseconds, is equivalent to just over 1 minute.

...
To go more than one minute, you'll probably want a counter, something like this:

' Module-level variable
Private m_intMinuteCounter as integer

Private Sub Form_Load()
  '...
  ' or move this to wherever you enable the timer
  m_intMinuteCounter = 0
End Sub

Private Sub Timer1_Timer()
  m_intMinuteCounter = m_intMinuteCounter + 1
  if m_intMinuteCounter >= 10 then
    Timer1.Enabled = False
    PerformDesiredTask' 10 minutes has elapsed
  end if
End Sub
0
 
RainUKCommented:
If you want to use a timer other than VBs timer you can use the two APIs SetTimer, KillTimer. Use of these two API's will not inccur any processing by your program as the Timer Fire event is a call back procedure.

0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now