主题：移动版如何设置用户权限

OK，错误的提示已解决，但是我在用“张三”这个用户登陆后，还是没有出现单价列的显示？显示的列与用其它用户登陆时是一样的，还有哪里有问题，继续请助。谢谢！

 

1、你登陆页面，有设置代码如 wb.AppendCookie("username",UserName) 吗？你有把用户名存放到cookie里面了吗？

 

2、弹出你获取的uname的值看看 msgbox(e.cookies("username"))

有，我在这段发现了它：

 dr = UserTable.AddNew()
            dr("UserName") = UserName
            dr("UserID") = UserId
            dr("ActiveTime") = Date.Now '记录登录时间
            wb.AppendCookie("username",UserName) '将用户名和密码写入cookie
            wb.AppendCookie("userid",UserID)
            wb.InsertHTML("<meta http-equiv='Refresh' c>") '直接跳转到首页
            e.WriteString(wb.Build) '生成网页

在你显示表格的代码那里，这个代码弹出什么？

 

msgbox(e.cookies("username"))

 

贴出你完整的测试代码。

这个代码时弹出的窗口如下：

此主题相关图片如下：微信截图_20180310160951.png

 

msgbox(cmd.CommandText) ‘这里弹出的sql是什么’实际弹出如下：

 

此主题相关图片如下：微信截图_20180310161014.png

用张三登录呢？弹出什么内容？

还是与之前一样的。

你写入cookie的username加密了

 

UserName = EncryptText(UserName,"123","123") '将用户名加密

 

你取出的时候，要解密

 

Dim uname As String = e.cookies("username")
msgbox(uname)
uname = DecryptText(uname, "123", "123")
msgbox(uname)