用户登录后没有退出，用别的电脑怎么登录 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：捕获.jpg

登录的代码这样写的

Dim counts As Integer = 0

counts = Tables("用户").Compute("count(用户ID)","姓名 = '" & yhm.Text & "' and 密码 = '" & mm.Text & "' and 启用 = true " and "状态 = false")

‘BeforeCloseProject关闭项目之前执行。

Dim dr As DataRow

dr = DataTables("用户").Find("姓名 = '" & Vars("姓名") & "' ")

With DataTables("用户")

dr("状态") = False

End With

请问：如果用户登录后没有退出系统，那从第二台电脑怎么登录啊。第二台登录的时候提醒在别的地方登录，把原来登录的关闭呗，参考哪些文档啊

[此贴子已经被作者于2025/1/30 16:39:36编辑过]

主题：用户登录后没有退出，用别的电脑怎么登录