弄一个简单的例子。 就是第一个lonin页面,填上手机号后, 点确定自动跳转第二个页面上。 手机号自动带到第二个页面上去。
Dim wb As New weui '这里放在开始,下面调用
Dim sjh As String
If e.Path = "login.htm"
If e.PostValues.ContainsKey("sjh") Then
sjh = e.PostValues("sjh")
End If
End If
Select Case e.Path
Case "login.htm"
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) '生成网页
Case "message.htm"
wb.AddForm("","form1","message.htm")
With wb.AddInputGroup("form1","ipg1","您的信息(无需填写)")
With .AddInput("sjj","您的手机号","text")
.Readonly = True
.Value = sjh
End With
End With
e.WriteString(wb.Build) '生成网页
End Select
我怎么弄也不对。
http://www.foxtable.com/mobilehelp/index.htm?page=0055.htm
接受表单那个例子,看了好多遍。 怎么也弄不明白。
麻烦您在我这个例子上稍微改一下行吗? 怎么传值这块。