Foxtable(狐表)用户栏目专家坐堂 → [求助]AddContent括号里面动态内容怎么写?


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

主题:[求助]AddContent括号里面动态内容怎么写?

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


加好友 发短信
等级:幼狐 帖子:99 积分:1155 威望:0 精华:0 注册:2012/9/30 10:20:00
[求助]AddContent括号里面动态内容怎么写?  发帖心情 Post By:2021/8/8 14:22:00 [只看该作者]

第一部分:获取时间前三的信息,产生文字组合列表


Dim dt As List(of DataRow)  = DataTables("表A").SQLSelect("",3,"时间 desc ")

   With wb.AddPanelGroup("","pg911","")    

      Dim tb As Table = Tables("表A")

      For i As Integer = 0 To 2  

      With .Add("pn172","" & dt(i)("标题") &"","" & dt(i)("备注") & "","","content.htm")     

         .AddFoot("" & dt(i)("时间") & "") 

      End With

     Next

   End With





第二部分:点击对应的文字列表标题,进入content.htm,content.htm要显示对应内容

      也就是说双击标题一,进入content.htm页面显示的内容是标题一对应的备注,点击标题二,进入显示的内容是标题二对应的备注

      AddContent括号里面动态内容怎么写?


  Case "content.htm"

        With wb.AddArticle("","ar1")

            .AddContent("这里代码怎么写,如何对应备注?")

        End With

 

   

    




[此贴子已经被作者于2021/8/8 14:22:52编辑过]

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


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

1、
With .Add("pn172",dt(i)("标题"),dt(i)("备注"),"","content.htm?bz=" & UrlEncode(dt(i)("标题")))  
2、

Case "content.htm"

        With wb.AddArticle("","ar1")

            .AddContent(e.getvalues("bz"))

        End With


 回到顶部