توابع ریستارت+خاموش کردن سیستم

[nakhodasokoot]

سلام دوستان
من از این تابع برا خاموش کردن و ریستارت و استندبای استفاده می کنم اما رو سیستم جواب میده رو لپ تاپ کاربر نه ؟؟؟ مشکل چیه ؟؟؟

Public Class Form8
Private Const EWX_LogOff = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_SLEEP = 8
Private Const EWX_FORCE = 4

Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Call ExitWindowsEx(EWX_LogOff, &HFFFFFFFF)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Call ExitWindowsEx(EWX_REBOOT, &HFFFFFFFF)
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Call ExitWindowsEx(EWX_SHUTDOWN, &HFFFFFFFF)
End Sub
End Class

[virusha]

سلام دوست عزیز سورس شما مشکلی نداره روی لپ تاپ هم امتحان شد و کار کرد

[shahryari]

سلام
Public Sub shutdown()
System.Diagnostics.Process.Start("shutdown", "-s -t 00")
End Sub

Public Sub restart()
System.Diagnostics.Process.Start("shutdown", "-r -t 00")
End Sub

Public Sub logOff()
System.Diagnostics.Process.Start("shutdown", "-l -t 00")
End Sub