Checking For Windows Startup

[Ramandeep]

Can any one help me, I need to know if there is a way to check if windows (all versions) has just been started, I am working on a personal project and need a way to detect if windows has just been restarted or started.

------------------

[G.Kumaraguru]

Use the API GetTickCount.This returns
the number of milliseconds after the OS
win95,98,NT started. Divide it by 1000 and you get in seconds. Make your judgement based
on this. For example...

Private Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long


Private Sub Form_Load()
Dim lmiliSec As Long
lmiliSec = GetTickCount()

If (lmiliSec\60000) < 3 Then 'less than 3 minutes
MsgBox "Just Started"
Else
MsgBox "started " & (lmiliSec\60000)& " minutes ago"
End If
End sub




[This message has been edited by G.Kumaraguru (edited 02-13-2000).]