Go On Stand By

Does anyone know how i can write a code to make your computer go on stand by? I have no idea where to start.

Code:

---

'in declarations
Private Declare Function SetSystemPowerState Lib "kernel32" (ByVal fSuspend As Long, ByVal fForce As Long) As Long
'in code
    SetSystemPowerState 1, 1

---

Not sure if this works but it worked on my laptop

Maybe this thread'll help ya a bit:
http://forums.vb-world.net/showthrea...threadid=34397