以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]系统自带的用户管理  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78212)
--  作者：kaiyu
--  发布时间：2015/12/4 11:24:00
--  [求助]系统自带的用户管理
请问可不可以让用户自己修改登陆密码，是用系统自带的用户管理。
--  作者：大红袍
--  发布时间：2015/12/4 11:27:00
--  

 看看

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=73993&skin=0

 
--  作者：kaiyu
--  发布时间：2015/12/4 11:40:00
--  


图片点击可在新窗口打开查看此主题相关图片如下：{3f49d0cb-8621-47cb-9be2-aa384fc16785}.bmp
图片点击可在新窗口打开查看

可不可以让用户打开这个窗口，上部份是本身用户自带的，不能操作，就是可以在下面输入新密码和确认新密码
--  作者：大红袍
--  发布时间：2015/12/4 12:24:00
--  

Dim frm = Windows.Forms.Form.ActiveForm

If frm IsNot Nothing Then
    If frm.name = "Class182" Then
        frm.controls("txtPassword1").Enabled = False
        frm.controls("txtPassword2").Enabled = False
        \'txtTag
        \'Label7
        \'btnTag
        \'cmbRoles
        \'Label6
        \'btnCancel
        \'btnOk
        \'cmbGroups
        \'Label5
        \'txtPassword2
        \'Label4
        \'txtPassword1
        \'Label3
        \'Label2
        \'txtName
        \'Label1
    End If
End If