主题：页面传值问题

addnew2

Dim e As RequestEventArgs = args(0)

Dim wb As New weui

If e.PostValues.Count = 0 Then '生成增加订单网页

    wb.AddForm("","form1","addnew2.htm?key=" & e.getvalues("key"))

……

    With wb.AddMsgPage("","msgpage","增加成功", "计重增加成功") '增加订单成功提示信息

        .AddButton("btn1","继续增加","addnew2.htm?key=" & e.getvalues("key"))

        .AddButton("btn1","返回首页","list1.htm")

    End With