返回列表 回复 发帖

请老师看一下,VB不能实现重启,关机!

声明部分
Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
代码部分
Private Sub Command1_Click()
    ExitWindowsEx EWX_LOGOFF, 0
   
End Sub

Private Sub Command2_Click()
    ExitWindowsEx EWX_REBOOT, 0
   
End Sub

Private Sub Command3_Click()
    ExitWindowsEx EWX_SHUTDOWN, 0
End Sub

XP系统,单击这三个按钮的效果是一样的,三个按钮都只能注销,而不能重启,关机,请问老师这是怎么回事?
这是由于你的程序没有相应的权限。具体可以参考这个文章的介绍:http://baike.baidu.com/view/2007643.htm
DING
顶顶顶顶顶顶顶顶顶顶顶顶
可以利用
shutdown -r
shutdown -s
shutdown -l
来实现重启、关机、注销
用DOS命令  也许可以实现
累累的创伤就是生命给你最好的礼物,因为在每个创伤上面都标志着前进的一步
返回列表