Foxtable(狐表)用户栏目专家坐堂 → AddPage切换问题


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

主题:AddPage切换问题

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106732 积分:542855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/9 22:15:00 [显示全部帖子]

贴出具体代码看看

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


加好友 发短信
等级:超级版主 帖子:106732 积分:542855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/10 11:00:00 [显示全部帖子]

Dim wb As New weui

wb.AddPage("","page1") '增加两个page
wb.AddPage("","page2",False) '第二个

With wb.AddArticle("page1","ar1")
    .AddTitle("h1","关于Foxtable")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
    .AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
End With

With wb.AddButtonGroup("page1","btg1")
    .Add("btn1", "下一页", "button").Attribute="onclick=""hide('page1');show('page2')"""
End With

With wb.AddArticle("page2","ar2")
    .AddTitle("h1","关于易表")
    .AddContent("易表.net介于电子表格和数据库软件之间,它有类似电子表格的界面,同时又有很多数据库软件特有的功能和灵活性,它能将复杂的操作简单化,让普通用户轻松完成复杂的数据管理和统计分析工作.")
End With

With wb.AddButtonGroup("page2","btg2")
    .Add("btn2", "上一页", "button").Attribute="onclick=""hide('page2');show('page1');location.href = '#bottom'"""
End With

wb.InsertHTML("page1","<a name=""bottom""></a>")

e.WriteString(wb.Build)

 回到顶部