以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助：如果用户30秒内没有进行任何操作，就自动关闭系统  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=57368)
--  作者：李孝春
--  发布时间：2014/9/23 16:55:00
--  求助：如果用户30秒内没有进行任何操作，就自动关闭系统

如果用户30秒内没有进行任何操作，就自动关闭系统，可以在SystemIdle中加入下面的代码：

If LastInputTickCount > 30000 Then
    Syscmd.Project.Exit()
End If

提示：LastInputTickCount是一个系统变量，返回距离用户上次操作之后的时间，单位为毫秒



这个可否更改为锁定系统 也就是弹出当前用户的登陆窗体 需要输入密码后进入系统
--  作者：Bin
--  发布时间：2014/9/23 16:58:00
--  
If LastInputTickCount > 30000 Then
    Forms("登录窗口").show
End If