以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]请教老师 关于网页跳转的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=121411)

--  作者:youwei_dong
--  发布时间:2018/7/5 16:22:00
--  [求助]请教老师 关于网页跳转的问题
Dim e As RequestEventArgs = args(0)
Dim wb As New WeUI
wb.AddPageTitle("","ph1","SalesUI","量身设计")
wb.AddToast("","t1", "正在努力查询",1) \'定义提示
wb.AddForm("","form1","list.htm").attribute= """
\'表示定义了一个表单,提交这个表单的时候,会显示名为t1的toast,不仅可以给用户一个提示,还可以避免用户再次单击确定按钮,重复提交数据.

With wb.AddInputGroup("form1","ipg1","销售查询")
    .AddSelect("lc","楼层:","全部|负一层|一层|二层|三层|四层")
    With .AddInput("ksrq","开始日期:","date")
        .Value = Format(Date.Today,"yyyy-MM-dd")
        \'.Min = (Date.Today.AddYears(-1))
    End With
    With .AddInput("jsrq","结束日期:","date")
        .Value = Format(Date.Today,"yyyy-MM-dd")
    End With
End With
With wb.AddButtonGroup("form1","btg1",True)
    .Add("btn1", "确定", "submit")
End With
e.WriteString(wb.Build)



这段代码在执行完查询后   苹果手机上按返回按钮 就会回到 t1  这个定义的提示上。如何能跳过 t1 这个提示直接回到本身这个面页上

[此贴子已经被作者于2018/7/5 16:26:55编辑过]

--  作者:有点蓝
--  发布时间:2018/7/5 16:59:00
--  
自己提供返回按钮,返回到指定页面
--  作者:youwei_dong
--  发布时间:2018/7/6 7:50:00
--  
谢谢老师