help for trun off

[mohsengrisly]

چه طوری میشه با وی بی سیستم رو خاموش و restartکرد برای بخش حفاظت
در نرم افزارم می خواهم :sunglass:

[R_BABAZADEH]

از دستورات api استفاده کنید
exitwindow

[بابک زواری]

'In general section
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long


Private Sub Form_Load()
msg = MsgBox("This program is going to reboot your computer. Press OK to continue or Cancel to stop.", vbCritical + vbOKCancel + 256, App.Title)
If msg = vbCancel Then End
'reboot the computer
ret& = ExitWindowsEx(EWX_FORCE Or EWX_REBOOT, 0)
End Sub

[Behrouz_Rad]

:موفق:

[mahdi_sh]

جناب زواری مثل همیشه عالی ... :موفق: :flower: