左栏'); } else{ document.write('关闭左栏'); } }catch(e){alert(e);}
Foxtable(狐表)用户栏目专家坐堂 → 标签页DataUrl 问题


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

主题:标签页DataUrl 问题

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


加好友 发短信
等级:童狐 帖子:276 积分:2369 威望:0 精华:0 注册:2016/6/3 8:28:00
标签页DataUrl 问题  发帖心情 Post By:2024/12/29 10:58:00 [只看该作者]

wb.AppendHTML("<link rel='stylesheet' href='./weui/exweui.css'/>", True)
wb.AppendHTML("<script src='./weui/exweui.js' ></script>", True)
With wb.AddButtonGroup("", "btg2", False)
    .Add("btnAdd1", "返回首页", "", "default.htm")
End With

With ExWeUI.WebUI.AddTabsGroup("", "tg01")
    .Attribute = "style = 'line-height: 45px;background-color:#1485ee;color:#fff'"
    .ActiveColor = "red"
    With .AddPage("tab01", "库存查询", True)  '进入页面时候这个网页不显示,选择了下面这个页面后这个页面才显示
        .DataUrl = "xy_getkucx.htm"
    End With
   
    With .AddPage("tab02", "检测查询")
        .DataUrl = "xy_getjccx.htm"     
    End With 
    
    wb.InsertHTML(.BuildHtml)
End With
wb.AppendHTML("<script src='./lib/htht.js'></script>")
wb.AppendHTML("<script src='./lib/xy_kcjccx.js'></script>")
wb.AppendHTML("<script>initExWeUI();</script>")'引入脚本文件
e.WriteString(wb.Build)

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


加好友 发短信
等级:超级版主 帖子:111471 积分:567443 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/29 20:12:00 [只看该作者]

方法1、需要默认显示的tab,直接设置Content 属性
2、调用js函数设置显示页面
wb.AppendHTML("<script>initExWeUI();ex_tabClick('tab01')</script>") 

 回到顶部