Foxtable(狐表)用户栏目专家坐堂 → weui框架开发,区分多个按钮,怎么判断是哪个按钮?


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

主题:weui框架开发,区分多个按钮,怎么判断是哪个按钮?

帅哥,在线噢!
zhchling
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:404 积分:4070 威望:0 精华:0 注册:2012/2/9 20:09:00
weui框架开发,区分多个按钮,怎么判断是哪个按钮?  发帖心情 Post By:2025/1/9 14:58:00 [只看该作者]

怎么在accept.htm 里面判断是哪个按钮?  btn1


 If “什么语法” = "btn2" Then
       flt = "日期='" & Date.today.AddDays(1) & "'" 
   End If 

-----------------------------------------------

Dim wb As New weui
Select
Case e.Path
    Case "input.htm"
        If e.PostValues.Count = 0 Then
            wb.AddForm("","form1","input.htm")
            With wb.AddInputGroup("form1","ipg1","
数据输入")
                .AddInput("
客户","客户","text")
                .AddInput("
日期","日期","date")
                .Addinput("
产品","产品","text")
                .Addinput("
数量","数量","number")
            End With
            With wb.AddButtonGroup("form1","btngrp1",False)
                .Add("btn1", "
按钮1", "submit").Value = "btn1"
                .Add("btn2", "
按钮2", "submit").Value = "btn2"
                .Add("btn3", "
按钮3", "submit").FormAction = "accept.htm"
                .Add("btn4", "
按钮4", "submit").FormAction = "accept.htm?type=1&model=ha"
            End With
        Else
            wb.InsertHTML("
接收到的数据有:<br/>")
            For Each key As String In e.PostValues.Keys
                wb.InsertHTML(key & ":" & e.PostValues(key) & "<br/>")
            Next
        End If
    Case "accept.htm"
        wb.InsertHTML("
通过accept.htm接收到的数据有:<br/>")
        For Each key As String In e.PostValues.Keys
            wb.InsertHTML(key & ":" & e.PostValues(key) & "<br/>")
       
Next
End
Select
e
.WriteString(wb.Build)
[此贴子已经被作者于2025/1/9 14:59:17编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111706 积分:568666 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/9 15:18:00 [只看该作者]

加多一个参数区分

.Add("btn3""按钮3""submit").FormAction = "accept.htm?btn=3"
.Add("btn4""
按钮4""submit").FormAction = "accept.htm?btn=4&type=1&model=ha"

 回到顶部
帅哥,在线噢!
zhchling
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:404 积分:4070 威望:0 精华:0 注册:2012/2/9 20:09:00
  发帖心情 Post By:2025/1/9 15:33:00 [只看该作者]

在accept.htm 里 怎么判断?
      If e.postvalues.value = 3 Then    ?????????????????


            flt = "日期='" & Date.today & "'"
            e.PostValues("startdate") =  Date.today
        End If


e.postvalues的语法帮助在哪里有
[此贴子已经被作者于2025/1/9 15:34:02编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111706 积分:568666 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/9 16:09:00 [只看该作者]

http://www.foxtable.com/mobilehelp/topics/0113.htm


if e.GetValues("btn")  = 3 then
msgbox("按钮3")

 回到顶部