Foxtable(狐表)用户栏目专家坐堂 → [求助]Grid的onclick事件发生后如何进入xxx.htm运行?


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

主题:[求助]Grid的onclick事件发生后如何进入xxx.htm运行?

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


加好友 发短信
等级:八尾狐 帖子:1960 积分:15536 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]Grid的onclick事件发生后如何进入xxx.htm运行?  发帖心情 Post By:2017/5/5 10:21:00 [只看该作者]

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编辑过]

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


加好友 发短信
等级:超级版主 帖子:107881 积分:548774 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/5 10:27:00 [只看该作者]

 .Add("c1","Button", "./images/button.png","xxx.htm")

 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1960 积分:15536 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2017/5/5 11:10:00 [只看该作者]

   Case "gzbcx.htm"
        DataTables("工资表查询").DeleteFor("")
    ......


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

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


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/5 11:13:00 [只看该作者]

 测试没问题,请贴出完整代码。

 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1960 积分:15536 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By: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编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/5 11:22:00 [只看该作者]

代码没问题,请认真测试。

 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1960 积分:15536 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2017/5/5 11:29:00 [只看该作者]

谢谢 成功了刚才好象是手机端没有重新登陆!

 回到顶部