以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  用 TabBar固定按钮,不切换切换,点击页面按钮实现打开链接?能否实现?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=106410)

--  作者:yjf123
--  发布时间:2017/9/8 10:56:00
--  用 TabBar固定按钮,不切换切换,点击页面按钮实现打开链接?能否实现?

用 TabBar固定按钮,不切换切换,点击页面按钮实现打开链接?能否实现?

 

With wb.AddTabBar("", "tb1", 0)
            .AddPage("page1","编辑","./images/button.png").Attribute =" & PageNumber & "&key=" & dr("_identify") & "&Dname=" & name & "\'" & ""
            .AddButton("bt2","返回","./images/cell.png",PageURL)
        End With


图片点击可在新窗口打开查看此主题相关图片如下:s70908-083556.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/9/8 11:34:00
--  

With wb.AddTabBar("", "tb1", 0)
    Dim str As String = "你的连接"
    .AddPage("page1","编辑","./images/button.png", str)
    .AddButton("bt2","返回","./images/cell.png",PageURL)
End With


--  作者:yjf123
--  发布时间:2017/9/8 11:50:00
--  
以下是引用有点甜在2017/9/8 11:34:00的发言:

With wb.AddTabBar("", "tb1", 0)
    Dim str As String = "你的连接"
    .AddPage("page1","编辑","./images/button.png", str)
    .AddButton("bt2","返回","./images/cell.png",PageURL)
End With

不对的,提错,参数太多


--  作者:有点甜
--  发布时间:2017/9/8 12:55:00
--  
With wb.AddTabBar("", "tb1", 0)
    Dim str As String = "你的连接"
    .AddButton("page1","编辑","./images/button.png", str)
End With

--  作者:yjf123
--  发布时间:2017/9/8 13:41:00
--  
以下是引用有点甜在2017/9/8 12:55:00的发言:
With wb.AddTabBar("", "tb1", 0)
    Dim str As String = "你的连接"
    .AddButton("page1","编辑","./images/button.png", str)
End With

这是加入按钮,没有页面,那后面的form1加入到哪里去?


--  作者:有点甜
--  发布时间:2017/9/8 14:01:00
--  

加入下面代码

 

wb.InsertHTML("<script>document.getElementById(\'page1_btn name=\').setAttribute(\'href\', \'http://www.baidu.com\')</script>")