Hard Drive Sleep ???!!

I Need to have a code to get the hard drive sleep.

This code will put your program to sleep for 3 seconds.

Code:

Option Explicit

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Form_Load()
Sleep 3000
End Sub


To adjust the amount of sleeping time, just change the 3000 to whatever you want (# of seconds to sleep * 1000).

All the best.

Chris

------------------
CJ

Does anyone have API code to initiate the power down mode for the HDD (like the power management in Win9x)?

Thanks

Tom

Does anyone have code to initiate the power down mode for the HDD (like the power management in Win9x)?

I wounder to?

now why would you possibly want to know how to this... i can only see evil things. :)

I am going to make a screensaver like program.

Quote:

---

now why would you possibly want to know how to this... i can only see evil things.

---

that could just be a case of near sightedness on your part

Im building a PVR with multiple disks, the OS is on a 10Gb flash drive, and there are also 3 1Tb disks for data. I am looking for a way to spin down the hard drives that are not in use. Why have disks 2 and 3 running if your only accessing a movie on disk 1?

Wouldnt spinning down / putting to sleep the disks that are not being used reduce noise...heat....and increase the lifespan of the disks?

Is this even possible?

lol he could do this to cut the power of the computer? maybe play "nice" with people ("nice") lol

Jon G, you are almost 9 years late. :rolleyes: