کد Hibernate کردن سیستم

[sourenaface]

سلام من دونبال این کد هستم احتمالا یه api باید مخصوص این کار باشه.
کسی می تونه کمکم کنه؟
shutdown و restart رو نمی خوام . فقط کد Hibernate رو می خوام.
ممنون

[mohsengrisly]

با برنامه زیر این کارو می تونی انجام بدی
فقط به جای ارسال کلید enter کلید ترکیبی shift+enter یا shift + s را باید ارسال کنی

ای بابا من هنوزم نمی تونم چیزی بذارم
مدیران عزیز برای بار دهم ارسال فایل ضمیمه من مشکل داره کار نمی کنه ها
ببخشید
تا درست بشه شما
این کد رو داشته باش
یه تایمر اضافه کن و Interval اون رو 1800 قرار بده

Private Declare Function IsPwrHibernateAllowed Lib "Powrprof.dll" () As Long
Private Declare Function SHShutDownDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long
Private Sub Form_Load()
If CBool(IsPwrHibernateAllowed) = True Then
Timer1.Enabled = True
SHShutDownDialog Shut_Down
End If
End Sub
Private Sub Timer1_Timer()
SendKeys "{enter}"
End
End Sub

[sourenaface]

دستت در نکنه امتحانش میکنم. خیلی دنبالش بودم
از کجا شما پیداش کردی؟

[sourenaface]

آقا کدی که مستقیما این کار رو بکنه رو بده
این کد اگه هابرنیت اکتیو نباشه کار نمی کنه

[mohsengrisly]

عزیز دلم اون تابع api خب همین کارو می کنه
برات مشخص می کنه که ایا سیستم می تونه Hibernate بشه یا نه
اگر اکتیو بود که هیچ اگر نبود خب اکتیوش کن یه کلیدو می خوای توی ریجستری تغییر بدیا کاری نداره که

[sourenaface]

ممنونم
میشه آدرس کلیدش رو تو رجیستری بگی؟
در ضمن اگه کدی مستقیم این کار رو بکنه عالیه
نه اینکه بیام از سیستم turn offخود ویندوز استفاده کنم

[Erfanian]

به این کد هم نگاهی بیندازید...

[sourenaface]

سلام جناب عرفانیان
دستتون درد نکنه
جوابمو گرفتم خیلی ممنونم از شما
ازآقا محسن هم ممنونم