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

权限直接在httprequest事件设置。

1、首先要做登陆页面 http://www.foxtable.com/mobilehelp/scr/0138.htm

2、然后显示数据的时候，获取当前用户信息，对应生成不同数据显示。

1、获取用户信息，如 dim uname as string = e.cookies("username")

2、在生成网页的时候，判断生成，如

dim uname as string = e.cookies("username")

if uname = "张三" Then

    'e.writestring("abc")

ElseIf uname = "李四" Then

    'e.writestring("123")

else

    'e.writestring("1111222233344")

End If

提示什么错误？截图说明。

是不是多写了引号？ cmd.CommandText= "select 物料名称,实收数量,规格型号,[入库日期] From 入库表""

Dim dt = cmd.ExecuteReader

With wb.AddTable("","Table1")
    .CreateFromDataTable(dt)
    With .Body.AddRow()
        .Attribute = "style='background-color:#FFFFE0'"
        .AddCell("小计")
        .AddCell(dt.compute("sum(实收数量)"))
    End With
End With

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

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

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

msgbox(e.cookies("username"))

贴出你完整的测试代码。

你写入cookie的username加密了

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

你取出的时候，要解密

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