以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]Grid的onclick事件发生后如何进入xxx.htm运行?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100122)

--  作者:新福星
--  发布时间:2017/5/5 10:21:00
--  [求助]Grid的onclick事件发生后如何进入xxx.htm运行?
Case "test.htm"
         Dim wb As New WeUI
         wb.AddPageTitle("","pageheader","WeUI","微信网页设计样式库")
         With wb.AddGrid("","g1")
             .Add("c1","Button", "./images/button.png").Attribute = ""
             .Add("c2","Cell", "./images/cell.png", "http://www.foxtable.com")
             .Add("c3","Toast", "./images/toast.png", "http://www.foxtable.com")

如何在onclick事件发生时(红色字位置)进入到一个 xxx.htm里?语句怎么写?谢谢
[此贴子已经被作者于2017/5/5 10:22:02编辑过]

--  作者:有点蓝
--  发布时间:2017/5/5 10:27:00
--  
 .Add("c1","Button", "./images/button.png","xxx.htm")
--  作者:新福星
--  发布时间:2017/5/5 11:10:00
--  
   Case "gzbcx.htm"
        DataTables("工资表查询").DeleteFor("")
    ......


With wb.AddGrid("","g1")          \'
            .Add("c1","工资表查询", "./images/105.png","gzbcx.htm")

这么改的,怎么没进去执行呢?


--  作者:有点色
--  发布时间:2017/5/5 11:13:00
--  
 测试没问题,请贴出完整代码。
--  作者:新福星
--  发布时间:2017/5/5 11:19:00
--  
   Case "gzbcx.htm"
        DataTables("工资表查询").DeleteFor("")
.....

Case "default.htm" \'首页
        
        wb.AddPageTitle("","pageheader","工资查询系统","软件开发")
        wb.AddForm("","form1","default.htm")
   
        With wb.AddGrid("","g1")
          
            .Add("c1","工资表查询", "./images/105.png","gzbcx.htm")
            .Add("c2","客户管理", "./images/120.png", "http://www.foxtable.com")
            .Add("c3","销售统计", "./images/121.png").Attribute = ""
            .Add("c4","修改密码", "./images/130.png","Update.htm")   \'.Attribute = ""  
            .Add("c5","Progress", "./images/123.png", "http://www.foxtable.com")
         
            
        End With
        e.WriteString(wb.Build)

[此贴子已经被作者于2017/5/5 11:19:35编辑过]

--  作者:有点色
--  发布时间:2017/5/5 11:22:00
--  
代码没问题,请认真测试。
--  作者:新福星
--  发布时间:2017/5/5 11:29:00
--  
谢谢 成功了刚才好象是手机端没有重新登陆!