mikewolf2k 发表于 2005-12-19 18:46:00

vb中如何设置关机？

<P>因需要设置自动关机，2000server，网上传播的关机方法主要有两个，一是rundll32 user.exe, exitwindows，没反应；一是将xp下的shutdown拷到2000下，经测试能关闭windows，出现可以安全关闭计算机的提示，却不能断电（直接关可以断电，什么高级电源设置都试过了），也不符合要求。网上有些关机软件，一来不想为这点要求再安装一个软件，还有注册什么的，太麻烦了。因此想自己写一个关机程序。</P>
<P>请问vb有关机代码吗？</P>

MJTD_7777 发表于 2005-12-20 14:13:00

<P>关注</P>

zhu1 发表于 2005-12-22 19:59:00

<P>前两天看到这个帖子就想回，可是试了几次都不能回帖，今天终于可以了</P>
<P>ＶＢ里可以通过编程关机，是不是关掉电源不清楚，代码如下（用到ＡＰＩ）：</P>
<P><BR>Global Const EWX_LOGOFF = 0<BR>Global Const EWX_REBOOT = 2<BR>Global Const EWX_SHUTDOWN = 1<BR>Declare Function ExitWindows Lib "User32" Alias "ExitWindowsEx" (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long<BR>lresult = ExitWindowsEx(EWX_SHUTDOWN, 0&amp;) '关闭计算机<BR>lresult = ExitWindowsEx(EWX_REBOOT, 0&amp;) '重新启动计算机</P>
页: [1]
查看完整版本: vb中如何设置关机？