以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  systemidle  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=38493)

--  作者:CRM2013
--  发布时间:2013/7/30 14:55:00
--  systemidle

参考教程自定义了用户登录界面,上有一个“确定”和“取消”按钮。

 

设置了一个systemidle 10分钟后自动打开自定义的的用户登录窗口,请问如何判断这是系统10分钟没有输入Idle而不是在正常启动时打开的登录界面。

 

否则在idle  10分钟后可以点击“取消”而进入系统,起不到保护作用。

 

If LastInputTickCount > 600000 Then
    If Forms("用户登录").Opened = False Then
        Forms("用户登录").Open()
    End If
End If


图片点击可在新窗口打开查看此主题相关图片如下:捕获.png
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2013/7/30 15:35:00
--  

定义一个public变量

 

Public LogCount As Integer

 

登陆窗口的AfterLoad事件

LogCount  = LogCount  + 1

 

取消按钮

 

If LogCount  = 1 Then

    \'第一次打开

else

    \'后续打开

End If


--  作者:CRM2013
--  发布时间:2013/7/30 16:30:00
--  

谢谢狐爸,指点很清晰。