主题：求助 自定义用户

用户表增加一个登陆标记列，用户登录后设置为1，关闭项目前设置为0。登录的时候判断如果是1，说明已经登录了，提示并拒绝登录

哪个步骤，什么地方有问题，写了什么代码有问题？

点击登录的确定按钮

比如

这个_UserTable是不是不能保存数据的？那就改为使用SQLcommand更新数据

是的

参考：http://www.foxtable.com/webhelp/topics/1284.htm

贴出BeforeCloseProject完整代码

Dim dr As DataRow
dr = DataTables("users").SQLFind("name = '" & _UserName & "'")

If dr isnot nothing   Then
    dr("登录") = False
    dr.save
End If

方法1、添加一个功能给管理员使用，手工查询清除指定用户的登录标记