<<< 返回 access911.net 编程静态资料库索引页

如何用VBA+API控制电脑自动关机?

 

作者:周军(cg1修改版)  摘自:china-askpro  录入:cg1  时间:2002-11-19  浏览人次:2268


专题地址:http://access911.net/fixhtm/72FA.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:用ACCESS 编程实现关机。
注意,在NT 中与 在 98 中关机方法不同

 


关于 windows 2000 以及 NT 下关机涉及到权限问题,请参考:
经测试 windows 2000 server 下可以强制关机,但是并未切断电源。

Option Compare Database
Option Explicit
Private Const EWX_LogOff As Long = 0
Private Const EWX_SHUTDOWN As Long = 1
Private Const EWX_REBOOT As Long = 2
Private Const EWX_FORCE As Long = 4
Private Const EWX_POWEROFF As Long = 8

'ExitWindowsEx函数可以退出登录、关机或者重新启动系统
Private Declare Function ExitWindowsEx Lib "user32" _
(ByVal dwOptions As Long, _
ByVal dwReserved As Long) As Long

'GetLastError函数返回本线程的最后一次错误代码。错误代码是按照线程
'储存的,多线程也不会覆盖其他线程的错误代码。

Private Declare Fun.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/72FA.htm

 


上一篇:如何让客户端用户自动注册控件?

下一篇:如何最大化、最小化、隐藏Access主窗口;如何隐藏access数据库窗体

2017年2月22日生成静态资料