以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于登录用户密码修改  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139616)
--  作者：Jaime
--  发布时间：2019/8/17 12:01:00
--  关于登录用户密码修改
老师好！ 我按照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
--  作者：有点蓝
--  发布时间：2019/8/17 12:10:00
--  
只能使用自定义用户管理，如：http://www.foxtable.com/webhelp/topics/2048.htm

不能使用外部数据源与用户管理里的用法