以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何获取DataTables和DataCols的列表  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=5281)

--  作者:ssqq
--  发布时间:2009/12/6 0:30:00
--  [求助]如何获取DataTables和DataCols的列表
使用遍历集合的方式输出的格式为一行一个:
For Each cl As Col In CurrentTable.Cols
    Output.Show(cl.Name)

Next

第一列
第二列
第三列

For Each cl As DataTable In CurrentTable.DataTable
    Output.Show(cl.Name)

Next

表A
表B
表C

如何输出的格式为列表格式,就是之间用符号"|"连接?
--  作者:ssqq
--  发布时间:2009/12/6 0:40:00
--  
找到解答了:
http://www.foxtable.com/dispbbs.asp?BoardID=2&ID=3778&replyID=&skin=1


Dim s As String
For Each dc As DataCol In DataTables("表名").DataCols
    s = s & "|" & dc.name
Next
e.Form.Controls("ComboBox").ComboList = s