以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  手机端的列表提取数据问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175812)

--  作者:ycs5801
--  发布时间:2022/3/20 14:21:00
--  手机端的列表提取数据问题

使用Panel

Panel主要用于图文组合列表显示。

一个例子

Select Case e.Path
    Case "test.htm"
       
Dim wb As New WeUI
        Dim txt As String =
"
由各种物质组成的巨型球状天体,叫做星球.星球有一定的形状,有自己的运行轨道."
        With wb.AddPanelGroup("","pg1",
"
图文组合列表")
            .Add("pn1",
"
标题一",txt,"./images/button.png","http://www.foxtable.com") \'超链接
            With .Add("pn2",
"
标题二",txt,"./images/search.png") \'带子链接
                .AddFoot(
"
文字来源")
                .AddFoot(
"
时间")
                .AddFoot(
"|
其他信息","http://www.foxtable.com")
            End With
        End With
        With wb.AddPanelGroup("","pg2",
"
文字组合列表")
            .Add("pn1",
"
标题一",txt) \'普通列表
            .Add("pn1",
"
标题二",txt,"","http://www.foxtable.com") \'超链接
            With .Add("pn2",
"
标题三",txt) \'带有子链接
                .AddFoot(
"
文字来源")
                .AddFoot(
"
时间")
                .AddFoot(
"|
其他信息","http://www.foxtable.com")
            End With
            .GroupFoot =
"
查看更多" \'底部链接
            .GroupHref = "http://www.foxtable.com/"
        End With
        e.WriteString(wb.Build)
\'
生成网页
End
Select



按照这个示例,我如果想提取数据库中的某一列数据,并分页显示,该怎么设置呢?


--  作者:有点蓝
--  发布时间:2022/3/20 20:45:00
--  
可以参考这个实例里面分页显示列表的用法:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=94825,看【订单_订单查询】函数
--  作者:ycs5801
--  发布时间:2022/4/23 0:44:00
--  搞定了
搞定了,谢谢。
[此贴子已经被作者于2022/4/23 11:02:06编辑过]