access数据库设置使用年限或次数始终未成功，请问设置步骤与相应代码是怎样的？

周国林　发表于：2018-10-16 20:55:45 　

请教代码

麥田发表于：2018-10-16 20:56:26

'大于2019年元旦就自动退出系统
    If Year(Date) > 2019 And Month(Date) > 0 Then
        DoCmd.Quit
    End If

KevinFan 发表于：2018-10-23 22:12:50

到特定日期后不可用：if date =#2019-12-31# then DoCmd.Quit

到指定次数不能用：思路：需要有一个表记录次数，每次登陆的时候自动增加一次，达到指定次数退出

假设表名：tbl使用记录表内用于记录使用次数的字段为：次数

那么每次登陆时执行以下语句(假设限制15次，如果是平台，则可以在SysFrmMain加载代码中执行)

if Dlookup(“次数”,“tbl使用记录”) =15 then

DoCmd.Quit

Else

CurrentDb.Execute “update tbl使用记录 Set 次数=Nz(次数)+1”

end if

总记录：2篇页次：1/1 9 1 :

Access交流中心