- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 锁屏密码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187100)
-- 发布时间：2023/6/21 9:59:00
-- 锁屏密码
请问如何让锁屏密码不是设定的（如下123456），而是采用用户登录的密码：
Dim pwd As String = e.Form.Controls("TextBox1").Text
If pwd <> "123456" Then
msgbox("提示：密码不正确，锁屏密码为用户登录密码")
e.cancel = True
End If
-- 发布时间：2023/6/21 10:12:00
--
内置用户管理是没有办法的。除非改为这种自定义用户管理：http://www.foxtable.com/webhelp/topics/2048.htm
-- 发布时间：2023/6/21 10:20:00
--
那如果是改成做一个内部数据表“表A”，里面有一列“密码”和一列“验证”，再做一个模式窗口，里面一个texbox捆绑“验证”，再做一个按钮，当texbox里面输入的字符=“密码”里面的字符时，则可以关闭该窗口并清空“验证”里面的内容，否则则提示密码错误，请问如何写代码，谢谢！
-- 发布时间：2023/6/21 10:24:00
--
参考2楼帮助【八、增加一个名为“用户登录”的窗口：】里的用法
-- 发布时间：2023/6/21 11:07:00
--
那个有点复杂，能不能简单点，就是两个单元格的数据比对就可以了，这个表格只有一行
-- 发布时间：2023/6/21 11:13:00
--
If e.Form.Controls("TextBox1").Value <> tables("表A")rows(0)("密码") Then
Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
-- 发布时间：2023/6/21 11:22:00
--
出现错误
此主题相关图片如下：微信截图_20230621111957.png
-- 发布时间：2023/6/21 11:39:00
--
手误，输少一个点，这种问题要学会自行判断
If e.Form.Controls("TextBox1").Value <> tables("表A").rows(0)("密码") Then
-- 发布时间：2023/6/21 11:57:00
--
谢谢蓝老师，好几年没有怎么用力，都忘记了，呵呵