以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个折叠只可以显示一个内容,我想显示多个  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175203)

--  作者:qazlinle6
--  发布时间:2022/2/23 20:04:00
--  这个折叠只可以显示一个内容,我想显示多个
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (5).txt




这个折叠只可以显示一个内容,我想显示多个
[此贴子已经被作者于2022/2/23 20:04:12编辑过]

--  作者:有点蓝
--  发布时间:2022/2/24 8:44:00
--  
显示多少个放到一起即可

\'.C& k01 &" "& k02 &" "& k03 &" "& k04 &" "& k05 &"</button></p><p>  ........其它内容.."

--  作者:qazlinle6
--  发布时间:2022/2/24 8:48:00
--  
我是读取的数据,不是固定的数据
--  作者:有点蓝
--  发布时间:2022/2/24 9:14:00
--  
都一样,读取的数据拼接到一起,再给content赋值
--  作者:qazlinle6
--  发布时间:2022/2/24 9:35:00
--  
不可以自动的吗,那我如果有100行,得弄100 个代码吗
--  作者:有点蓝
--  发布时间:2022/2/24 10:07:00
--  
不会遍历吗
--  作者:qazlinle6
--  发布时间:2022/2/24 10:17:00
--  




 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (5).txt

什么遍历,
[此贴子已经被作者于2022/2/24 10:30:16编辑过]

--  作者:有点蓝
--  发布时间:2022/2/24 10:43:00
--  
  With .AddPanel("colp02","所属店铺","")

dim s as string
Dim drs As List(Of DataRow)
drs = DataTables("Users").sqlSelect("(\',\'+账号企业名+\',\') like \'%," & e.GetValues("店名") & ",%\' And 在职离职=\'在职\' ")
For Each dr As DataRow In drs
    s = s & "<p>  <button style=\'width:100%;height: 150px;border: 0px solid #cccbcb; margin: 5px 0;background-color: #ffffff;\'> "& dr("Name") &" </button></p>"
Next
.Content = s
        End With

--  作者:qazlinle6
--  发布时间:2022/2/24 18:11:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (5).txt



With wb.AddActionSheet("","s1")
            Dim d01 As DataRow= DataTables("Users").SQLFind("Name=等于 dr("Name")")

--  作者:有点蓝
--  发布时间:2022/2/24 20:34:00
--  
没看懂,用中文解释一下