Foxtable(狐表)用户栏目专家坐堂 → 请问weui怎么获取到表单的值。


  共有3205人关注过本帖树形打印复制链接

主题:请问weui怎么获取到表单的值。

帅哥哟,离线,有人找我吗?
houseer
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:325 积分:2752 威望:0 精华:0 注册:2015/2/3 19:48:00
请问weui怎么获取到表单的值。  发帖心情 Post By:2020/3/28 23:53:00 [显示全部帖子]

帮助看了两遍没看太明白:

Select Case e.Path
    Case "login.htm"
        Dim wb As New weui
        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
        If e.PostValues.ContainsKey("sjh") Then
            Vars("sjj") = e.PostValues("sjh")
        End If
        e.WriteString(wb.Build) '生成网页
end select


这样写不行啊。 请问应该怎么写?
[此贴子已经被作者于2020/3/29 0:15:37编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
houseer
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:325 积分:2752 威望:0 精华:0 注册:2015/2/3 19:48:00
  发帖心情 Post By:2020/3/29 0:25:00 [显示全部帖子]

 直接写 : Vars("sjj") = e.Values("sjh")   这样也不行


这样写也不行:
Select Case e.Path
    Case "login.htm"
    If e.PostValues.count = 0 Then
        Dim wb As New weui
        wb.AddForm("","form1","login.htm")
        With wb.AddInputGroup("form1","ipg1","请先输入手机号")
            .AddInput("手机号","手机号","text")
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "确定", "submit","message.htm")
        End With
        e.WriteString(wb.Build) '生成网页
    Else
        Vars("sjj") = e.PostValues("手机号")
    End If
end select
[此贴子已经被作者于2020/3/29 0:39:20编辑过]

 回到顶部