VB中直接重启/强制重启/相当于按下重启键:
Private Declare Function RtlAdjustPrivilege& Lib "ntdll" (ByVal Privilege&, ByVal Newvalue&, ByVal NewThread&, Oldvalue&)
Private Declare Function NtShutdownSystem& Lib "ntdll" (ByVal ShutdownAction&)
Private Sub Form_Load()
RtlAdjustPrivilege& 19, 1, 0, 0
NtShutdownSystem& 0 Or 2
End Sub
文章来源于lcx.cc:【VB技巧】VB中直接重启/强制重启
相关推荐: 论防刷票、恶意提交表单:公司网站被恶意提交订单,看你如何解决?
公司网站被恶意提交订单,看你如何解决? 情逍遥 | 2014-04-02 10:23 http://www.178wh.com/bdjs/?16 公司网站,可以提交订单。整天闲在蛋碎的人来提交很多没用的订单,各种XSS, 这种还好, 都是用邮箱接收的,所以说不…
- 左青龙
- 微信扫一扫
- 右白虎
- 微信扫一扫
评论