| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 原始用户表移动版 注册 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114578) |
||
| -- 作者：有点蓝 -- 发布时间：2018/2/9 20:36:00 -- 参考：http://www.foxtable.com/mobilehelp/scr/0045.htm With wb.AddInputGroup("form1","ipg1","带 * 为必填项 ") .AddInput("日期","注册日期*","date") .AddInput("Name","用户姓名*","Text") With .AddInput("group","用户部门*","text") .Value = user.Group End With .AddInput("Config","用户岗位*","Text") 怎么 在Config写入角色 .AddInput("Config","用户密码*","Text") 怎么在 Config写入密码 .AddInput("上级","直接上级*","Text") End With |
||
| -- 作者：有点蓝 -- 发布时间：2018/2/9 22:30:00 -- 参考：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101356&skin=0 dr("Config") = "Group " & 获取的分组名 & "PassWord " & MD5Encrypt("获取的密码") & "Type 2 Role " & 获取的角色 中间的分隔符这里无法显示，自己创建一个用户，然后到数据库里复制这个特殊符号
|
||
| -- 作者：有点蓝 -- 发布时间：2018/2/9 22:58:00 -- 参考：http://www.foxtable.com/webhelp/scr/1273.htm |
||
| -- 作者：有点甜 -- 发布时间：2018/2/10 9:00:00 -- 这个字符是 chr(11)
dr("Config") = "Group " & chr(11) & 获取的分组名 & "PassWord " & MD5Encrypt("获取的密码") & "Type 2 Role " & 获取的角色 |
||
| -- 作者：有点甜 -- 发布时间：2018/2/10 16:15:00 -- Else \'提交表单后
Dim name As String = e.values("name")
Dim group As String = e.values("group")
Dim password as string =
Dim role as string =
Dim ndr As DataRow = DataTables("用户表").AddNew
ndr("config") = "Group" & chr(11) & group & chr(11) & "PassWord" & chr(11) & MD5Encrypt(password) & chr(11) & "Type" & chr(11) & "2" & chr(11) & "Role" & chr(11) & role
End If
[此贴子已经被作者于2018/2/10 16:17:46编辑过]
|
||
| -- 作者：有点蓝 -- 发布时间：2018/2/11 10:25:00 -- ndr("店面") = e.values("店面") |
||
| -- 作者：有点蓝 -- 发布时间：2018/2/11 16:26:00 -- 注意id的大小写:http://www.foxtable.com/mobilehelp/scr/0045.htm
|
||
| -- 作者：有点蓝 -- 发布时间：2018/2/11 16:48:00 -- 就是14楼的问题，有好好理解帮助的意思了么 Dim nms() As String = {"日期","config","name","上级","店面"}
|
||
| -- 作者：有点甜 -- 发布时间：2018/2/12 8:51:00 -- Dim nms() As String = {"日期","Config","Name","上级","店面"} \'不能为空的列名数组
把config删除，改成 group、password、role 等。 |
||
| -- 作者：有点蓝 -- 发布时间：2018/2/12 16:29:00 -- 只能用自定义的用户管理，无法在使用系统默认的用户管理。 修改密码的网页就做3个输入框：旧密码，新密码，确认新密码，后台先核对旧密码再更新新密码即可
|