Dim wb As New weui   \'这里放在开始,下面调用
Dim sjhstring  As  String
Select Case e.Path
    Case "login.htm"
        If e.PostValues.Count = 0 Then

            wb.AddForm("","form1","login.htm")
            With wb.AddInputGroup("form1","ipg1","请先输入手机号")
                 .AddInput("sjh","手机号","text")
            End With
            With wb.AddButtonGroup("form1","btg1",True)
                .Add("btn1", "确定", "submit","message.htm")
            End With
            e.WriteString(wb.Build) \'生成网页
        Else
            If e.PostValues.ContainsKey("sjh") Then
                  sjhstring = e.PostValues("sjh")
            End If

        End If
    Case "message.htm"
        wb.AddForm("","form1","message.htm")
        With wb.AddInputGroup("form1","ipg1","您的信息(无需填写)")
            With .AddInput("sjj","您的手机号","text")
            .Readonly = True
            .Value = e.PostValues("sjh")
            End With
        End With
        e.WriteString(wb.Build) \'生成网页      
End Select

我这么写也不行啊。 第二个页面的值带不出来啊。

老师我实在是看不懂你让我参考的那个。  你能直接告诉我哪里错了吗？

老师你给的连接不是weui框架下的写法啊。

是这个e.PostValues("sjh") 东西的值，必须得提交到服务器端吗？  帮助里的例子我都看了一遍，也没看明白怎么提交。