Office中国论坛/Access中国论坛

标题: 获取电脑闲置时间及判断闲置时间进行相关操作如重启等 [打印本页]

作者: tmtony    时间: 2017-5-25 08:42
标题: 获取电脑闲置时间及判断闲置时间进行相关操作如重启等

要实现这个功能,就需要用到Windows的 API 函数 GetLastInputInfo,它用来获取最后输入的相关信息
另外也使用了API函数GetTickCount来进行毫秒级时间的对比

整理:tmtony
来源:Access中国

一、用API函数GetLastInputInfo 获取电脑空闲时间(idletime)

  1. Private Declare Function GetLastInputInfo Lib "user32" (plii As LASTINPUTINFO) As Boolean
  2. Private Declare Function GetTickCount Lib "kernel32" () As Long
复制代码


然后可以根据这个时间自己判断一下要进行什么操作


二、下面这个示例 将判断如果 闲置15分钟,将提示一个强制关机的消息:
      "由于本机15分钟没有操作,如果3分钟后没有反应,系统将强制关机"

      详细技巧与示例:
      获取系统闲置了多久(用户多久没有操作)
      http://www.access-cn.com/info/3618-cn.html

三、更多的用途,大家可继续扩充,并跟贴上来与大家分享

      1)判断空闲时间来锁屏,软件锁屏或整个Windows锁屏
      2)超过闲置时间,显示屏幕保护动画
      3)超时闲置时间,自动进行软件更新
      4)工作太长时间,强制进入视力保护模式,自动将软件颜色变暗
      5)使用操作太长时间,提示要注意休息,并自动退出软件



作者: GGMM    时间: 2017-5-26 08:12
谢谢分享
作者: GOODWIN    时间: 2021-10-13 16:06

谢谢分享




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3