主题：登录统计

请问有没有统计并显示用户登录次数的例子参考一下。我是外部用户表。

用户表那里加入一列登陆次数，每登陆一次，数据就累加1

代码怎么写呢？

登陆的时候，不是要find查找对应的行？找到以后

 

fdr("登陆次数") += 1

fdr.save

Dim fdr As DataRow
fdr = DataTables("users").Find("Name=user.Name")        ’找到当前用户行，这样写对吗？Name是用户表的姓名列
If fdr IsNot Nothing Then '如果找到的话
    fdr("登录次数") += 1
    fdr.save
End If

贴出你登陆窗口登陆按钮的事件代码

用的是系统自带的登录窗口，没有写代码。只要把登录次数统计出来写入用户表的“登录次数”列就行了。

loadusersetting事件，写代码

 

Dim fdr As DataRow
fdr = DataTables("users").Find("Name='" & user.Name & "'")        '找到当前用户行,这样写对吗?Name是用户表的姓名列
If fdr IsNot Nothing Then '如果找到的话
    fdr("登录次数") += 1
    fdr.save
End If