老师好！ 我按照
http://www.foxtable.com/webhelp/topics/2723.htm外部数据源与用户管理，创建了Users表，使用外部数据表存储用户信息，但是这样要实现用户自己更改密码，那就需要在自定义菜单界面设置一个像系统菜单一样的用户管理，因为不考虑在菜单设置功能区按钮，请问还有其他办法解决吗？
我参考http://www.foxtable.com/webhelp/topics/2986.htm让用户自主设置密码，以下代码是否适合前面的方案用（Users表），如何可以，这个代码如何改
服务端的设计
打开文件QQServer.Table，将OpenQQ服务端的UserChangePassword事件代码设置为：
Dim pts() As String = e.UserName.Split(".")
Dim dr As DataRow = DataTables("用户").Find("部门 = '" & pts(0) & "' And 姓名 = '" & pts(1) & "'")
If dr Is Nothing OrElse dr("密码") <> e.OldPassword Then
e.ReturnMessage = "原密码不符!"
Else
dr("密码") = e.NewPassword
dr.Save()
e.ReturnMessage = "OK" '返回约定的字符，通知客户端，密码修改成功
End If
加好友 
发短信
Post By：2019/8/17 12:01:00 [显示全部帖子]
